redmine_dmsf/app/models/dmsf_workflow.rb

# Redmine plugin for Document Management System "Features"
#
# Copyright (C) 2013   Karel Picman <karel.picman@kontron.com>
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version 2
# of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.

class DmsfWorkflow < ActiveRecord::Base 
  has_many :dmsf_workflow_steps, :dependent => :destroy, :order => 'step ASC, operator DESC'

  validates_uniqueness_of :name
  validates :name, :presence => true
  validates_length_of :name, :maximum => 255
  
  STATE_NONE = nil
  STATE_ASSIGNED = 3
  STATE_WAITING_FOR_APPROVAL = 1
  STATE_APPROVED = 2
  STATE_REJECTED = 4

  def self.workflows(project)
    project ? where(:project_id => project) : where('project_id IS NULL')      
  end

  def project          
    Project.find_by_id(project_id) if project_id
  end

  def to_s
    name
  end   

  def reorder_steps(step, move_to)      
    case move_to
      when 'highest'          
        unless step == 1            
          dmsf_workflow_steps.each do |ws|              
            if ws.step < step
             return false unless ws.update_attribute('step', ws.step + 1)
            elsif ws.step == step                
              return false unless ws.update_attribute('step', 1)
            end            
          end          
        end
      when 'higher'
        unless step == 1            
          dmsf_workflow_steps.each do |ws|
            if ws.step == step - 1                                
              return false unless ws.update_attribute('step', step)
            elsif ws.step == step                
              return false unless ws.update_attribute('step', step - 1)
            end            
          end          
        end
      when 'lower'
        unless step == dmsf_workflow_steps.collect{|s| s.step}.uniq.count            
          dmsf_workflow_steps.each do |ws|                            
            if ws.step == step + 1                
             return false unless ws.update_attribute('step', step)
            elsif ws.step == step                
              return false unless ws.update_attribute('step', step + 1)
            end            
          end          
        end
      when 'lowest'                   
        size = dmsf_workflow_steps.collect{|s| s.step}.uniq.count
        unless step == size
          dmsf_workflow_steps.each do |ws|                            
            if ws.step > step                
              return false unless ws.update_attribute('step', ws.step - 1)
            elsif ws.step == step                
              return false unless ws.update_attribute('step', size)
            end
          end            
        end                            
    end     
    return reload    
  end
  
  def delegates(q, dmsf_workflow_step_assignment_id, dmsf_file_revision_id)        
    if dmsf_workflow_step_assignment_id && dmsf_file_revision_id
      sql = [
        'id NOT IN (SELECT a.user_id FROM dmsf_workflow_step_assignments a WHERE id = ?) AND id IN (SELECT m.user_id FROM members m JOIN dmsf_files f ON f.project_id = m.project_id JOIN dmsf_file_revisions r ON r.dmsf_file_id = f.id WHERE r.id = ?)', 
        dmsf_workflow_step_assignment_id, 
        dmsf_file_revision_id]
    else
      sql = '1=1'
    end
    
    unless q.nil? || q.empty?
      User.active.sorted.where(sql).like(q)
    else
      User.active.sorted.where(sql)
    end    
  end
  
  def next_assignments(dmsf_file_revision_id)    
    results = Array.new    
    self.dmsf_workflow_steps.each do |step|      
      break unless results.empty? || results[0].step.step == step.step      
      step.dmsf_workflow_step_assignments.each do |assignment|
        if assignment.dmsf_file_revision_id == dmsf_file_revision_id
          if assignment.dmsf_workflow_step_actions.empty?
            results << assignment
            next
          end
          add = true
          assignment.dmsf_workflow_step_actions.each do |action|
            if action.is_finished?              
              add = false
              break
            end
          end
          results << assignment if add
        end               
      end
    end
    results
  end
  
  def self.assignments_to_users_str(assignments)
    str = ''
    if assignments      
      assignments.each_with_index do |assignment, index|
        user = User.find_by_id assignment.user_id
        if user
          if index > 0
            str << ', '
          end
          str << user.name
        end
      end
    end
    str    
  end
   
  def assign(dmsf_file_revision_id)
    dmsf_workflow_steps.each do |ws|
      ws.assign(dmsf_file_revision_id)
    end
  end
  
  def try_finish(dmsf_file_revision_id, action, user_id)     
    revision = DmsfFileRevision.find_by_id dmsf_file_revision_id
    case action.action
      when DmsfWorkflowStepAction::ACTION_APPROVE        
        self.dmsf_workflow_steps.each do |step|
          step.dmsf_workflow_step_assignments.each do |assignment|
            if assignment.dmsf_file_revision_id == dmsf_file_revision_id.to_i
              if assignment.dmsf_workflow_step_actions.empty?            
                return
              end          
              assignment.dmsf_workflow_step_actions.each do |act|
                return unless act.is_finished?              
              end
            end               
          end      
        end 
        # TODO: update_attribute doesn't wotk in unit tests because of "Couldn't find Project with id=0" error
        revision.update_attribute(:workflow, DmsfWorkflow::STATE_APPROVED) if revision                
      when DmsfWorkflowStepAction::ACTION_REJECT
        revision.update_attribute(:workflow, DmsfWorkflow::STATE_REJECTED) if revision        
      when DmsfWorkflowStepAction::ACTION_DELEGATE
        assignment = DmsfWorkflowStepAssignment.find_by_id(action.dmsf_workflow_step_assignment_id)
        assignment.update_attribute(:user_id, user_id) if assignment
    end
  end
end