536 lines
17 KiB
Ruby
536 lines
17 KiB
Ruby
class ProcedurePresentation < ApplicationRecord
|
||
EXTRA_SORT_COLUMNS = {
|
||
'notifications' => ['notifications'],
|
||
'self' => ['id', 'state']
|
||
}
|
||
|
||
TABLE = 'table'
|
||
COLUMN = 'column'
|
||
ORDER = 'order'
|
||
|
||
SLASH = '/'
|
||
TYPE_DE_CHAMP = 'type_de_champ'
|
||
TYPE_DE_CHAMP_PRIVATE = 'type_de_champ_private'
|
||
|
||
FILTERS_VALUE_MAX_LENGTH = 100
|
||
|
||
belongs_to :assign_to, optional: false
|
||
has_many :exports, dependent: :destroy
|
||
|
||
delegate :procedure, :instructeur, to: :assign_to
|
||
|
||
validate :check_allowed_displayed_fields
|
||
validate :check_allowed_sort_column
|
||
validate :check_allowed_sort_order
|
||
validate :check_allowed_filter_columns
|
||
validate :check_filters_max_length
|
||
|
||
def self_fields
|
||
[
|
||
field_hash('self', 'created_at', type: :date),
|
||
field_hash('self', 'updated_at', type: :date),
|
||
field_hash('self', 'depose_at', type: :date),
|
||
field_hash('self', 'en_construction_at', type: :date),
|
||
field_hash('self', 'en_instruction_at', type: :date),
|
||
field_hash('self', 'processed_at', type: :date),
|
||
*sva_svr_fields(for_filters: true),
|
||
field_hash('self', 'updated_since', type: :date, virtual: true),
|
||
field_hash('self', 'depose_since', type: :date, virtual: true),
|
||
field_hash('self', 'en_construction_since', type: :date, virtual: true),
|
||
field_hash('self', 'en_instruction_since', type: :date, virtual: true),
|
||
field_hash('self', 'processed_since', type: :date, virtual: true),
|
||
field_hash('self', 'state', type: :enum, scope: 'instructeurs.dossiers.filterable_state', virtual: true)
|
||
].compact_blank
|
||
end
|
||
|
||
def fields
|
||
fields = self_fields
|
||
|
||
fields.push(
|
||
field_hash('user', 'email', type: :text),
|
||
field_hash('followers_instructeurs', 'email', type: :text),
|
||
field_hash('groupe_instructeur', 'id', type: :enum),
|
||
field_hash('avis', 'question_answer', filterable: false)
|
||
)
|
||
|
||
if procedure.for_individual
|
||
fields.push(
|
||
field_hash("individual", "prenom", type: :text),
|
||
field_hash("individual", "nom", type: :text),
|
||
field_hash("individual", "gender", type: :text)
|
||
)
|
||
end
|
||
|
||
if !procedure.for_individual
|
||
fields.push(
|
||
field_hash('etablissement', 'entreprise_siren', type: :text),
|
||
field_hash('etablissement', 'entreprise_forme_juridique', type: :text),
|
||
field_hash('etablissement', 'entreprise_nom_commercial', type: :text),
|
||
field_hash('etablissement', 'entreprise_raison_sociale', type: :text),
|
||
field_hash('etablissement', 'entreprise_siret_siege_social', type: :text),
|
||
field_hash('etablissement', 'entreprise_date_creation', type: :date)
|
||
)
|
||
|
||
fields.push(
|
||
field_hash('etablissement', 'siret', type: :text),
|
||
field_hash('etablissement', 'libelle_naf', type: :text),
|
||
field_hash('etablissement', 'code_postal', type: :text)
|
||
)
|
||
end
|
||
|
||
fields.concat(procedure.types_de_champ_for_procedure_presentation
|
||
.pluck(:type_champ, :libelle, :private, :stable_id)
|
||
.reject { |(type_champ)| type_champ == TypeDeChamp.type_champs.fetch(:repetition) }
|
||
.map do |(type_champ, libelle, is_private, stable_id)|
|
||
if is_private
|
||
field_hash_for_type_de_champ_private(type_champ, libelle, stable_id)
|
||
else
|
||
field_hash_for_type_de_champ_public(type_champ, libelle, stable_id)
|
||
end
|
||
end)
|
||
|
||
fields
|
||
end
|
||
|
||
def displayable_fields_for_select
|
||
[
|
||
fields.reject(&:virtual)
|
||
.map { |field| [field.label, field_id(field)] },
|
||
displayed_fields.map { field_id(Facet.new(**_1.deep_symbolize_keys)) }
|
||
]
|
||
end
|
||
|
||
def filterable_fields_options
|
||
fields.filter_map do |field|
|
||
next if field.filterable == false
|
||
|
||
[field.label, field_id(field)]
|
||
end
|
||
end
|
||
|
||
def displayed_fields_for_headers
|
||
[
|
||
field_hash('self', 'id', classname: 'number-col'),
|
||
*displayed_fields.map { Facet.new(**_1.deep_symbolize_keys) },
|
||
field_hash('self', 'state', classname: 'state-col'),
|
||
*sva_svr_fields
|
||
]
|
||
end
|
||
|
||
def sva_svr_fields(for_filters: false)
|
||
return if !procedure.sva_svr_enabled?
|
||
|
||
i18n_scope = [:activerecord, :attributes, :procedure_presentation, :fields, :self]
|
||
|
||
fields = []
|
||
fields << field_hash('self', 'sva_svr_decision_on',
|
||
type: :date,
|
||
label: I18n.t("#{procedure.sva_svr_decision}_decision_on", scope: i18n_scope),
|
||
classname: for_filters ? '' : 'sva-col')
|
||
|
||
if for_filters
|
||
fields << field_hash('self', 'sva_svr_decision_before',
|
||
label: I18n.t("#{procedure.sva_svr_decision}_decision_before", scope: i18n_scope),
|
||
type: :date, virtual: true)
|
||
end
|
||
|
||
fields
|
||
end
|
||
|
||
def sorted_ids(dossiers, count)
|
||
table, column, order = sort.values_at(TABLE, COLUMN, 'order')
|
||
|
||
case table
|
||
when 'notifications'
|
||
dossiers_id_with_notification = dossiers.merge(instructeur.followed_dossiers).with_notifications.ids
|
||
if order == 'desc'
|
||
dossiers_id_with_notification +
|
||
(dossiers.order('dossiers.updated_at desc').ids - dossiers_id_with_notification)
|
||
else
|
||
(dossiers.order('dossiers.updated_at asc').ids - dossiers_id_with_notification) +
|
||
dossiers_id_with_notification
|
||
end
|
||
when TYPE_DE_CHAMP
|
||
ids = dossiers
|
||
.with_type_de_champ(column)
|
||
.order("champs.value #{order}")
|
||
.pluck(:id)
|
||
if ids.size != count
|
||
rest = dossiers.where.not(id: ids).order(id: order).pluck(:id)
|
||
order == 'asc' ? ids + rest : rest + ids
|
||
else
|
||
ids
|
||
end
|
||
when TYPE_DE_CHAMP_PRIVATE
|
||
ids = dossiers
|
||
.with_type_de_champ(column)
|
||
.order("champs.value #{order}")
|
||
.pluck(:id)
|
||
if ids.size != count
|
||
rest = dossiers.where.not(id: ids).order(id: order).pluck(:id)
|
||
order == 'asc' ? ids + rest : rest + ids
|
||
else
|
||
ids
|
||
end
|
||
when 'followers_instructeurs'
|
||
assert_supported_column(table, column)
|
||
# LEFT OUTER JOIN allows to keep dossiers without assigned instructeurs yet
|
||
dossiers
|
||
.includes(:followers_instructeurs)
|
||
.joins('LEFT OUTER JOIN users instructeurs_users ON instructeurs_users.id = instructeurs.user_id')
|
||
.order("instructeurs_users.email #{order}")
|
||
.pluck(:id)
|
||
.uniq
|
||
when 'avis'
|
||
dossiers.includes(table)
|
||
.order("#{self.class.sanitized_column(table, column)} #{order}")
|
||
.pluck(:id)
|
||
.uniq
|
||
when 'self', 'user', 'individual', 'etablissement', 'groupe_instructeur'
|
||
(table == 'self' ? dossiers : dossiers.includes(table))
|
||
.order("#{self.class.sanitized_column(table, column)} #{order}")
|
||
.pluck(:id)
|
||
end
|
||
end
|
||
|
||
def filtered_ids(dossiers, statut)
|
||
filters.fetch(statut)
|
||
.group_by { |filter| filter.values_at(TABLE, COLUMN) }
|
||
.map do |(table, column), filters|
|
||
values = filters.pluck('value')
|
||
value_column = filters.pluck('value_column').compact.first || :value
|
||
case table
|
||
when 'self'
|
||
field = self_fields.find { |h| h.column == column }
|
||
if field.type == :date
|
||
dates = values
|
||
.filter_map { |v| Time.zone.parse(v).beginning_of_day rescue nil }
|
||
|
||
dossiers.filter_by_datetimes(column, dates)
|
||
elsif field.column == "state" && values.include?("pending_correction")
|
||
dossiers.joins(:corrections).where(corrections: DossierCorrection.pending)
|
||
elsif field.column == "state" && values.include?("en_construction")
|
||
dossiers.where("dossiers.#{column} IN (?)", values).includes(:corrections).where.not(corrections: DossierCorrection.pending)
|
||
else
|
||
dossiers.where("dossiers.#{column} IN (?)", values)
|
||
end
|
||
when TYPE_DE_CHAMP
|
||
dossiers.with_type_de_champ(column)
|
||
.filter_ilike(:champs, value_column, values)
|
||
when TYPE_DE_CHAMP_PRIVATE
|
||
dossiers.with_type_de_champ(column)
|
||
.filter_ilike(:champs, value_column, values)
|
||
when 'etablissement'
|
||
if column == 'entreprise_date_creation'
|
||
dates = values
|
||
.filter_map { |v| v.to_date rescue nil }
|
||
|
||
dossiers
|
||
.includes(table)
|
||
.where(table.pluralize => { column => dates })
|
||
else
|
||
dossiers
|
||
.includes(table)
|
||
.filter_ilike(table, column, values)
|
||
end
|
||
when 'followers_instructeurs'
|
||
assert_supported_column(table, column)
|
||
dossiers
|
||
.includes(:followers_instructeurs)
|
||
.joins('INNER JOIN users instructeurs_users ON instructeurs_users.id = instructeurs.user_id')
|
||
.filter_ilike('instructeurs_users', :email, values)
|
||
when 'user', 'individual', 'avis'
|
||
dossiers
|
||
.includes(table)
|
||
.filter_ilike(table, column, values)
|
||
when 'groupe_instructeur'
|
||
assert_supported_column(table, column)
|
||
if column == 'label'
|
||
dossiers
|
||
.joins(:groupe_instructeur)
|
||
.filter_ilike(table, column, values)
|
||
else
|
||
dossiers
|
||
.joins(:groupe_instructeur)
|
||
.where(groupe_instructeur_id: values)
|
||
end
|
||
end.pluck(:id)
|
||
end.reduce(:&)
|
||
end
|
||
|
||
def filtered_sorted_ids(dossiers, statut, count: nil)
|
||
dossiers_by_statut = dossiers.by_statut(statut, instructeur)
|
||
dossiers_sorted_ids = self.sorted_ids(dossiers_by_statut, count || dossiers_by_statut.size)
|
||
|
||
if filters[statut].present?
|
||
dossiers_sorted_ids.intersection(filtered_ids(dossiers_by_statut, statut))
|
||
else
|
||
dossiers_sorted_ids
|
||
end
|
||
end
|
||
|
||
def human_value_for_filter(filter)
|
||
if [TYPE_DE_CHAMP, TYPE_DE_CHAMP_PRIVATE].include?(filter[TABLE])
|
||
find_type_de_champ(filter[COLUMN]).dynamic_type.filter_to_human(filter['value'])
|
||
elsif filter['column'] == 'state'
|
||
if filter['value'] == 'pending_correction'
|
||
Dossier.human_attribute_name("pending_correction.for_instructeur")
|
||
else
|
||
Dossier.human_attribute_name("state.#{filter['value']}")
|
||
end
|
||
elsif filter['table'] == 'groupe_instructeur' && filter['column'] == 'id'
|
||
instructeur.groupe_instructeurs
|
||
.find { _1.id == filter['value'].to_i }&.label || filter['value']
|
||
else
|
||
field = find_field(filter[TABLE], filter[COLUMN])
|
||
|
||
if field.type == :date
|
||
parsed_date = safe_parse_date(filter['value'])
|
||
|
||
return parsed_date.present? ? I18n.l(parsed_date) : nil
|
||
end
|
||
|
||
filter['value']
|
||
end
|
||
end
|
||
|
||
def safe_parse_date(string)
|
||
Date.parse(string)
|
||
rescue Date::Error
|
||
nil
|
||
end
|
||
|
||
def add_filter(statut, field, value)
|
||
if value.present?
|
||
table, column = field.split(SLASH)
|
||
label = find_field(table, column).label
|
||
value_column = find_field(table, column).value_column
|
||
|
||
case table
|
||
when TYPE_DE_CHAMP, TYPE_DE_CHAMP_PRIVATE
|
||
value = find_type_de_champ(column).dynamic_type.human_to_filter(value)
|
||
end
|
||
|
||
updated_filters = filters.dup
|
||
updated_filters[statut] << {
|
||
'label' => label,
|
||
TABLE => table,
|
||
COLUMN => column,
|
||
'value_column' => value_column,
|
||
'value' => value
|
||
}
|
||
|
||
update(filters: updated_filters)
|
||
end
|
||
end
|
||
|
||
def remove_filter(statut, field, value)
|
||
table, column = field.split(SLASH)
|
||
|
||
updated_filters = filters.dup
|
||
updated_filters[statut] = filters[statut].reject do |filter|
|
||
filter.values_at(TABLE, COLUMN, 'value') == [table, column, value]
|
||
end
|
||
|
||
update!(filters: updated_filters)
|
||
end
|
||
|
||
def update_displayed_fields(values)
|
||
if values.nil?
|
||
values = []
|
||
end
|
||
|
||
fields = values.map { |value| find_field(*value.split(SLASH)) }
|
||
|
||
update!(displayed_fields: fields)
|
||
|
||
if !values.include?(field_id(sort))
|
||
update!(sort: Procedure.default_sort)
|
||
end
|
||
end
|
||
|
||
def update_sort(table, column, order)
|
||
update!(sort: {
|
||
TABLE => table,
|
||
COLUMN => column,
|
||
ORDER => order.presence || opposite_order_for(table, column)
|
||
})
|
||
end
|
||
|
||
def opposite_order_for(table, column)
|
||
if sort.values_at(TABLE, COLUMN) == [table, column]
|
||
sort['order'] == 'asc' ? 'desc' : 'asc'
|
||
elsif [table, column] == ["notifications", "notifications"]
|
||
'desc' # default order for notifications
|
||
else
|
||
'asc'
|
||
end
|
||
end
|
||
|
||
def snapshot
|
||
slice(:filters, :sort, :displayed_fields)
|
||
end
|
||
|
||
def field_type(field_id)
|
||
find_field(*field_id.split(SLASH)).type
|
||
end
|
||
|
||
def field_enum(field_id)
|
||
field = find_field(*field_id.split(SLASH))
|
||
if field.scope.present?
|
||
I18n.t(field.scope).map(&:to_a).map(&:reverse)
|
||
elsif field.table == 'groupe_instructeur'
|
||
instructeur.groupe_instructeurs.filter_map do
|
||
if _1.procedure_id == procedure.id
|
||
[_1.label, _1.id]
|
||
end
|
||
end
|
||
else
|
||
find_type_de_champ(field.column).options_for_select
|
||
end
|
||
end
|
||
|
||
def sortable?(field)
|
||
sort['table'] == field.table &&
|
||
sort['column'] == field.column
|
||
end
|
||
|
||
def aria_sort(order, field)
|
||
if sortable?(field)
|
||
if order == 'asc'
|
||
{ "aria-sort": "ascending" }
|
||
elsif order == 'desc'
|
||
{ "aria-sort": "descending" }
|
||
end
|
||
else
|
||
{}
|
||
end
|
||
end
|
||
|
||
private
|
||
|
||
# type_de_champ/4373429
|
||
def field_id(field_or_sort)
|
||
if field_or_sort.is_a?(Hash)
|
||
sort = field_or_sort
|
||
[sort[TABLE], sort[COLUMN]].join(SLASH)
|
||
else
|
||
field = field_or_sort
|
||
if field.label == 'rna – commune'
|
||
"#{[field.table, field.column].join(SLASH)}->#{field.value_column}"
|
||
else
|
||
[field.table, field.column].join(SLASH)
|
||
end
|
||
end
|
||
end
|
||
|
||
def find_field(table, column)
|
||
fields.find { [_1.table, _1.column] == [table, column] }
|
||
end
|
||
|
||
def find_type_de_champ(column)
|
||
TypeDeChamp
|
||
.joins(:revision_types_de_champ)
|
||
.where(revision_types_de_champ: { revision_id: procedure.revisions })
|
||
.order(created_at: :desc)
|
||
.find_by(stable_id: column)
|
||
end
|
||
|
||
def check_allowed_displayed_fields
|
||
displayed_fields.each do |field|
|
||
check_allowed_field(:displayed_fields, field)
|
||
end
|
||
end
|
||
|
||
def check_allowed_sort_column
|
||
check_allowed_field(:sort, sort, EXTRA_SORT_COLUMNS)
|
||
end
|
||
|
||
def check_allowed_sort_order
|
||
order = sort['order']
|
||
if !["asc", "desc"].include?(order)
|
||
errors.add(:sort, "#{order} n’est pas une ordre permis")
|
||
end
|
||
end
|
||
|
||
def check_allowed_filter_columns
|
||
filters.each do |key, columns|
|
||
return true if key == 'migrated'
|
||
columns.each do |column|
|
||
check_allowed_field(:filters, column)
|
||
end
|
||
end
|
||
end
|
||
|
||
def check_allowed_field(kind, field, extra_columns = {})
|
||
table, column = field.values_at(TABLE, COLUMN)
|
||
if !valid_column?(table, column, extra_columns)
|
||
errors.add(kind, "#{table}.#{column} n’est pas une colonne permise")
|
||
end
|
||
end
|
||
|
||
def check_filters_max_length
|
||
filters.values.flatten.each do |filter|
|
||
next if !filter.is_a?(Hash)
|
||
next if filter['value']&.length.to_i <= FILTERS_VALUE_MAX_LENGTH
|
||
|
||
errors.add(:base, "Le filtre #{filter['label']} est trop long (maximum: #{FILTERS_VALUE_MAX_LENGTH} caractères)")
|
||
end
|
||
end
|
||
|
||
def field_hash(table, column, label: nil, classname: '', virtual: false, type: :text, scope: '', value_column: :value, filterable: true)
|
||
Facet.new(table:, column:, label:, classname:, virtual:, type:, scope:, value_column:, filterable:)
|
||
end
|
||
|
||
def field_hash_for_type_de_champ_public(type_champ, libelle, stable_id)
|
||
field_hash(TYPE_DE_CHAMP, stable_id.to_s,
|
||
label: libelle,
|
||
type: TypeDeChamp.filter_hash_type(type_champ),
|
||
value_column: TypeDeChamp.filter_hash_value_column(type_champ))
|
||
end
|
||
|
||
def field_hash_for_type_de_champ_private(type_champ, libelle, stable_id)
|
||
field_hash(TYPE_DE_CHAMP_PRIVATE, stable_id.to_s,
|
||
label: libelle,
|
||
type: TypeDeChamp.filter_hash_type(type_champ),
|
||
value_column: TypeDeChamp.filter_hash_value_column(type_champ))
|
||
end
|
||
|
||
def valid_column?(table, column, extra_columns = {})
|
||
valid_columns_for_table(table).include?(column) ||
|
||
extra_columns[table]&.include?(column)
|
||
end
|
||
|
||
def valid_columns_for_table(table)
|
||
@column_whitelist ||= fields
|
||
.group_by(&:table)
|
||
.transform_values { |facets| Set.new(facets.map(&:column)) }
|
||
|
||
@column_whitelist[table] || []
|
||
end
|
||
|
||
def self.sanitized_column(association, column)
|
||
table = if association == 'self'
|
||
Dossier.table_name
|
||
elsif (association_reflection = Dossier.reflect_on_association(association))
|
||
association_reflection.klass.table_name
|
||
else
|
||
# Allow filtering on a joined table alias (which doesn’t exist
|
||
# in the ActiveRecord domain).
|
||
association
|
||
end
|
||
|
||
[table, column]
|
||
.map { |name| ActiveRecord::Base.connection.quote_column_name(name) }
|
||
.join('.')
|
||
end
|
||
|
||
def assert_supported_column(table, column)
|
||
if table == 'followers_instructeurs' && column != 'email'
|
||
raise ArgumentError, 'Table `followers_instructeurs` only supports the `email` column.'
|
||
end
|
||
if table == 'groupe_instructeur' && (column != 'label' && column != 'id')
|
||
raise ArgumentError, 'Table `groupe_instructeur` only supports the `label` or `id` column.'
|
||
end
|
||
end
|
||
end
|