archimate 1.1.0

data/lib/archimate/svg/entity/process_entity.rb

@@ -0,0 +1,63 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class ProcessEntity < RoundedRectEntity
+        def initialize(child, bounds_offset)
+          super
+          @badge = "#archimate-process-badge"
+        end
+
+        def entity_shape(xml, bounds)
+          case child.child_type
+          when 1
+            @badge = nil
+            process_path(xml, bounds)
+          else
+            super
+          end
+        end
+
+        def process_path(xml, bounds)
+          top = bounds.top
+          shaft_top = bounds.top + bounds.height * 0.15
+          middle = bounds.top + bounds.height * 0.5
+          shaft_bottom = bounds.bottom - bounds.height * 0.15
+          bottom = bounds.bottom
+
+          left = bounds.left
+          arrow_back = bounds.right - bounds.height * 0.5
+          right = bounds.right
+
+          calc_text_bounds(
+            DataModel::Bounds.new(
+              x: left,
+              y: shaft_top,
+              width: bounds.width - bounds.height * 0.25,
+              height: shaft_bottom - shaft_top
+            )
+          )
+          xml.path(
+            d: [
+              "M", left, shaft_top,
+              "L", arrow_back, shaft_top,
+              "L", arrow_back, top,
+              "L", right, middle,
+              "L", arrow_back, bottom,
+              "L", arrow_back, shaft_bottom,
+              "L", left, shaft_bottom,
+              "z"
+            ].flatten.join(" "),
+            class: background_class,
+            style: shape_style
+          )
+        end
+
+        def calc_text_bounds(bounds)
+          @text_bounds = bounds.reduced_by(2)
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/product.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class Product < BaseEntity
+        def entity_shape(xml, bounds)
+          product_path(xml, bounds)
+        end
+
+        def product_path(xml, bounds)
+          xml.g(class: background_class) do
+            xml.rect(x: bounds.left, y: bounds.top, width: bounds.width, height: bounds.height, class: background_class, style: shape_style)
+            xml.rect(x: bounds.left, y: bounds.top, width: bounds.width / 2.0, height: "8", class: "archimate-decoration")
+          end
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/rect.rb

@@ -0,0 +1,13 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      module Rect
+        def rect_path(xml, bounds)
+          xml.rect(x: bounds.left, y: bounds.top, width: bounds.width, height: bounds.height, class: background_class, style: shape_style)
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/rect_entity.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class RectEntity < BaseEntity
+        include Rect
+
+        def initialize(child, bounds_offset)
+          super
+          @badge_bounds = child.bounds.with(
+            x: child.bounds.right - 25,
+            y: child.bounds.top + 5,
+            width: 20,
+            height: 20
+          )
+        end
+
+        def entity_shape(xml, bounds)
+          rect_path(xml, bounds)
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/representation.rb

@@ -0,0 +1,31 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class Representation < BaseEntity
+        def entity_shape(xml, bounds)
+          representation_path(xml, bounds)
+        end
+
+        def representation_path(xml, bounds)
+          xml.path(
+            d: [
+              ["M", bounds.left, bounds.top],
+              ["v", bounds.height - 8],
+              ["c", 0.167 * bounds.width, 0.133 * bounds.height,
+               0.336 * bounds.width, 0.133 * bounds.height,
+               bounds.width * 0.508, 0],
+              ["c", 0.0161 * bounds.width, -0.0778 * bounds.height,
+               0.322 * bounds.width, -0.0778 * bounds.height,
+               bounds.width * 0.475, 0],
+              ["v", -(bounds.height - 8)],
+              "z"
+            ].flatten.join(" "),
+            class: background_class, style: shape_style
+          )
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/requirement.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class Requirement < MotivationEntity
+        def initialize(child, bounds_offset)
+          super
+          @background_class = "archimate-motivation2-background"
+          @badge = "#archimate-requirement-badge"
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/resource.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class Resource < RectEntity
+        def initialize(child, bounds_offset)
+          super
+          @badge = "#archimate-resource-badge"
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/rounded_rect_entity.rb

@@ -0,0 +1,23 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class RoundedRectEntity < BaseEntity
+        def initialize(child, bounds_offset)
+          super
+          @badge_bounds = child.bounds.with(
+            x: child.bounds.right - 25,
+            y: child.bounds.top + 5,
+            width: 20,
+            height: 20
+          )
+        end
+
+        def entity_shape(xml, bounds)
+          xml.rect(x: bounds.left, y: bounds.top, width: bounds.width, height: bounds.height, rx: "5", ry: "5", class: background_class)
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/service_entity.rb

@@ -0,0 +1,51 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class ServiceEntity < BaseEntity
+        include Rect
+
+        def initialize(child, bounds_offset)
+          super
+          bounds = child.bounds
+          @text_bounds = bounds.with(
+            x: bounds.left + 7,
+            y: bounds.top + 5,
+            width: bounds.width - 14,
+            height: bounds.height - 10
+          )
+        end
+
+        def entity_shape(xml, bounds)
+          case child.child_type
+          when 1
+            @badge_bounds = bounds.with(
+              x: bounds.right - 25,
+              y: bounds.top + 5,
+              width: 20,
+              height: 20
+            )
+            @badge = "#archimate-service-badge"
+            rect_path(xml, bounds)
+          else
+            service_path(xml, bounds)
+          end
+        end
+
+        def service_path(xml, bounds)
+          xml.rect(
+            x: bounds.left,
+            y: bounds.top,
+            width: bounds.width,
+            height: bounds.height,
+            rx: bounds.height / 2.0,
+            ry: bounds.height / 2.0,
+            class: background_class,
+            style: shape_style
+          )
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/sketch_model_sticky.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class SketchModelSticky < RectEntity
+        def initialize(child, bounds_offset)
+          super
+          @background_class = "archimate-sticky-background"
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/stakeholder.rb

@@ -0,0 +1,15 @@
+
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class Stakeholder < MotivationEntity
+        def initialize(child, bounds_offset)
+          super
+          @badge = "#archimate-role-badge"
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/system_software.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class SystemSoftware < RectEntity
+        def initialize(child, bounds_offset)
+          super
+          @badge = "#archimate-system-software-badge"
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/technology_collaboration.rb

@@ -0,0 +1,14 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class TechnologyCollaboration < RectEntity
+        def initialize(child, bounds_offset)
+          super
+          @badge = "#archimate-collaboration-badge"
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/technology_event.rb

@@ -0,0 +1,13 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class TechnologyEvent < EventEntity
+        def initialize(child, bounds_offset)
+          super
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/technology_function.rb

@@ -0,0 +1,13 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class TechnologyFunction < FunctionEntity
+        def initialize(child, bounds_offset)
+          super
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/technology_interaction.rb

@@ -0,0 +1,13 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class TechnologyInteraction < InteractionEntity
+        def initialize(child, bounds_offset)
+          super
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/technology_interface.rb

@@ -0,0 +1,13 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class TechnologyInterface < InterfaceEntity
+        def initialize(child, bounds_offset)
+          super
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/technology_process.rb

@@ -0,0 +1,13 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class TechnologyProcess < ProcessEntity
+        def initialize(child, bounds_offset)
+          super
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/technology_service.rb

@@ -0,0 +1,13 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class TechnologyService < ServiceEntity
+        def initialize(child, bounds_offset)
+          super
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/value.rb

@@ -0,0 +1,27 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class Value < BaseEntity
+        def entity_shape(xml, bounds)
+          calc_text_bounds(bounds)
+          cx = bounds.left + bounds.width / 2.0
+          rx = bounds.width / 2.0 - 1
+          cy = bounds.top + bounds.height / 2.0
+          ry = bounds.height / 2.0 - 1
+          xml.ellipse(cx: cx, cy: cy, rx: rx, ry: ry, class: background_class, style: shape_style)
+        end
+
+        def calc_text_bounds(_bounds)
+          @text_bounds = @text_bounds.with(
+            x: @text_bounds.left + 10,
+            y: @text_bounds.top + 10,
+            width: @text_bounds.width - 20,
+            height: @text_bounds.height - 20
+          )
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity/work_package.rb

@@ -0,0 +1,14 @@
+
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      class WorkPackage < RoundedRectEntity
+        def initialize(child, bounds_offset)
+          super
+        end
+      end
+    end
+  end
+end

data/lib/archimate/svg/entity.rb

@@ -0,0 +1,93 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module Entity
+      autoload :AndJunction, 'archimate/svg/entity/and_junction'
+      autoload :ApplicationCollaboration, 'archimate/svg/entity/application_collaboration'
+      autoload :ApplicationComponent, 'archimate/svg/entity/application_component'
+      autoload :ApplicationEvent, 'archimate/svg/entity/application_event'
+      autoload :ApplicationFunction, 'archimate/svg/entity/application_function'
+      autoload :ApplicationInteraction, 'archimate/svg/entity/application_interaction'
+      autoload :ApplicationInterface, 'archimate/svg/entity/application_interface'
+      autoload :ApplicationProcess, 'archimate/svg/entity/application_process'
+      autoload :ApplicationService, 'archimate/svg/entity/application_service'
+      autoload :Artifact, 'archimate/svg/entity/artifact'
+      autoload :Assessment, 'archimate/svg/entity/assessment'
+      autoload :BaseEntity, 'archimate/svg/entity/base_entity'
+      autoload :BusinessActor, 'archimate/svg/entity/business_actor'
+      autoload :BusinessCollaboration, 'archimate/svg/entity/business_collaboration'
+      autoload :BusinessEvent, 'archimate/svg/entity/business_event'
+      autoload :BusinessFunction, 'archimate/svg/entity/business_function'
+      autoload :BusinessInteraction, 'archimate/svg/entity/business_interaction'
+      autoload :BusinessInterface, 'archimate/svg/entity/business_interface'
+      autoload :BusinessObject, 'archimate/svg/entity/business_object'
+      autoload :BusinessProcess, 'archimate/svg/entity/business_process'
+      autoload :BusinessRole, 'archimate/svg/entity/business_role'
+      autoload :BusinessService, 'archimate/svg/entity/business_service'
+      autoload :Capability, 'archimate/svg/entity/capability'
+      autoload :CommunicationNetwork, 'archimate/svg/entity/communication_network'
+      autoload :CommunicationPath, 'archimate/svg/entity/communication_path'
+      autoload :Constraint, 'archimate/svg/entity/constraint'
+      autoload :Contract, 'archimate/svg/entity/contract'
+      autoload :CourseOfAction, 'archimate/svg/entity/course_of_action'
+      autoload :DataEntity, 'archimate/svg/entity/data_entity'
+      autoload :DataObject, 'archimate/svg/entity/data_object'
+      autoload :Deliverable, 'archimate/svg/entity/deliverable'
+      autoload :Device, 'archimate/svg/entity/device'
+      autoload :DiagramModelReference, 'archimate/svg/entity/diagram_model_reference'
+      autoload :DiagramObject, 'archimate/svg/entity/diagram_object'
+      autoload :DistributionNetwork, 'archimate/svg/entity/distribution_network'
+      autoload :Driver, 'archimate/svg/entity/driver'
+      autoload :Equipment, 'archimate/svg/entity/equipment'
+      autoload :EventEntity, 'archimate/svg/entity/event_entity'
+      autoload :Facility, 'archimate/svg/entity/facility'
+      autoload :FunctionEntity, 'archimate/svg/entity/function_entity'
+      autoload :Gap, 'archimate/svg/entity/gap'
+      autoload :Goal, 'archimate/svg/entity/goal'
+      autoload :Group, 'archimate/svg/entity/group'
+      autoload :ImplementationEvent, 'archimate/svg/entity/implementation_event'
+      autoload :InfrastructureEvent, 'archimate/svg/entity/infrastructure_event'
+      autoload :InfrastructureFunction, 'archimate/svg/entity/infrastructure_function'
+      autoload :InfrastructureInterface, 'archimate/svg/entity/infrastructure_interface'
+      autoload :InfrastructureService, 'archimate/svg/entity/infrastructure_service'
+      autoload :InteractionEntity, 'archimate/svg/entity/interaction_entity'
+      autoload :InterfaceEntity, 'archimate/svg/entity/interface_entity'
+      autoload :Junction, 'archimate/svg/entity/junction'
+      autoload :Location, 'archimate/svg/entity/location'
+      autoload :Material, 'archimate/svg/entity/material'
+      autoload :Meaning, 'archimate/svg/entity/meaning'
+      autoload :MotivationEntity, 'archimate/svg/entity/motivation_entity'
+      autoload :Network, 'archimate/svg/entity/network'
+      autoload :Node, 'archimate/svg/entity/node'
+      autoload :NodeShape, 'archimate/svg/entity/node_shape'
+      autoload :Note, 'archimate/svg/entity/note'
+      autoload :OrJunction, 'archimate/svg/entity/or_junction'
+      autoload :Outcome, 'archimate/svg/entity/outcome'
+      autoload :Path, 'archimate/svg/entity/path'
+      autoload :Plateau, 'archimate/svg/entity/plateau'
+      autoload :Principle, 'archimate/svg/entity/principle'
+      autoload :ProcessEntity, 'archimate/svg/entity/process_entity'
+      autoload :Product, 'archimate/svg/entity/product'
+      autoload :Rect, 'archimate/svg/entity/rect'
+      autoload :RectEntity, 'archimate/svg/entity/rect_entity'
+      autoload :Representation, 'archimate/svg/entity/representation'
+      autoload :Requirement, 'archimate/svg/entity/requirement'
+      autoload :Resource, 'archimate/svg/entity/resource'
+      autoload :RoundedRectEntity, 'archimate/svg/entity/rounded_rect_entity'
+      autoload :ServiceEntity, 'archimate/svg/entity/service_entity'
+      autoload :SketchModelSticky, 'archimate/svg/entity/sketch_model_sticky'
+      autoload :Stakeholder, 'archimate/svg/entity/stakeholder'
+      autoload :SystemSoftware, 'archimate/svg/entity/system_software'
+      autoload :TechnologyCollaboration, 'archimate/svg/entity/technology_collaboration'
+      autoload :TechnologyEvent, 'archimate/svg/entity/technology_event'
+      autoload :TechnologyFunction, 'archimate/svg/entity/technology_function'
+      autoload :TechnologyInteraction, 'archimate/svg/entity/technology_interaction'
+      autoload :TechnologyInterface, 'archimate/svg/entity/technology_interface'
+      autoload :TechnologyProcess, 'archimate/svg/entity/technology_process'
+      autoload :TechnologyService, 'archimate/svg/entity/technology_service'
+      autoload :Value, 'archimate/svg/entity/value'
+      autoload :WorkPackage, 'archimate/svg/entity/work_package'
+    end
+  end
+end

data/lib/archimate/svg/entity_factory.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    module EntityFactory
+      def make_entity(child, bounds_offset)
+        entity = child.element || child
+        klass_name = "Archimate::Svg::Entity::#{entity.type.sub('archimate:', '')}"
+        klass = Object.const_get(klass_name)
+        klass.new(child, bounds_offset)
+      rescue
+        puts "Unsupported entity type #{klass_name}"
+      end
+      module_function :make_entity
+    end
+  end
+end

data/lib/archimate/svg/extents.rb

@@ -0,0 +1,27 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    Extents = Struct.new(:min_x, :max_x, :min_y, :max_y) do
+      def expand(byval)
+        self.min_x ||= 0
+        self.max_x ||= 0
+        self.min_y ||= 0
+        self.max_y ||= 0
+        self.min_x -= byval
+        self.max_x += byval
+        self.min_y -= byval
+        self.max_y += byval
+        self
+      end
+
+      def width
+        max_x - min_x
+      end
+
+      def height
+        max_y - min_y
+      end
+    end
+  end
+end

data/lib/archimate/svg/point.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+module Archimate
+  module Svg
+    Point = Struct.new(:x, :y)
+  end
+end

data/lib/archimate/svg/svg_template.rb

@@ -0,0 +1,27 @@
+# frozen_string_literal: true
+
+require "erb"
+
+module Archimate
+  module Svg
+    class SvgTemplate
+      attr_reader :stylesheet
+
+      def initialize
+        @stylesheet = css_content
+      end
+
+      def css_content
+        @css_content ||= File.read(File.join(File.dirname(__FILE__), "archimate.css"))
+      end
+
+      def svg_erb
+        @svg_erb ||= File.read(File.join(File.dirname(__FILE__), "svg_template.svg.erb"))
+      end
+
+      def to_s
+        @template_xml ||= ERB.new(svg_erb).result(binding)
+      end
+    end
+  end
+end