Implement SacFamily.update!

Author: daniel-illi

app/domain/people/sac_family.rb

@@ -7,8 +7,6 @@
 
 class People::SacFamily
 
-  FAMILY_MEMBER_ROLE_TYPES = SacCas::MITGLIED_HAUPTSEKTION_ROLES
-
   delegate :household_key, to: '@person'
 
   def initialize(person)
@@ -22,20 +20,22 @@ def initialize(person)
   # - adding a new person to household
   # - adding a new child (managed)
   # - adding a manager to a child (manager)
-  #def update!
-    #update_children
-    #update_adults
-  #end
+  def update!
+    # do nothing unless the reference person has a family membership
+    return unless family_stammsektion
+
+    non_family_housemates.each {|new_family_member| update_membership!(new_family_member) }
+  end
 
   def update_terminated_roles
     terminated_roles = @person
       .roles
-      .where(type: terminatable_family_member_role_types,
+      .where(type: terminatable_member_role_types,
              terminated: true,
              beitragskategorie: :familie)
 
     affected_family_roles = Role
-      .where(type: terminatable_family_member_role_types,
+      .where(type: terminatable_member_role_types,
              group_id: terminated_roles.collect(&:group_id),
              terminated: false,
              beitragskategorie: :familie,
@@ -60,30 +60,87 @@ def member?
       family_stammsektion.present?
   end
 
+  def id
+    return unless member?
+
+    /\AF/ =~ household_key ? household_key : "F#{household_key}"
+  end
+
+  private
+
   def family_members
     return [] unless member?
 
     family_stammsektion.people
-      .distinct
-      .joins(:roles)
-      .where(roles: { type: family_stammsektion_role_types, beitragskategorie: :familie },
-             people: { household_key: @person.household_key })
+                       .distinct
+                       .joins(:roles)
+                       .where(roles: { type: stammsektion_role_types, beitragskategorie: :familie },
+                              people: { household_key: @person.household_key })
   end
 
-  def id
-    return unless member?
+  def adult_family_members
+    family_members.select {|person| category_calculator(person).adult? }
+  end
 
-    /\AF/ =~ household_key ? household_key : "F#{household_key}"
+  def housemates
+    @person.household_people + [@person]
   end
 
-  private
+  def non_family_housemates
+    housemates - family_members
+  end
+
+  def update_membership!(new_family_member)
+    calculator = category_calculator(new_family_member)
+
+    # Only children and adults can join a family membership, but not babies and youth
+    return unless calculator.family_age?
+
+    # A family can not have more than 2 adults.
+    # Additional adults can be in the household, but won't get a family membership.
+    return if calculator.adult? && adult_family_members.size >= 2
+
+    # Do nothing if the person already has any membership related role.
+    return if new_family_member.roles.where(type: all_member_and_neuanmeldung_role_types).exists?
+
+    add_stammsektion_role(new_family_member)
+    add_zusatzsektion_roles(new_family_member)
+  end
+
+  def add_stammsektion_role(new_family_member)
+    add_role_for_person(new_family_member, family_stammsektion_role)
+  end
+
+  def add_zusatzsektion_roles(new_family_member)
+    family_member_role_scope(type: zusatzsektion_role_types).
+      each { |role| add_role_for_person(new_family_member, role) }
+  end
+
+  # Duplicate the existing role and assign the person.
+  def add_role_for_person(person, role)
+    role.dup.tap do |r|
+      r.person = person
+      r.created_at = Time.current
+      # r.delete_on ||= Date.current.end_of_year # TODO: should not be necessary as the original role must have delete_on set
+    end.save!
+  end
 
   def family_stammsektion
-    @family_stammsektion ||=
-      Role.find_by(person: @person,
-                   beitragskategorie: :familie,
-                   type: family_stammsektion_role_types)
-      .try(:group)
+    family_stammsektion_role&.group
+  end
+
+  # Returns the first stammsektion role of any family member found
+  def family_stammsektion_role
+    @family_stammsektion_role ||=
+      family_member_role_scope(type: stammsektion_role_types).first
+  end
+
+  def family_member_role_scope(type:)
+    Role.where(
+      person: @person,
+      beitragskategorie: :familie,
+      type: type
+    )
   end
 
   #def update_children
@@ -95,13 +152,24 @@ def family_stammsektion
      #is there adults in same household that are allowed to get mitglied familie roles?
   #end
 
-  def family_stammsektion_role_types
-    FAMILY_MEMBER_ROLE_TYPES.collect(&:sti_name)
+  def stammsektion_role_types
+    SacCas::MITGLIED_HAUPTSEKTION_ROLES.map(&:sti_name)
+  end
+
+  def zusatzsektion_role_types
+    SacCas::MITGLIED_ZUSATZSEKTION_ROLES.map(&:sti_name)
+  end
+
+  def all_member_and_neuanmeldung_role_types
+    (SacCas::MITGLIED_ROLES + SacCas::NEUANMELDUNG_ROLES).map(&:sti_name)
+  end
+
+  def terminatable_member_role_types
+    SacCas::MITGLIED_ROLES.select(&:terminatable).map(&:sti_name)
   end
 
-  def terminatable_family_member_role_types
-    [Group::SektionsMitglieder::Mitglied,
-     Group::SektionsMitglieder::MitgliedZusatzsektion].collect(&:sti_name)
+  def category_calculator(person)
+    SacCas::Beitragskategorie::Calculator.new(person)
   end
 
 end