3 /* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
10 * Copyright © 2009-2021 The Galette Team
12 * This file is part of Galette (http://galette.tuxfamily.org).
14 * Galette is free software: you can redistribute it and/or modify
15 * it under the terms of the GNU General Public License as published by
16 * the Free Software Foundation, either version 3 of the License, or
17 * (at your option) any later version.
19 * Galette is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 * GNU General Public License for more details.
24 * You should have received a copy of the GNU General Public License
25 * along with Galette. If not, see <http://www.gnu.org/licenses/>.
27 * @category Repository
30 * @author Johan Cwiklinski <johan@x-tnd.be>
31 * @copyright 2009-2021 The Galette Team
32 * @license http://www.gnu.org/licenses/gpl-3.0.html GPL License 3.0 or (at your option) any later version
33 * @link http://galette.tuxfamily.org
34 * @since Available since 0.7dev - 2009-02-28
37 namespace Galette\Repository
;
39 use Galette\Entity\Social
;
41 use Galette\DynamicFields\DynamicField
;
42 use Galette\Entity\DynamicFieldsHandle
;
44 use Laminas\Db\Adapter\Adapter
;
45 use Laminas\Db\Sql\Expression
;
46 use Laminas\Db\Sql\Select
;
47 use Laminas\Db\Sql\Predicate\PredicateSet
;
48 use Laminas\Db\Sql\Predicate\Operator
;
49 use Galette\Entity\Adherent
;
50 use Galette\Entity\Contribution
;
51 use Galette\Entity\Transaction
;
52 use Galette\Entity\Reminder
;
53 use Galette\Filters\MembersList
;
54 use Galette\Filters\AdvancedMembersList
;
55 use Galette\Core\Picture
;
56 use Galette\Entity\Group
;
57 use Galette\Repository\Groups
;
58 use Galette\Entity\Status
;
62 * Members class for galette
65 * @category Repository
68 * @author Johan Cwiklinski <johan@x-tnd.be>
69 * @copyright 2009-2021 The Galette Team
70 * @license http://www.gnu.org/licenses/gpl-3.0.html GPL License 3.0 or (at your option) any later version
71 * @link http://galette.tuxfamily.org
75 public const TABLE
= Adherent
::TABLE
;
76 public const PK
= Adherent
::PK
;
78 public const ALL_ACCOUNTS
= 0;
79 public const ACTIVE_ACCOUNT
= 1;
80 public const INACTIVE_ACCOUNT
= 2;
82 public const SHOW_LIST
= 0;
83 public const SHOW_PUBLIC_LIST
= 1;
84 public const SHOW_ARRAY_LIST
= 2;
85 public const SHOW_STAFF
= 3;
86 public const SHOW_MANAGED
= 4;
87 public const SHOW_EXPORT
= 5;
89 public const FILTER_NAME
= 0;
90 public const FILTER_ADDRESS
= 1;
91 public const FILTER_MAIL
= 2;
92 public const FILTER_JOB
= 3;
93 public const FILTER_INFOS
= 4;
94 public const FILTER_DC_EMAIL
= 5;
95 public const FILTER_W_EMAIL
= 6;
96 public const FILTER_WO_EMAIL
= 7;
97 public const FILTER_COMPANY_NAME
= 8;
98 public const FILTER_DC_PUBINFOS
= 9;
99 public const FILTER_W_PUBINFOS
= 10;
100 public const FILTER_WO_PUBINFOS
= 11;
101 public const FILTER_ID
= 12;
102 public const FILTER_NUMBER
= 13;
104 public const MEMBERSHIP_ALL
= 0;
105 public const MEMBERSHIP_UP2DATE
= 3;
106 public const MEMBERSHIP_NEARLY
= 1;
107 public const MEMBERSHIP_LATE
= 2;
108 public const MEMBERSHIP_NEVER
= 4;
109 public const MEMBERSHIP_STAFF
= 5;
110 public const MEMBERSHIP_ADMIN
= 6;
111 public const MEMBERSHIP_NONE
= 7;
113 public const ORDERBY_NAME
= 'name';
114 public const ORDERBY_NICKNAME
= 'nickname';
115 public const ORDERBY_STATUS
= 'status';
116 public const ORDERBY_FEE_STATUS
= 'fee_status';
117 public const ORDERBY_MODIFDATE
= 'modif_date';
118 public const ORDERBY_ID
= 'id';
120 public const NON_STAFF_MEMBERS
= 30;
122 private $filters = false;
123 private $count = null;
124 private $errors = array();
127 * Default constructor
129 * @param MembersList $filters Filtering
131 public function __construct($filters = null)
133 if ($filters === null) {
134 $this->filters
= new MembersList();
136 $this->filters
= $filters;
141 * Get staff members list
143 * @param bool $as_members return the results as an array of
145 * @param array $fields field(s) name(s) to get. Should be a string or
146 * an array. If null, all fields will be
148 * @param boolean $count true if we want to count members
149 * @param boolean $limit true to LIMIT query
151 * @return Adherent[]|ResultSet
153 public function getStaffMembersList(
159 return $this->getMembersList(
170 * Get managed members list (for groups managers)
172 * @param bool $as_members return the results as an array of
174 * @param array $fields field(s) name(s) to get. Should be a string or
175 * an array. If null, all fields will be
177 * @param boolean $count true if we want to count members
178 * @param boolean $limit true to LIMIT query
180 * @return Adherent[]|ResultSet
182 public function getManagedMembersList(
188 return $this->getMembersList(
201 * @param bool $as_members return the results as an array of
203 * @param array $fields field(s) name(s) to get. Should be a string or
204 * an array. If null, all fields will be
206 * @param boolean $count true if we want to count members
207 * @param boolean $staff true if we want only staff members
208 * @param boolean $managed true if we want only managed groups
209 * @param boolean $limit true if we want records pagination
210 * @param boolean $export true if we are exporting
212 * @return Adherent[]|Laminas\Db\ResultSet
214 public function getMembersList(
225 if ($limit === true) {
226 //force count if limit is active
231 $_mode = self
::SHOW_LIST
;
232 if ($staff !== false) {
233 $_mode = self
::SHOW_STAFF
;
235 if ($managed !== false) {
236 $_mode = self
::SHOW_MANAGED
;
238 if ($export !== false) {
239 $_mode = self
::SHOW_EXPORT
;
242 $select = $this->buildSelect(
249 //add limits to retrieve only relavant rows
250 if ($limit === true) {
251 $this->filters
->setLimits($select);
254 $rows = $zdb->execute($select);
255 $this->filters
->query
= $zdb->query_string
;
263 foreach ($rows as $row) {
264 $members[] = new Adherent($zdb, $row, $deps);
270 } catch (Throwable
$e) {
272 'Cannot list members | ' . $e->getMessage(),
280 * Remove specified members
282 * @param integer|array $ids Members identifiers to delete
286 public function removeMembers($ids)
288 global $zdb, $hist, $emitter;
290 $processed = array();
292 if (is_array($ids)) {
294 } elseif (is_numeric($ids)) {
301 $zdb->connection
->beginTransaction();
303 //Retrieve some information
304 $select = $zdb->select(self
::TABLE
);
306 array(self
::PK
, 'nom_adh', 'prenom_adh', 'email_adh')
307 )->where
->in(self
::PK
, $list);
309 $results = $zdb->execute($select);
312 foreach ($results as $member) {
313 $str_adh = $member->id_adh
. ' (' . $member->nom_adh
. ' ' .
314 $member->prenom_adh
. ')';
315 $infos .= $str_adh . "\n";
317 $p = new Picture($member->id_adh
);
318 if ($p->hasPicture()) {
319 if (!$p->delete(false)) {
321 'Unable to delete picture for member ' . $str_adh,
324 throw new \
Exception(
325 'Unable to delete picture for member ' .
330 _T("Member Picture deleted"),
337 'id_adh' => $member->id_adh
,
338 'nom_adh' => $member->nom_adh
,
339 'prenom_adh' => $member->prenom_adh
,
340 'email_adh' => $member->email_adh
344 //delete contributions
345 $del_qry = $zdb->delete(Contribution
::TABLE
);
350 $zdb->execute($del_qry);
353 $select = $zdb->select(Transaction
::TABLE
);
354 $select->where
->in(self
::PK
, $list);
355 $results = $zdb->execute($select);
357 //if members has transactions;
358 //reset link with other contributions
360 if ($results->count() > 0) {
362 foreach ($results as $transaction) {
363 $transactions[] = $transaction[Transaction
::PK
];
366 $update = $zdb->update(Contribution
::TABLE
);
368 Transaction
::PK
=> new Expression('NULL')
373 $zdb->execute($update);
376 //delete transactions
377 $del_qry = $zdb->delete(Transaction
::TABLE
);
378 $del_qry->where
->in(self
::PK
, $list);
379 $zdb->execute($del_qry);
381 //delete groups membership/mamagmentship
382 Groups
::removeMembersFromGroups($list);
385 $del_qry = $zdb->delete(Reminder
::TABLE
);
390 $zdb->execute($del_qry);
392 //delete dynamic fields values
393 $del_qry = $zdb->delete(DynamicFieldsHandle
::TABLE
);
394 $del_qry->where(['field_form' => 'adh']);
395 $del_qry->where
->in('item_id', $list);
396 $zdb->execute($del_qry);
399 $del_qry = $zdb->delete(self
::TABLE
);
404 $zdb->execute($del_qry);
407 $zdb->connection
->commit();
409 foreach ($processed as $p) {
410 $emitter->emit('member.remove', $p);
413 //add an history entry
415 _T("Delete members cards, transactions and dues"),
420 } catch (Throwable
$e) {
421 $zdb->connection
->rollBack();
422 if ($e->getCode() == 23000) {
424 'Member still have existing dependencies in the ' .
425 'database, maybe a mailing or some content from a ' .
426 'plugin. Please remove dependencies before trying ' .
430 $this->errors
[] = _T("Cannot remove a member who still have dependencies (mailings, ...)");
433 'Unable to delete selected member(s) |' .
446 * @param boolean $as_members return the results as an array of
448 * @param array $fields field(s) name(s) to get. Should be a string or
449 * an array. If null, all fields will be
452 * @return Adherent[]|ResultSet
454 public function getList($as_members = false, $fields = null)
456 return $this->getMembersList(
468 * Get members list with public information available
470 * @param boolean $with_photos get only members which have uploaded a
471 * photo (for trombinoscope)
475 public function getPublicList($with_photos)
480 $select = $this->buildSelect(
481 self
::SHOW_PUBLIC_LIST
,
487 $this->filters
->setLimits($select);
489 $results = $zdb->execute($select);
494 'picture' => $with_photos
496 foreach ($results as $row) {
497 $members[] = new Adherent($zdb, $row, $deps);
500 } catch (Throwable
$e) {
502 'Cannot list members with public information (photos: '
503 . $with_photos . ') | ' . $e->getMessage(),
511 * Get list of members that has been selected
513 * @param array $ids an array of members id that has been selected
514 * @param array $orderby SQL order clause (optionnal)
515 * @param boolean $with_photos Should photos be loaded?
516 * @param boolean $as_members Return Adherent[] or simple ResultSet
517 * @param array $fields Fields to use
518 * @param boolean $export True if we are exporting
519 * @param boolean $dues True if load dues as Adherent dependency
520 * @param boolean $parent True if load parent as Adherent dependency
524 public function getArrayList(
527 $with_photos = false,
536 if (!is_array($ids) ||
count($ids) < 1) {
537 Analog
::log('No member selected for labels.', Analog
::INFO
);
542 $damode = self
::SHOW_ARRAY_LIST
;
543 if ($export === true) {
544 $damode = self
::SHOW_EXPORT
;
546 $select = $this->buildSelect(
552 $select->where
->in('a.' . self
::PK
, $ids);
553 if (is_array($orderby) && count($orderby) > 0) {
554 foreach ($orderby as $o) {
559 $results = $zdb->execute($select);
563 'picture' => $with_photos,
568 foreach ($results as $o) {
569 if ($as_members === true) {
570 $members[] = new Adherent($zdb, $o, $deps);
576 } catch (Throwable
$e) {
578 'Cannot load members form ids array | ' . $e->getMessage(),
586 * Builds the SELECT statement
588 * @param int $mode the current mode (see self::SHOW_*)
589 * @param array $fields fields list to retrieve
590 * @param bool $photos true if we want to get only members with photos
591 * Default to false, only relevant for SHOW_PUBLIC_LIST
592 * @param bool $count true if we want to count members, defaults to false
594 * @return Select SELECT statement
596 private function buildSelect($mode, $fields, $photos, $count = false): Select
601 if ($fields != null && is_array($fields) && !in_array('id_adh', $fields)) {
602 $fields[] = 'id_adh';
604 $fieldsList = ($fields != null)
605 ?
((!is_array($fields) ||
count($fields) < 1) ?
(array)'*'
606 : $fields) : (array)'*';
608 $select = $zdb->select(self
::TABLE
, 'a');
610 $select->columns($fieldsList);
612 $select->quantifier('DISTINCT');
615 array('so' => PREFIX_DB
. Social
::TABLE
),
616 'a.' . Adherent
::PK
. '=so.' . Adherent
::PK
,
622 case self
::SHOW_STAFF
:
623 case self
::SHOW_LIST
:
624 case self
::SHOW_ARRAY_LIST
:
625 case self
::SHOW_EXPORT
:
627 array('status' => PREFIX_DB
. Status
::TABLE
),
628 'a.' . Status
::PK
. '=status.' . Status
::PK
,
632 case self
::SHOW_MANAGED
:
634 array('status' => PREFIX_DB
. Status
::TABLE
),
635 'a.' . Status
::PK
. '=status.' . Status
::PK
637 array('gr' => PREFIX_DB
. Group
::GROUPSUSERS_TABLE
),
638 'a.' . Adherent
::PK
. '=gr.' . Adherent
::PK
,
641 array('m' => PREFIX_DB
. Group
::GROUPSMANAGERS_TABLE
),
642 'gr.' . Group
::PK
. '=m.' . Group
::PK
,
644 )->where(['m.' . Adherent
::PK
=> $login->id
]);
646 case self
::SHOW_PUBLIC_LIST
:
649 array('picture' => PREFIX_DB
. Picture
::TABLE
),
650 'a.' . self
::PK
. '= picture.' . self
::PK
,
657 //check for contributions filtering
659 $this->filters
instanceof AdvancedMembersList
660 && $this->filters
->withinContributions()
663 array('ct' => PREFIX_DB
. Contribution
::TABLE
),
664 'ct.' . self
::PK
. '=a.' . self
::PK
,
670 //check if there are dynamic fields in filter
673 if ($this->filters
instanceof AdvancedMembersList
) {
675 (bool)count($this->filters
->free_search
)
676 && !isset($this->filters
->free_search
['empty'])
678 $free_searches = $this->filters
->free_search
;
679 foreach ($free_searches as $fs) {
680 if (strpos($fs['field'], 'dyn_') === 0) {
681 // simple dynamic fields
683 $dfs[] = str_replace('dyn_', '', $fs['field']);
689 //check if there are dynamic fields for contributions in filter
695 $this->filters
instanceof AdvancedMembersList
696 && $this->filters
->withinContributions()
699 $this->filters
->contrib_dynamic
700 && count($this->filters
->contrib_dynamic
) > 0
701 && !isset($this->filters
->contrib_dynamic
['empty'])
705 //check if there are dynamic fields in the filter
706 foreach ($this->filters
->contrib_dynamic
as $k => $cd) {
715 if ($hasDfc === true ||
$hasCdfc === true) {
717 array('dfc' => PREFIX_DB
. DynamicFieldsHandle
::TABLE
),
718 'dfc.item_id=ct.' . Contribution
::PK
,
724 // simple dynamic fields
725 if ($hasDf === true) {
726 foreach ($dfs as $df) {
727 $subselect = $zdb->select(DynamicFieldsHandle
::TABLE
, 'df');
730 'item_id' => 'item_id',
734 $subselect->where(['df.field_form' => 'adh']);
735 $subselect->where(['df.field_id' => $df]);
737 array('df' . $df => $subselect),
738 'a.id_adh = df' . $df . '.item_id',
745 // choice dynamic fields
746 if ($hasCdfc === true) {
747 $cdf_field = 'cdf.id';
748 if (TYPE_DB
=== 'pgsql') {
749 $cdf_field .= '::text';
752 $cdf_field = 'cdfc.id';
753 if (TYPE_DB
=== 'pgsql') {
754 $cdf_field .= '::text';
756 foreach ($cdfcs as $cdf) {
757 $rcdf_field = str_replace(
763 array('cdfc' . $cdf => DynamicField
::getFixedValuesTableName($cdf, true)),
764 $rcdf_field . '=dfc.field_val',
771 if ($mode == self
::SHOW_LIST ||
$mode == self
::SHOW_MANAGED
) {
772 if ($this->filters
!== false) {
773 $this->buildWhereClause($select);
775 } elseif ($mode == self
::SHOW_PUBLIC_LIST
) {
788 new Expression('true')
798 new Expression('true')
803 new Expression('true')
812 if ($mode === self
::SHOW_STAFF
) {
813 $select->where
->lessThan(
814 'status.priorite_statut',
815 self
::NON_STAFF_MEMBERS
820 $this->proceedCount($select);
823 $this->buildOrderClause($select, $fields);
826 } catch (Throwable
$e) {
828 'Cannot build SELECT clause for members | ' . $e->getMessage(),
836 * Count members from the query
838 * @param Select $select Original select
842 private function proceedCount(Select
$select)
847 $countSelect = clone $select;
848 $countSelect->reset($countSelect::COLUMNS
);
849 $countSelect->reset($countSelect::ORDER
);
850 $countSelect->reset($countSelect::HAVING
);
851 $joins = $countSelect->joins
;
852 $countSelect->reset($countSelect::JOINS
);
853 foreach ($joins as $join) {
860 unset($join['columns']);
862 $countSelect->columns(
864 'count' => new Expression('count(DISTINCT a.' . self
::PK
. ')')
868 $have = $select->having
;
869 if ($have->count() > 0) {
870 foreach ($have->getPredicates() as $h) {
871 $countSelect->where($h);
875 $results = $zdb->execute($countSelect);
877 $this->count
= (int)$results->current()->count
;
878 if (isset($this->filters
) && $this->count
> 0) {
879 $this->filters
->setCounter($this->count
);
881 } catch (Throwable
$e) {
883 'Cannot count members | ' . $e->getMessage(),
891 * Builds the order clause
893 * @param Select $select Original select
894 * @param array $fields Fields list to ensure ORDER clause
895 * references selected fields. Optional.
899 private function buildOrderClause(Select
$select, $fields = null): Select
903 switch ($this->filters
->orderby
) {
904 case self
::ORDERBY_NICKNAME
:
905 if ($this->canOrderBy('pseudo_adh', $fields)) {
906 $order[] = 'pseudo_adh ' . $this->filters
->getDirection();
909 case self
::ORDERBY_STATUS
:
910 if ($this->canOrderBy('priorite_statut', $fields)) {
911 $order[] = 'priorite_statut ' . $this->filters
->getDirection();
914 case self
::ORDERBY_MODIFDATE
:
915 if ($this->canOrderBy('date_modif_adh', $fields)) {
916 $order[] = 'date_modif_adh ' . $this->filters
->getDirection();
919 case 'list_adh_contribstatus':
920 case self
::ORDERBY_FEE_STATUS
:
921 if ($this->canOrderBy('bool_exempt_adh', $fields)) {
922 $order[] = 'bool_exempt_adh ' . $this->filters
->getDirection();
925 if ($this->canOrderBy('date_echeance', $fields)) {
926 $order[] = 'date_echeance ' . $this->filters
->getDirection();
929 case self
::ORDERBY_ID
:
930 if ($this->canOrderBy('id_adh', $fields)) {
931 $order[] = 'id_adh ' . $this->filters
->getDirection();
934 case 'list_adh_name':
937 case self
::ORDERBY_NAME
:
941 if ($this->canOrderBy($this->filters
->orderby
, $fields)) {
942 $order[] = $this->filters
->orderby
. ' ' . $this->filters
->getDirection();
947 //anyways, we want to order by firstname, lastname
948 if ($this->canOrderBy('nom_adh', $fields)) {
949 $order[] = 'nom_adh ' . $this->filters
->getDirection();
951 if ($this->canOrderBy('prenom_adh', $fields)) {
952 $order[] = 'prenom_adh ' . $this->filters
->getDirection();
955 $select->order($order);
960 * Is field allowed to order? it shoulsd be present in
961 * provided fields list (those that are SELECT'ed).
963 * @param string $field_name Field name to order by
964 * @param array $fields SELECTE'ed fields
968 private function canOrderBy($field_name, $fields)
970 if ($fields === null) {
972 } elseif (!is_array($fields)) {
974 } elseif (in_array($field_name, $fields)) {
978 'Trying to order by ' . $field_name . ' while it is not in ' .
987 * Builds where clause, for filtering on simple list mode
989 * @param Select $select Original select
993 private function buildWhereClause(Select
$select)
998 if ($this->filters
->email_filter
== self
::FILTER_W_EMAIL
) {
999 $select->where('email_adh != \'\'');
1001 if ($this->filters
->email_filter
== self
::FILTER_WO_EMAIL
) {
1002 $select->where('(email_adh = \'\' OR email_adh IS NULL)');
1005 if ($this->filters
->filter_str
!= '') {
1006 $token = $zdb->platform
->quoteValue(
1007 '%' . strtolower($this->filters
->filter_str
) . '%'
1009 switch ($this->filters
->field_filter
) {
1010 case self
::FILTER_NAME
:
1011 if (TYPE_DB
=== 'pgsql') {
1012 $sep = " || ' ' || ";
1023 $pre . 'LOWER(nom_adh)' . $sep .
1024 'LOWER(prenom_adh)' . $sep .
1025 'LOWER(pseudo_adh)' . $post . ' LIKE ' .
1028 $pre . 'LOWER(prenom_adh)' . $sep .
1029 'LOWER(nom_adh)' . $sep .
1030 'LOWER(pseudo_adh)' . $post . ' LIKE ' .
1035 case self
::FILTER_COMPANY_NAME
:
1037 'LOWER(societe_adh) LIKE ' .
1041 case self
::FILTER_ADDRESS
:
1044 'LOWER(adresse_adh) LIKE ' . $token
1046 'LOWER(adresse2_adh) LIKE ' . $token
1048 'cp_adh LIKE ' . $token
1050 'LOWER(ville_adh) LIKE ' . $token
1052 'LOWER(pays_adh) LIKE ' . $token
1056 case self
::FILTER_MAIL
:
1059 'LOWER(email_adh) LIKE ' . $token
1061 'LOWER(so.url) LIKE ' . $token
1065 case self
::FILTER_JOB
:
1067 'LOWER(prof_adh) LIKE ' . $token
1070 case self
::FILTER_INFOS
:
1072 if ($login->isAdmin() ||
$login->isStaff()) {
1073 $more = ' OR LOWER(info_adh) LIKE ' . $token;
1076 '(LOWER(info_public_adh) LIKE ' .
1077 $token . $more . ')'
1080 case self
::FILTER_NUMBER
:
1081 $select->where
->equalTo('a.num_adh', $this->filters
->filter_str
);
1083 case self
::FILTER_ID
:
1084 $select->where
->equalTo('a.id_adh', $this->filters
->filter_str
);
1089 if ($this->filters
->membership_filter
) {
1090 switch ($this->filters
->membership_filter
) {
1091 case self
::MEMBERSHIP_NEARLY
:
1092 $now = new \
DateTime();
1093 $duedate = new \
DateTime();
1094 $duedate->modify('+1 month');
1095 $select->where
->greaterThan(
1097 $now->format('Y-m-d')
1098 )->lessThanOrEqualTo(
1100 $duedate->format('Y-m-d')
1103 case self
::MEMBERSHIP_LATE
:
1107 date('Y-m-d', time())
1108 )->equalTo('bool_exempt_adh', new Expression('false'));
1110 case self
::MEMBERSHIP_UP2DATE
:
1112 '(' . 'date_echeance >= \'' . date('Y-m-d', time())
1113 . '\' OR bool_exempt_adh=true)'
1116 case self
::MEMBERSHIP_NEVER
:
1117 $select->where('date_echeance IS NULL')
1118 ->where('bool_exempt_adh = false');
1120 case self
::MEMBERSHIP_STAFF
:
1121 $select->where
->lessThan(
1122 'status.priorite_statut',
1123 self
::NON_STAFF_MEMBERS
1126 case self
::MEMBERSHIP_ADMIN
:
1127 $select->where
->equalTo('bool_admin_adh', true);
1129 case self
::MEMBERSHIP_NONE
:
1130 $select->where
->equalTo('a.id_statut', Status
::DEFAULT_STATUS
);
1135 if ($this->filters
->filter_account
) {
1136 switch ($this->filters
->filter_account
) {
1137 case self
::ACTIVE_ACCOUNT
:
1138 $select->where('activite_adh=true');
1140 case self
::INACTIVE_ACCOUNT
:
1141 $select->where('activite_adh=false');
1146 if ($this->filters
->group_filter
) {
1148 array('g' => PREFIX_DB
. Group
::GROUPSUSERS_TABLE
),
1149 'a.' . Adherent
::PK
. '=g.' . Adherent
::PK
,
1153 array('gs' => PREFIX_DB
. Group
::TABLE
),
1154 'gs.' . Group
::PK
. '=g.' . Group
::PK
,
1158 '(g.' . Group
::PK
. ' = ' . $zdb->platform
->quoteValue($this->filters
->group_filter
) .
1159 ' OR gs.parent_group = NULL OR gs.parent_group = ' .
1160 $this->filters
->group_filter
. ')'
1164 if ($this->filters
instanceof AdvancedMembersList
) {
1165 $this->buildAdvancedWhereClause($select);
1169 } catch (Throwable
$e) {
1171 __METHOD__
. ' | ' . $e->getMessage(),
1179 * Builds where clause, for advanced filtering on simple list mode
1181 * @param Select $select Original select
1185 private function buildAdvancedWhereClause(Select
$select)
1187 global $zdb, $login;
1189 // Search members who belong to any (OR) or all (AND) listed groups.
1190 // Idea is to build an array of members ID that fits groups selection
1191 // we will use in the final query.
1192 // The OR case is quite simple, AND is a bit more complex; since we must
1193 // check each member do belongs to all listed groups.
1195 count($this->filters
->groups_search
) > 0
1196 && !isset($this->filters
->groups_search
['empty'])
1201 foreach ($this->filters
->groups_search
as $gs) { // then add a row for each group
1202 $wheregroups[] = $gs['group'];
1205 $gselect = $zdb->select(Group
::GROUPSUSERS_TABLE
, 'gu');
1209 array('g' => PREFIX_DB
. Group
::TABLE
),
1210 'gu.id_group=g.' . Group
::PK
,
1215 'g.id_group' => ':group',
1216 'g.parent_group' => ':pgroup'
1220 $gselect->group(['gu.id_adh']);
1222 $stmt = $zdb->sql
->prepareStatementForSqlObject($gselect);
1226 foreach ($this->filters
->groups_search
as $gs) { // then add a row for each ig/searched group pair
1227 $gresults = $stmt->execute(
1229 'group' => $gs['group'],
1230 'pgroup' => $gs['group']
1234 switch ($this->filters
->groups_search_log_op
) {
1235 case AdvancedMembersList
::OP_AND
:
1236 foreach ($gresults as $gresult) {
1237 if (!isset($ids[$gresult['id_adh']])) {
1238 $ids[$gresult['id_adh']] = 0;
1240 $ids[$gresult['id_adh']] +
= 1;
1243 case AdvancedMembersList
::OP_OR
:
1244 foreach ($gresults as $gresult) {
1245 $mids[$gresult['id_adh']] = $gresult['id_adh'];
1252 foreach ($ids as $id_adh => $count) {
1253 if ($count == count($wheregroups)) {
1254 $mids[$id_adh] = $id_adh;
1260 //limit on found members
1261 $select->where
->in('a.id_adh', $mids);
1263 //no match in groups, end of game.
1264 $select->where('false = true');
1268 //FIXME: should be retrieved from members_fields
1270 'ddn_adh' => 'birth_date',
1271 'date_crea_adh' => 'creation_date',
1272 'date_modif_adh' => 'modif_date',
1273 'date_echeance' => 'due_date',
1274 'ct.date_enreg' => 'contrib_creation_date',
1275 'ct.date_debut_cotis' => 'contrib_begin_date',
1276 'ct.date_fin_cotis' => 'contrib_end_date'
1279 foreach ($dates as $field => $property) {
1280 $bprop = "r{$property}_begin";
1281 if ($this->filters
->$bprop) {
1282 $d = new \
DateTime($this->filters
->$bprop);
1283 $select->where
->greaterThanOrEqualTo(
1288 $eprop = "r{$property}_end";
1289 if ($this->filters
->$eprop) {
1290 $d = new \
DateTime($this->filters
->$eprop);
1291 $select->where
->lessThanOrEqualTo(
1298 if ($this->filters
->show_public_infos
) {
1299 switch ($this->filters
->show_public_infos
) {
1300 case self
::FILTER_W_PUBINFOS
:
1301 $select->where('bool_display_info = true');
1303 case self
::FILTER_WO_PUBINFOS
:
1304 $select->where('bool_display_info = false');
1306 case self
::FILTER_DC_PUBINFOS
:
1307 //nothing to do here.
1312 if ($this->filters
->status
) {
1315 $this->filters
->status
1320 $this->filters
->contrib_min_amount
1321 ||
$this->filters
->contrib_max_amount
1323 if ($this->filters
->contrib_min_amount
) {
1324 $select->where
->greaterThanOrEqualTo(
1326 $this->filters
->contrib_min_amount
1329 if ($this->filters
->contrib_max_amount
) {
1330 $select->where
->lessThanOrEqualTo(
1332 $this->filters
->contrib_max_amount
1337 if ($this->filters
->contributions_types
) {
1340 $this->filters
->contributions_types
1344 if ($this->filters
->payments_types
) {
1346 'ct.type_paiement_cotis',
1347 $this->filters
->payments_types
1352 count($this->filters
->contrib_dynamic
) > 0
1353 && !isset($this->filters
->contrib_dynamic
['empty'])
1355 foreach ($this->filters
->contrib_dynamic
as $k => $cd) {
1361 if (is_array($cd)) {
1362 //dynamic choice spotted!
1363 $prefix = 'cdfc' . $k . '.';
1364 $qry = 'dfc.field_form = \'contrib\' AND ' .
1365 'dfc.field_id = ' . $k;
1367 $select->where($qry);
1368 $select->where
->in($prefix . $field, $cd);
1370 //dynamic field spotted!
1372 $qry = 'dfc.field_form = \'contrib\' AND ' .
1373 'dfc.field_id = ' . $k . ' AND ';
1374 $field = 'field_val';
1375 $qry .= 'LOWER(' . $prefix . $field . ') ' .
1377 $select->where($qry . $zdb->platform
->quoteValue('%' . strtolower($cd) . '%'));
1383 count($this->filters
->free_search
) > 0
1384 && !isset($this->filters
->free_search
['empty'])
1386 foreach ($this->filters
->free_search
as $fs) {
1387 $fs['search'] = mb_strtolower($fs['search']);
1389 switch ($fs['qry_op']) {
1390 case AdvancedMembersList
::OP_EQUALS
:
1393 case AdvancedMembersList
::OP_CONTAINS
:
1395 $fs['search'] = '%' . $fs['search'] . '%';
1397 case AdvancedMembersList
::OP_NOT_EQUALS
:
1400 case AdvancedMembersList
::OP_NOT_CONTAINS
:
1402 $fs['search'] = '%' . $fs['search'] . '%';
1404 case AdvancedMembersList
::OP_STARTS_WITH
:
1406 $fs['search'] = $fs['search'] . '%';
1408 case AdvancedMembersList
::OP_ENDS_WITH
:
1410 $fs['search'] = '%' . $fs['search'];
1412 case AdvancedMembersList
::OP_BEFORE
:
1415 case AdvancedMembersList
::OP_AFTER
:
1420 'Unknown query operator: ' . $fs['qry_op'] .
1421 ' (will fallback to equals)',
1431 if (strpos($fs['field'], 'dyn_') === 0) {
1432 // simple dynamic field spotted!
1433 $index = str_replace('dyn_', '', $fs['field']);
1434 $dyn_field = DynamicField
::loadFieldType($zdb, (int)$index);
1435 $prefix = 'df' . $index . '.';
1436 $fs['field'] = 'val';
1439 //handle socials networks
1440 if (strpos($fs['field'], 'socials_') === 0) {
1442 $type = str_replace('socials_', '', $fs['field']);
1444 $fs['field'] = 'url';
1445 $select->where(['so.type' => $type]);
1448 if ($dyn_field && $dyn_field instanceof \Galette\DynamicFields\Boolean
) {
1449 if ($fs['search'] != 0) {
1450 $qry .= $prefix . $fs['field'] . $qop . ' ' .
1453 $qry .= $prefix . $fs['field'] . ' IS NULL';
1455 } elseif (!strncmp($fs['field'], 'bool_', strlen('bool_'))) {
1456 $qry .= $prefix . $fs['field'] . $qop . ' ' .
1459 $fs['qry_op'] === AdvancedMembersList
::OP_BEFORE
1460 ||
$fs['qry_op'] === AdvancedMembersList
::OP_AFTER
1462 if ($prefix === 'a.') {
1463 //dates are OK in the main fields. no cast, just query!
1464 $qry .= $prefix . $fs['field'] . $qop . ' ' .
1465 $zdb->platform
->quoteValue($fs['search']);
1467 //dynamic dates are stored in their localized format :/
1468 //use current lang format to query for now
1469 if ($zdb->isPostgres()) {
1470 $fs['search'] = "to_date('" . $fs['search'] . "', 'YYYY-MM-DD')";
1471 $store_fmt = __("Y-m-d") === 'Y-m-d' ?
'YYYY-MM-DD' : 'DD/MM/YYYY';
1472 $qry .= "to_date('" . $prefix . $fs['field'] . "', '$store_fmt')";
1474 $fs['search'] = "STR_TO_DATE('" . $fs['search'] . "', '%Y-%m-%d')";
1475 $store_fmt = __("Y-m-d") === 'Y-m-d' ?
'%Y-%m-%d' : '%d/%m/%Y';
1476 $qry .= 'STR_TO_DATE(' . $prefix . $fs['field'] . ', \'' . $store_fmt . '\') ';
1479 $qry .= $qop . ' ' . $fs['search'];
1481 } elseif ($fs['field'] == 'status_label') {
1482 $qry_pattern = '%p%field %op %value';
1483 $qry .= str_replace(
1494 $zdb->platform
->quoteValue($fs['search'])
1499 $field = $prefix . $fs['field'];
1500 if ($zdb->isPostgres()) {
1501 $field = 'CAST('.$field.' AS TEXT)';
1503 $qry .= 'LOWER(' . $field . ') ' .
1504 $qop . ' ' . $zdb->platform
->quoteValue($fs['search']);
1507 if ($fs['log_op'] === AdvancedMembersList
::OP_AND
) {
1508 $select->where($qry);
1509 } elseif ($fs['log_op'] === AdvancedMembersList
::OP_OR
) {
1510 $select->where($qry, PredicateSet
::OP_OR
);
1519 * Login and password field cannot be empty.
1521 * If those ones are not required, or if a file has been imported
1522 * (from a CSV file for example), we fill here random values.
1526 public function emptyLogins()
1531 $zdb->connection
->beginTransaction();
1532 $select = $zdb->select(Adherent
::TABLE
);
1534 array('id_adh', 'login_adh', 'mdp_adh')
1537 'login_adh' => new Expression('NULL'),
1539 'mdp_adh' => new Expression('NULL'),
1545 $results = $zdb->execute($select);
1548 if ($results->count() > 0) {
1549 $update = $zdb->update(Adherent
::TABLE
);
1552 'login_adh' => ':login',
1553 'mdp_adh' => ':pass'
1555 )->where
->equalTo(Adherent
::PK
, ':id');
1557 $stmt = $zdb->sql
->prepareStatementForSqlObject($update);
1559 $p = new \Galette\Core\
Password($zdb);
1561 foreach ($results as $m) {
1565 ||
!isset($m->login_adh
)
1566 ||
$m->login_adh
== 'NULL'
1568 $m->login_adh
= $p->makeRandomPassword(15);
1574 ||
!isset($m->mdp_adh
)
1575 ||
$m->mdp_adh
== 'NULL'
1577 $randomp = $p->makeRandomPassword(15);
1578 $m->mdp_adh
= password_hash(
1585 if ($dirty === true) {
1588 'login' => $m->login_adh
,
1589 'pass' => $m->mdp_adh
,
1597 $zdb->connection
->commit();
1598 $this->count
= $processed;
1600 } catch (Throwable
$e) {
1601 $zdb->connection
->rollBack();
1603 'An error occurred trying to retrieve members with ' .
1604 'empty logins/passwords (' . $e->getMessage(),
1612 * Loads data to produce a Pie chart based on members state of dues
1616 public function getRemindersCount()
1620 $reminders = array();
1622 $soon_date = new \
DateTime();
1623 $soon_date->modify('+1 month');
1625 $now = new \
DateTime();
1627 $select = $zdb->select(Adherent
::TABLE
, 'a');
1630 'cnt' => new Expression('count(a.' . Adherent
::PK
. ')')
1635 array('parent' => PREFIX_DB
. self
::TABLE
),
1636 'a.parent_id=parent.' . self
::PK
,
1642 ->lessThan('a.date_echeance', $soon_date->format('Y-m-d'))
1643 ->greaterThanOrEqualTo('a.date_echeance', $now->format('Y-m-d'));
1645 ->where('a.activite_adh=true')
1646 ->where('a.bool_exempt_adh=false');
1648 $select_wo_mail = clone $select;
1651 '(a.email_adh != \'\' OR a.parent_id IS NOT NULL AND parent.email_adh != \'\')'
1653 $select_wo_mail->where(
1654 '(a.email_adh = \'\' OR a.email_adh IS NULL) AND (parent.email_adh = \'\' OR parent.email_adh IS NULL)'
1657 $results = $zdb->execute($select);
1658 $res = $results->current();
1659 $reminders['impending'] = $res->cnt
;
1661 $results_wo_mail = $zdb->execute($select_wo_mail);
1662 $res_wo_mail = $results_wo_mail->current();
1663 $reminders['nomail']['impending'] = $res_wo_mail->cnt
;
1665 $select = $zdb->select(Adherent
::TABLE
, 'a');
1668 'cnt' => new Expression('count(a.' . Adherent
::PK
. ')')
1673 array('parent' => PREFIX_DB
. self
::TABLE
),
1674 'a.parent_id=parent.' . self
::PK
,
1680 ->lessThan('a.date_echeance', $now->format('Y-m-d'));
1682 ->where('a.activite_adh=true')
1683 ->where('a.bool_exempt_adh=false');
1685 $select_wo_mail = clone $select;
1688 '(a.email_adh != \'\' OR a.parent_id IS NOT NULL AND parent.email_adh != \'\')'
1691 $select_wo_mail->where(
1692 '(a.email_adh = \'\' OR a.email_adh IS NULL) AND (parent.email_adh = \'\' OR parent.email_adh IS NULL)'
1695 $results = $zdb->execute($select);
1696 $res = $results->current();
1697 $reminders['late'] = $res->cnt
;
1699 $results_wo_mail = $zdb->execute($select_wo_mail);
1700 $res_wo_mail = $results_wo_mail->current();
1701 $reminders['nomail']['late'] = $res_wo_mail->cnt
;
1707 * Get count for current query
1711 public function getCount()
1713 return $this->count
;
1717 * Get registered errors
1721 public function getErrors()
1723 return $this->errors
;
1727 * Get all existing emails
1729 * @param Db $zdb Database instance
1731 * @return array ['email' => 'id_adh']
1733 public static function getEmails(Db
$zdb)
1736 $select = $zdb->select(self
::TABLE
);
1741 $select->where('email_adh != \'\' AND email_adh IS NOT NULL');
1742 $rows = $zdb->execute($select);
1743 foreach ($rows as $row) {
1744 $emails[$row->email_adh
] = $row->{self
::PK
};
1750 * Get current filters
1752 * @return MembersList
1754 public function getFilters()
1756 return $this->filters
;
1760 * Get members list to instanciate dropdowns
1762 * @param Db $zdb Database instance
1763 * @param integer $current Current member
1767 public function getSelectizedMembers(Db
$zdb, $current = null)
1770 $required_fields = array(
1776 $list_members = $this->getList(false, $required_fields);
1778 if (count($list_members) > 0) {
1779 foreach ($list_members as $member) {
1782 $members[$member->$pk] = Adherent
::getNameWithCase(
1784 $member->prenom_adh
,
1792 //check if current attached member is part of the list
1793 if ($current !== null && !isset($members[$current])) {
1795 [$current => Adherent
::getSName($zdb, $current, true, true)] +