petri_flow 0.1.0

data/app/controllers/wf/workflows_controller.rb

@@ -0,0 +1,59 @@
+# frozen_string_literal: true
+
+require_dependency "wf/application_controller"
+
+module Wf
+  class WorkflowsController < ApplicationController
+    breadcrumb "Workflows", :workflows_path
+    def index
+      @workflows = Wf::Workflow.order("id DESC").page(params[:page])
+    end
+
+    def new
+      @workflow = Wf::Workflow.new
+    end
+
+    def edit
+      @workflow = Wf::Workflow.find(params[:id])
+      breadcrumb @workflow.name, workflow_path(@workflow)
+    end
+
+    def show
+      @workflow = Wf::Workflow.find(params[:id])
+    end
+
+    def destroy
+      @workflow = Wf::Workflow.find(params[:id])
+      @workflow.destroy
+      respond_to do |format|
+        format.html { redirect_to workflows_path, notice: "workflow was successfully deleted." }
+        format.js { render js: "window.location.reload();" }
+      end
+    end
+
+    def update
+      @workflow = Wf::Workflow.find(params[:id])
+      if @workflow.update(workflow_params)
+        redirect_to workflow_path(@workflow), notice: "workflow was successfully updated."
+      else
+        render :edit
+      end
+    end
+
+    def create
+      @workflow = Wf::Workflow.new(workflow_params)
+
+      if @workflow.save
+        redirect_to workflows_path, notice: "workflow was successfully created."
+      else
+        render :new
+      end
+    end
+
+    private
+
+      def workflow_params
+        params.fetch(:workflow, {}).permit(:name, :description)
+      end
+  end
+end

data/app/controllers/wf/workitem_assignments_controller.rb

@@ -0,0 +1,30 @@
+# frozen_string_literal: true
+
+require_dependency "wf/application_controller"
+
+module Wf
+  class WorkitemAssignmentsController < ApplicationController
+    breadcrumb "Workflows", :workflows_path
+    def new
+      @workitem = Wf::Workitem.find(params[:workitem_id])
+      @workitem_assignment = @workitem.workitem_assignments.new(party_id: params[:party_id])
+      breadcrumb @workitem.workflow.name, workflow_path(@workitem.workflow)
+      breadcrumb @workitem.case.name, workflow_case_path(@workitem.workflow, @workitem.case)
+      breadcrumb @workitem.name, workitem_path(@workitem)
+    end
+
+    def create
+      @workitem = Wf::Workitem.find(params[:workitem_id])
+      party = Wf::Party.find(params[:workitem_assignment][:party_id])
+      Wf::CaseCommand::AddWorkitemAssignment.call(@workitem, party)
+      redirect_to workitem_path(@workitem), notice: "assigned party to workitem."
+    end
+
+    def destroy
+      @workitem = Wf::Workitem.find(params[:workitem_id])
+      party = Wf::Party.find(params[:party_id])
+      Wf::CaseCommand::RemoveWorkitemAssignment.call(@workitem, party)
+      render js: "window.location.reload()"
+    end
+  end
+end

data/app/controllers/wf/workitems_controller.rb

@@ -0,0 +1,79 @@
+# frozen_string_literal: true
+
+require_dependency "wf/application_controller"
+
+module Wf
+  class WorkitemsController < ApplicationController
+    before_action :find_workitem, except: [:index]
+    before_action :check_start, only: [:start]
+    before_action :check_finish, only: %i[pre_finish finish]
+
+    breadcrumb "Workflows", :workflows_path
+
+    def index
+      current_party_ids = [
+        current_user,
+        Wf::Workflow.org_classes.map { |org, _org_class| current_user.public_send(org) }
+      ].flatten.map { |x| x.party&.id }
+      @workitems = Wf::Workitem.joins(:workitem_assignments).where(Wf::WorkitemAssignment.table_name => { party_id: current_party_ids })
+      @workitems = @workitems.where(state: params[:state].intern) if params[:state]
+      @workitems = @workitems.where(state: params[:state].intern) if params[:state].present?
+      @workitems = @workitems.distinct.order("id desc").page(params[:page])
+    end
+
+    def show
+      breadcrumb @workitem.workflow.name, workflow_path(@workitem.workflow)
+      breadcrumb @workitem.case.name, workflow_case_path(@workitem.workflow, @workitem.case)
+    end
+
+    def start
+      Wf::CaseCommand::StartWorkitem.call(@workitem, current_user)
+      breadcrumb @workitem.workflow.name, workflow_path(@workitem.workflow)
+      breadcrumb @workitem.case.name, workflow_case_path(@workitem.workflow, @workitem.case)
+      breadcrumb @workitem.name, workitem_path(@workitem)
+      render :pre_finish
+    end
+
+    def pre_finish
+      breadcrumb @workitem.workflow.name, workflow_path(@workitem.workflow)
+      breadcrumb @workitem.case.name, workflow_case_path(@workitem.workflow, @workitem.case)
+      breadcrumb @workitem.name, workitem_path(@workitem)
+    end
+
+    def finish
+      if @workitem.transition.form && params[:workitem][:entry]
+        entry = @workitem.entries.find_or_create_by!(user: current_user)
+        params[:workitem][:entry].permit!.each do |field_id, field_value|
+          if field = entry.field_values.where(form: @workitem.transition.form, workflow: @workitem.workflow, field_id: field_id).first
+            field.update!(value: field_value)
+          else
+            entry.field_values.create!(form: @workitem.transition.form, workflow: @workitem.workflow, field_id: field_id, value: field_value)
+          end
+        end
+        entry.update_payload!
+      end
+      Wf::CaseCommand::FinishWorkitem.call(@workitem)
+      if @workitem.case.finished?
+        redirect_to workflow_case_path(@workitem.workflow, @workitem.case), notice: "workitem is done, and the case is finished."
+      else
+        redirect_to workitem_path(Wf::Workitem.last.case.workitems.enabled.first), notice: "workitem is done, and goto next fireable workitem."
+      end
+    end
+
+    def find_workitem
+      @workitem = Wf::Workitem.find(params[:id])
+    end
+
+    def check_start
+      unless @workitem.started_by?(current_user)
+        redirect_to workitem_path(@workitem), notice: "You can not start this workitem, Please assign to youself first."
+      end
+    end
+
+    def check_finish
+      unless @workitem.finished_by?(current_user)
+        redirect_to workitem_path(@workitem), notice: "You can not the holding use of this workitem, Please assign to youself && start it first."
+      end
+    end
+  end
+end

data/app/helpers/wf/application_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module ApplicationHelper
+  end
+end

data/app/helpers/wf/arcs_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module ArcsHelper
+  end
+end

data/app/helpers/wf/cases_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module CasesHelper
+  end
+end

data/app/helpers/wf/comments_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module CommentsHelper
+  end
+end

data/app/helpers/wf/fields_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module FieldsHelper
+  end
+end

data/app/helpers/wf/forms_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module FormsHelper
+  end
+end

data/app/helpers/wf/guards_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module GuardsHelper
+  end
+end

data/app/helpers/wf/places_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module PlacesHelper
+  end
+end

data/app/helpers/wf/transitions_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module TransitionsHelper
+  end
+end

data/app/helpers/wf/workflows_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module WorkflowsHelper
+  end
+end

data/app/helpers/wf/workitem_assignments_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module WorkitemAssignmentsHelper
+  end
+end

data/app/helpers/wf/workitems_helper.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  module WorkitemsHelper
+  end
+end

data/app/jobs/wf/application_job.rb

@@ -0,0 +1,6 @@
+# frozen_string_literal: true
+
+module Wf
+  class ApplicationJob < ActiveJob::Base
+  end
+end

data/app/jobs/wf/fire_timed_workitem_job.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+module Wf
+  class FireTimedWorkitemJob < ApplicationJob
+    queue_as :default
+
+    def perform(workitem_id)
+      item = Wf::Workitem.find(workitem_id)
+      if item.trigger_time && item.enabled? && item.case.active?
+        CaseCommand::FireTransitionInternal.call(item)
+        CaseCommand::SweepAutomaticTransitions.call(item.case)
+      end
+    end
+  end
+end

data/app/mailers/wf/application_mailer.rb

@@ -0,0 +1,8 @@
+# frozen_string_literal: true
+
+module Wf
+  class ApplicationMailer < ActionMailer::Base
+    default from: "from@example.com"
+    layout "mailer"
+  end
+end

data/app/models/wf/application_record.rb

@@ -0,0 +1,7 @@
+# frozen_string_literal: true
+
+module Wf
+  class ApplicationRecord < ActiveRecord::Base
+    self.abstract_class = true
+  end
+end

data/app/models/wf/arc.rb

@@ -0,0 +1,42 @@
+# frozen_string_literal: true
+
+# == Schema Information
+#
+# Table name: wf_arcs
+#
+#  id            :integer          not null, primary key
+#  workflow_id   :integer
+#  transition_id :integer
+#  place_id      :integer
+#  direction     :integer          default("0")
+#  created_at    :datetime         not null
+#  updated_at    :datetime         not null
+#  guards_count  :integer          default("0")
+#
+
+module Wf
+  class Arc < ApplicationRecord
+    belongs_to :workflow, touch: true
+    belongs_to :transition
+    belongs_to :place
+
+    has_many :guards, dependent: :destroy
+
+    scope :with_guards, -> { where("guards_count > 0") }
+    scope :without_guards, -> { where(guards_count: 0) }
+
+    # direction is relative to the transition
+    enum direction: {
+      in: 0,
+      out: 1
+    }
+
+    def name
+      if in?
+        [place&.name, transition&.name].join(" -> ")
+      else
+        [transition&.name, place&.name].join(" -> ")
+      end
+    end
+  end
+end

data/app/models/wf/callbacks/assignment_default.rb

@@ -0,0 +1,12 @@
+# frozen_string_literal: true
+
+module Wf::Callbacks
+  class AssignmentDefault < ApplicationJob
+    queue_as :default
+
+    def perform(*guests)
+      $stdout.puts(guests.inspect)
+      [] # return blank default
+    end
+  end
+end

data/app/models/wf/callbacks/deadline_default.rb

@@ -0,0 +1,11 @@
+# frozen_string_literal: true
+
+module Wf::Callbacks
+  class DeadlineDefault < ApplicationJob
+    queue_as :default
+
+    def perform(*guests)
+      $stdout.puts(guests.inspect)
+    end
+  end
+end

data/app/models/wf/callbacks/enable_default.rb

@@ -0,0 +1,11 @@
+# frozen_string_literal: true
+
+module Wf::Callbacks
+  class EnableDefault < ApplicationJob
+    queue_as :default
+
+    def perform(*guests)
+      $stdout.puts(guests.inspect)
+    end
+  end
+end

data/app/models/wf/callbacks/fire_default.rb

@@ -0,0 +1,11 @@
+# frozen_string_literal: true
+
+module Wf::Callbacks
+  class FireDefault < ApplicationJob
+    queue_as :default
+
+    def perform(*guests)
+      $stdout.puts(guests.inspect)
+    end
+  end
+end

data/app/models/wf/callbacks/hold_timeout_default.rb

@@ -0,0 +1,11 @@
+# frozen_string_literal: true
+
+module Wf::Callbacks
+  class HoldTimeoutDefault < ApplicationJob
+    queue_as :default
+
+    def perform(*guests)
+      $stdout.puts(guests.inspect)
+    end
+  end
+end

data/app/models/wf/callbacks/notification_default.rb

@@ -0,0 +1,11 @@
+# frozen_string_literal: true
+
+module Wf::Callbacks
+  class NotificationDefault < ApplicationJob
+    queue_as :default
+
+    def perform(*guests)
+      $stdout.puts(guests.inspect)
+    end
+  end
+end

data/app/models/wf/callbacks/time_default.rb

@@ -0,0 +1,11 @@
+# frozen_string_literal: true
+
+module Wf::Callbacks
+  class TimeDefault < ApplicationJob
+    queue_as :default
+
+    def perform(*guests)
+      $stdout.puts(guests.inspect)
+    end
+  end
+end

data/app/models/wf/callbacks/unassignment_default.rb

@@ -0,0 +1,11 @@
+# frozen_string_literal: true
+
+module Wf::Callbacks
+  class UnassignmentDefault < ApplicationJob
+    queue_as :default
+
+    def perform(*guests)
+      $stdout.puts(guests.inspect)
+    end
+  end
+end

data/app/models/wf/case.rb

@@ -0,0 +1,44 @@
+# frozen_string_literal: true
+
+# == Schema Information
+#
+# Table name: wf_cases
+#
+#  id              :integer          not null, primary key
+#  workflow_id     :integer
+#  targetable_type :string
+#  targetable_id   :string
+#  state           :integer          default("0")
+#  created_at      :datetime         not null
+#  updated_at      :datetime         not null
+#
+
+module Wf
+  class Case < ApplicationRecord
+    belongs_to :workflow
+    belongs_to :targetable, optional: true, polymorphic: true
+    has_many :workitems
+    has_many :tokens
+    has_many :case_assignments
+    has_many :parties, through: :case_assignments, source: "party"
+
+    enum state: {
+      created: 0,
+      active: 1,
+      suspended: 2,
+      canceled: 3,
+      finished: 4
+    }
+
+    def can_fire?(transition)
+      ins = transition.arcs.in.to_a
+      return false if ins.blank?
+
+      ins.all? { |arc| arc.place.tokens.where(case: self).where(state: :free).exists? }
+    end
+
+    def name
+      "Case->#{id}"
+    end
+  end
+end

data/app/models/wf/case_assignment.rb

@@ -0,0 +1,22 @@
+# frozen_string_literal: true
+# == Schema Information
+#
+# Table name: wf_case_assignments
+#
+#  id            :integer          not null, primary key
+#  case_id       :integer
+#  transition_id :integer
+#  party_id      :integer
+#  created_at    :datetime         not null
+#  updated_at    :datetime         not null
+#
+
+# frozen_string_literal: true
+
+module Wf
+  class CaseAssignment < ApplicationRecord
+    belongs_to :case
+    belongs_to :transition
+    belongs_to :party
+  end
+end

data/app/models/wf/case_command/add_comment.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+module Wf::CaseCommand
+  class AddComment
+    prepend SimpleCommand
+    attr_reader :workitem, :comment, :user
+    def initialize(workitem, comment, user)
+      @workitem   = workitem
+      @comment    = comment
+      @user       = user
+    end
+
+    def call
+      workitem.comments.create!(user: user, body: comment)
+    end
+  end
+end

data/app/models/wf/case_command/add_manual_assignment.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+module Wf::CaseCommand
+  class AddManualAssignment
+    prepend SimpleCommand
+    attr_reader :wf_case, :transition, :party
+    def initialize(wf_case, transition, party)
+      @wf_case = wf_case
+      @transition = transition
+      @party = party
+    end
+
+    def call
+      wf_case.case_assignments.find_or_create_by!(transition: transition, party: party)
+    end
+  end
+end

data/app/models/wf/case_command/add_token.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+module Wf::CaseCommand
+  class AddToken
+    prepend SimpleCommand
+    attr_reader :wf_case, :place
+    def initialize(wf_case, place)
+      @wf_case = wf_case
+      @place = place
+    end
+
+    def call
+      wf_case.tokens.create!(
+        workflow: wf_case.workflow,
+        place: place,
+        state: :free
+      )
+    end
+  end
+end

data/app/models/wf/case_command/add_workitem_assignment.rb

@@ -0,0 +1,35 @@
+# frozen_string_literal: true
+
+module Wf::CaseCommand
+  class AddWorkitemAssignment
+    prepend SimpleCommand
+    attr_reader :workitem, :party, :permanent
+    def initialize(workitem, party, permanent = true)
+      @workitem = workitem
+      @party    = party
+      @permanent = permanent
+    end
+
+    def call
+      return if party.nil?
+
+      Wf::ApplicationRecord.transaction do
+        AddManualAssignment.call(workitem.case, workitem.transition, party) if permanent
+
+        notified_users = workitem.parties.map do |p|
+          p.partable.users.to_a
+        end.flatten
+
+        assign = workitem.workitem_assignments.where(party: party).first
+        break if assign
+
+        workitem.workitem_assignments.create!(party: party)
+        new_users = party.partable.users.to_a
+        to_notify = new_users - notified_users
+        to_notify.each do |user|
+          workitem.transition.notification_callback.constantize.new(workitem, user.id).perform_now
+        end
+      end
+    end
+  end
+end

data/app/models/wf/case_command/begin_workitem_action.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Wf::CaseCommand
+  class BeginWorkitemAction
+    prepend SimpleCommand
+    attr_reader :workitem, :action, :user
+    def initialize(workitem, user, action = :start)
+      @workitem = workitem
+      @action   = action
+      @user     = user
+    end
+
+    def call
+      if action == :start
+        raise("Workitem is in state #{workitem.state}, but it must be in state enabled to be started.") unless workitem.enabled?
+        raise("You are not assigned to this workitem.") unless workitem.owned_by?(user)
+      elsif action == :finish || action == :cancel
+        if workitem.started?
+          raise("You are not the user currently working on this workitem.") if workitem.holding_user != user
+        elsif workitem.enabled?
+          raise("You can only cancel a workitem in state started, but this workitem is in state #{workitem.state}.") if action == :cancel
+          raise("You are not assigned to this workitem.") unless workitem.owned_by?(user)
+
+          workitem.update!(holding_user: user)
+        else
+          raise("Workitem is in state #{workitem.state}, but it must be in state enabled or started to be finished.")
+        end
+      elsif action == :comment
+        # TODO
+      end
+    end
+  end
+end

data/app/models/wf/case_command/cancel.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+module Wf::CaseCommand
+  class Cancel
+    prepend SimpleCommand
+    attr_reader :wf_case
+    def initialize(wf_case)
+      @wf_case = wf_case
+    end
+
+    def call
+      raise("Only active or suspended cases can be canceled") unless wf_case.suspended? || wf_case.active?
+
+      wf_case.canceled!
+    end
+  end
+end