Passed
Branch main (f9aaf7)
by Jonathan
14:43
created
app/Module/Sosa/Services/SosaStatisticsService.php 2 patches
Indentation   +500 added lines, -500 removed lines patch added patch discarded remove patch
@@ -30,511 +30,511 @@
 block discarded – undo
30 30
 class SosaStatisticsService
31 31
 {
32 32
 
33
-    /**
34
-     * Reference user
35
-     * @var UserInterface $user
36
-     */
37
-    private $user;
38
-
39
-    /**
40
-     * Reference tree
41
-     * @var Tree $tree
42
-     */
43
-    private $tree;
44
-
45
-    /**
46
-     * Constructor for Sosa Statistics Service
47
-     *
48
-     * @param Tree $tree
49
-     * @param UserInterface $user
50
-     */
51
-    public function __construct(Tree $tree, UserInterface $user)
52
-    {
53
-        $this->tree = $tree;
54
-        $this->user = $user;
55
-    }
56
-
57
-    /**
58
-     * Return the root individual for the reference tree and user.
59
-     *
60
-     * @return Individual|NULL
61
-     */
62
-    public function rootIndividual(): ?Individual
63
-    {
64
-        $root_indi_id = $this->tree->getUserPreference($this->user, 'MAJ_SOSA_ROOT_ID');
65
-        return Registry::individualFactory()->make($root_indi_id, $this->tree);
66
-    }
67
-
68
-    /**
69
-     * Get the highest generation for the reference tree and user.
70
-     *
71
-     * @return int
72
-     */
73
-    public function maxGeneration(): int
74
-    {
75
-        return (int) DB::table('maj_sosa')
76
-            ->where('majs_gedcom_id', '=', $this->tree->id())
77
-            ->where('majs_user_id', '=', $this->user->id())
78
-            ->max('majs_gen');
79
-    }
80
-
81
-    /**
82
-     * Get the total count of individuals in the tree.
83
-     *
84
-     * @return int
85
-     */
86
-    public function totalIndividuals(): int
87
-    {
88
-        return DB::table('individuals')
89
-            ->where('i_file', '=', $this->tree->id())
90
-            ->count();
91
-    }
92
-
93
-    /**
94
-     * Get the total count of Sosa ancestors for all generations
95
-     *
96
-     * @return int
97
-     */
98
-    public function totalAncestors(): int
99
-    {
100
-        return DB::table('maj_sosa')
101
-            ->where('majs_gedcom_id', '=', $this->tree->id())
102
-            ->where('majs_user_id', '=', $this->user->id())
103
-            ->count();
104
-    }
105
-
106
-    /**
107
-     * Get the total count of Sosa ancestors for a generation
108
-     *
109
-     * @return int
110
-     */
111
-    public function totalAncestorsAtGeneration(int $gen): int
112
-    {
113
-        return DB::table('maj_sosa')
114
-            ->where('majs_gedcom_id', '=', $this->tree->id())
115
-            ->where('majs_user_id', '=', $this->user->id())
116
-            ->where('majs_gen', '=', $gen)
117
-            ->count();
118
-    }
119
-
120
-    /**
121
-     * Get the total count of distinct Sosa ancestors for all generations
122
-     *
123
-     * @return int
124
-     */
125
-    public function totalDistinctAncestors(): int
126
-    {
127
-        return DB::table('maj_sosa')
128
-            ->where('majs_gedcom_id', '=', $this->tree->id())
129
-            ->where('majs_user_id', '=', $this->user->id())
130
-            ->distinct()
131
-            ->count('majs_i_id');
132
-    }
133
-
134
-    /**
135
-     * Get the mean generation time, as the slope of the linear regression of birth years vs generations
136
-     *
137
-     * @return float
138
-     */
139
-    public function meanGenerationTime(): float
140
-    {
141
-        $row = DB::table('maj_sosa')
142
-            ->where('majs_gedcom_id', '=', $this->tree->id())
143
-            ->where('majs_user_id', '=', $this->user->id())
144
-            ->whereNotNull('majs_birth_year')
145
-            ->selectRaw('COUNT(majs_sosa) AS n')
146
-            ->selectRaw('SUM(majs_gen * majs_birth_year) AS sum_xy')
147
-            ->selectRaw('SUM(majs_gen) AS sum_x')
148
-            ->selectRaw('SUM(majs_birth_year) AS sum_y')
149
-            ->selectRaw('SUM(majs_gen * majs_gen) AS sum_x2')
150
-            ->get()->first();
151
-
152
-        return $row->n == 0 ? 0 :
153
-            -($row->n * $row->sum_xy - $row->sum_x * $row->sum_y) / ($row->n * $row->sum_x2 - pow($row->sum_x, 2));
154
-    }
155
-
156
-    /**
157
-     * Get the statistic array detailed by generation.
158
-     * Statistics for each generation are:
159
-     *  - The number of Sosa in generation
160
-     *  - The number of Sosa up to generation
161
-     *  - The number of distinct Sosa up to generation
162
-     *  - The year of the first birth in generation
163
-     *  - The year of the first estimated birth in generation
164
-     *  - The year of the last birth in generation
165
-     *  - The year of the last estimated birth in generation
166
-     *  - The average year of birth in generation
167
-     *
168
-     * @return array<int, array<string, int|null>> Statistics array
169
-     */
170
-    public function statisticsByGenerations(): array
171
-    {
172
-        $stats_by_gen = $this->statisticsByGenerationBasicData();
173
-        $cumul_stats_by_gen = $this->statisticsByGenerationCumulativeData();
174
-
175
-        $statistics_by_gen = [];
176
-        foreach ($stats_by_gen as $gen => $stats_gen) {
177
-            $statistics_by_gen[(int) $stats_gen->gen] = array(
178
-                'sosaCount'             =>  (int) $stats_gen->total_sosa,
179
-                'sosaTotalCount'        =>  (int) $cumul_stats_by_gen[$gen]->total_cumul,
180
-                'diffSosaTotalCount'    =>  (int) $cumul_stats_by_gen[$gen]->total_distinct_cumul,
181
-                'firstBirth'            =>  $stats_gen->first_year,
182
-                'firstEstimatedBirth'   =>  $stats_gen->first_est_year,
183
-                'lastBirth'             =>  $stats_gen->last_year,
184
-                'lastEstimatedBirth'    =>  $stats_gen->last_est_year
185
-            );
186
-        }
187
-
188
-        return $statistics_by_gen;
189
-    }
190
-
191
-    /**
192
-     * Returns the basic statistics data by generation.
193
-     *
194
-     * @return Collection<int, \stdClass>
195
-     */
196
-    private function statisticsByGenerationBasicData(): Collection
197
-    {
198
-        return DB::table('maj_sosa')
199
-            ->where('majs_gedcom_id', '=', $this->tree->id())
200
-            ->where('majs_user_id', '=', $this->user->id())
201
-            ->groupBy('majs_gen')
202
-            ->orderBy('majs_gen', 'asc')
203
-            ->select('majs_gen AS gen')
204
-            ->selectRaw('COUNT(majs_sosa) AS total_sosa')
205
-            ->selectRaw('MIN(majs_birth_year) AS first_year')
206
-            ->selectRaw('MIN(majs_birth_year_est) AS first_est_year')
207
-            ->selectRaw('MAX(majs_birth_year) AS last_year')
208
-            ->selectRaw('MAX(majs_birth_year_est) AS last_est_year')
209
-            ->get()->keyBy('gen');
210
-    }
211
-
212
-    /**
213
-     * Returns the cumulative statistics data by generation
214
-     *
215
-     * @return Collection<int, \stdClass>
216
-     */
217
-    private function statisticsByGenerationCumulativeData(): Collection
218
-    {
219
-        $list_gen = DB::table('maj_sosa')->select('majs_gen')->distinct()
220
-            ->where('majs_gedcom_id', '=', $this->tree->id())
221
-            ->where('majs_user_id', '=', $this->user->id());
222
-
223
-        return DB::table('maj_sosa')
224
-            ->joinSub($list_gen, 'list_gen', function (JoinClause $join): void {
225
-                $join->on('maj_sosa.majs_gen', '<=', 'list_gen.majs_gen')
226
-                ->where('majs_gedcom_id', '=', $this->tree->id())
227
-                ->where('majs_user_id', '=', $this->user->id());
228
-            })
229
-            ->groupBy('list_gen.majs_gen')
230
-            ->select('list_gen.majs_gen AS gen')
231
-            ->selectRaw('COUNT(majs_i_id) AS total_cumul')
232
-            ->selectRaw('COUNT(DISTINCT majs_i_id) AS total_distinct_cumul')
233
-            ->selectRaw('1 - COUNT(DISTINCT majs_i_id) / COUNT(majs_i_id) AS pedi_collapse_simple')
234
-            ->get()->keyBy('gen');
235
-    }
236
-
237
-    /**
238
-     * Returns the pedigree collapse improved calculation by generation.
239
-     *
240
-     * Format:
241
-     *  - key : generation
242
-     *  - values:
243
-     *      - pedi_collapse_roots : pedigree collapse of ancestor roots for the generation
244
-     *      - pedi_collapse_xgen : pedigree cross-generation shrinkage for the generation
245
-     *
246
-     * @return array<int, array<string, float>>
247
-     */
248
-    public function pedigreeCollapseByGenerationData(): array
249
-    {
250
-        $table_prefix = DB::connection()->getTablePrefix();
251
-
252
-        $list_gen = DB::table('maj_sosa')->select('majs_gen')->distinct()
253
-            ->where('majs_gedcom_id', '=', $this->tree->id())
254
-            ->where('majs_user_id', '=', $this->user->id());
255
-
256
-        /* Compute the contributions of nodes of previous generations to the current generation */
257
-        $root_ancestors_contributions = DB::table('maj_sosa AS sosa')
258
-            ->select(['list_gen.majs_gen AS gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id'])
259
-            ->addSelect(['sosa.majs_i_id', 'sosa.majs_gen'])
260
-            ->selectRaw(
261
-                '(CASE ' .
262
-                    ' WHEN ' . $table_prefix . 'sosa_fat.majs_i_id IS NULL' .
263
-                    ' THEN POWER(2, ' . $table_prefix . 'list_gen.majs_gen - ' . $table_prefix . 'sosa.majs_gen - 1)' .
264
-                    ' ELSE 0 ' .
265
-                ' END)' .
266
-                ' + (CASE ' .
267
-                    ' WHEN ' . $table_prefix . 'sosa_mot.majs_i_id IS NULL' .
268
-                    ' THEN POWER(2, ' . $table_prefix . 'list_gen.majs_gen - ' . $table_prefix . 'sosa.majs_gen - 1)' .
269
-                    ' ELSE 0 ' .
270
-                ' END) contrib'
271
-            )
272
-            ->joinSub($list_gen, 'list_gen', function (JoinClause $join): void {
273
-                $join->on('sosa.majs_gen', '<', 'list_gen.majs_gen')
274
-                    ->where('majs_gedcom_id', '=', $this->tree->id())
275
-                    ->where('majs_user_id', '=', $this->user->id());
276
-            })
277
-            ->leftJoin('maj_sosa AS sosa_fat', function (JoinClause $join) use ($table_prefix): void {
278
-                // Link to sosa's father
279
-                $join->whereRaw($table_prefix . 'sosa_fat.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa')
280
-                    ->where('sosa_fat.majs_gedcom_id', '=', $this->tree->id())
281
-                    ->where('sosa_fat.majs_user_id', '=', $this->user->id());
282
-            })
283
-            ->leftJoin('maj_sosa AS sosa_mot', function (JoinClause $join) use ($table_prefix): void {
284
-                // Link to sosa's mother
285
-                $join->whereRaw($table_prefix . 'sosa_mot.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa + 1')
286
-                    ->where('sosa_mot.majs_gedcom_id', '=', $this->tree->id())
287
-                    ->where('sosa_mot.majs_user_id', '=', $this->user->id());
288
-            })
289
-            ->where('sosa.majs_gedcom_id', '=', $this->tree->id())
290
-            ->where('sosa.majs_user_id', '=', $this->user->id())
291
-            ->where(function (Builder $query): void {
292
-                $query->whereNull('sosa_fat.majs_i_id')
293
-                ->orWhereNull('sosa_mot.majs_i_id');
294
-            });
295
-
296
-        /* Identify nodes in the generations with ancestors who are also in the same generation.
33
+	/**
34
+	 * Reference user
35
+	 * @var UserInterface $user
36
+	 */
37
+	private $user;
38
+
39
+	/**
40
+	 * Reference tree
41
+	 * @var Tree $tree
42
+	 */
43
+	private $tree;
44
+
45
+	/**
46
+	 * Constructor for Sosa Statistics Service
47
+	 *
48
+	 * @param Tree $tree
49
+	 * @param UserInterface $user
50
+	 */
51
+	public function __construct(Tree $tree, UserInterface $user)
52
+	{
53
+		$this->tree = $tree;
54
+		$this->user = $user;
55
+	}
56
+
57
+	/**
58
+	 * Return the root individual for the reference tree and user.
59
+	 *
60
+	 * @return Individual|NULL
61
+	 */
62
+	public function rootIndividual(): ?Individual
63
+	{
64
+		$root_indi_id = $this->tree->getUserPreference($this->user, 'MAJ_SOSA_ROOT_ID');
65
+		return Registry::individualFactory()->make($root_indi_id, $this->tree);
66
+	}
67
+
68
+	/**
69
+	 * Get the highest generation for the reference tree and user.
70
+	 *
71
+	 * @return int
72
+	 */
73
+	public function maxGeneration(): int
74
+	{
75
+		return (int) DB::table('maj_sosa')
76
+			->where('majs_gedcom_id', '=', $this->tree->id())
77
+			->where('majs_user_id', '=', $this->user->id())
78
+			->max('majs_gen');
79
+	}
80
+
81
+	/**
82
+	 * Get the total count of individuals in the tree.
83
+	 *
84
+	 * @return int
85
+	 */
86
+	public function totalIndividuals(): int
87
+	{
88
+		return DB::table('individuals')
89
+			->where('i_file', '=', $this->tree->id())
90
+			->count();
91
+	}
92
+
93
+	/**
94
+	 * Get the total count of Sosa ancestors for all generations
95
+	 *
96
+	 * @return int
97
+	 */
98
+	public function totalAncestors(): int
99
+	{
100
+		return DB::table('maj_sosa')
101
+			->where('majs_gedcom_id', '=', $this->tree->id())
102
+			->where('majs_user_id', '=', $this->user->id())
103
+			->count();
104
+	}
105
+
106
+	/**
107
+	 * Get the total count of Sosa ancestors for a generation
108
+	 *
109
+	 * @return int
110
+	 */
111
+	public function totalAncestorsAtGeneration(int $gen): int
112
+	{
113
+		return DB::table('maj_sosa')
114
+			->where('majs_gedcom_id', '=', $this->tree->id())
115
+			->where('majs_user_id', '=', $this->user->id())
116
+			->where('majs_gen', '=', $gen)
117
+			->count();
118
+	}
119
+
120
+	/**
121
+	 * Get the total count of distinct Sosa ancestors for all generations
122
+	 *
123
+	 * @return int
124
+	 */
125
+	public function totalDistinctAncestors(): int
126
+	{
127
+		return DB::table('maj_sosa')
128
+			->where('majs_gedcom_id', '=', $this->tree->id())
129
+			->where('majs_user_id', '=', $this->user->id())
130
+			->distinct()
131
+			->count('majs_i_id');
132
+	}
133
+
134
+	/**
135
+	 * Get the mean generation time, as the slope of the linear regression of birth years vs generations
136
+	 *
137
+	 * @return float
138
+	 */
139
+	public function meanGenerationTime(): float
140
+	{
141
+		$row = DB::table('maj_sosa')
142
+			->where('majs_gedcom_id', '=', $this->tree->id())
143
+			->where('majs_user_id', '=', $this->user->id())
144
+			->whereNotNull('majs_birth_year')
145
+			->selectRaw('COUNT(majs_sosa) AS n')
146
+			->selectRaw('SUM(majs_gen * majs_birth_year) AS sum_xy')
147
+			->selectRaw('SUM(majs_gen) AS sum_x')
148
+			->selectRaw('SUM(majs_birth_year) AS sum_y')
149
+			->selectRaw('SUM(majs_gen * majs_gen) AS sum_x2')
150
+			->get()->first();
151
+
152
+		return $row->n == 0 ? 0 :
153
+			-($row->n * $row->sum_xy - $row->sum_x * $row->sum_y) / ($row->n * $row->sum_x2 - pow($row->sum_x, 2));
154
+	}
155
+
156
+	/**
157
+	 * Get the statistic array detailed by generation.
158
+	 * Statistics for each generation are:
159
+	 *  - The number of Sosa in generation
160
+	 *  - The number of Sosa up to generation
161
+	 *  - The number of distinct Sosa up to generation
162
+	 *  - The year of the first birth in generation
163
+	 *  - The year of the first estimated birth in generation
164
+	 *  - The year of the last birth in generation
165
+	 *  - The year of the last estimated birth in generation
166
+	 *  - The average year of birth in generation
167
+	 *
168
+	 * @return array<int, array<string, int|null>> Statistics array
169
+	 */
170
+	public function statisticsByGenerations(): array
171
+	{
172
+		$stats_by_gen = $this->statisticsByGenerationBasicData();
173
+		$cumul_stats_by_gen = $this->statisticsByGenerationCumulativeData();
174
+
175
+		$statistics_by_gen = [];
176
+		foreach ($stats_by_gen as $gen => $stats_gen) {
177
+			$statistics_by_gen[(int) $stats_gen->gen] = array(
178
+				'sosaCount'             =>  (int) $stats_gen->total_sosa,
179
+				'sosaTotalCount'        =>  (int) $cumul_stats_by_gen[$gen]->total_cumul,
180
+				'diffSosaTotalCount'    =>  (int) $cumul_stats_by_gen[$gen]->total_distinct_cumul,
181
+				'firstBirth'            =>  $stats_gen->first_year,
182
+				'firstEstimatedBirth'   =>  $stats_gen->first_est_year,
183
+				'lastBirth'             =>  $stats_gen->last_year,
184
+				'lastEstimatedBirth'    =>  $stats_gen->last_est_year
185
+			);
186
+		}
187
+
188
+		return $statistics_by_gen;
189
+	}
190
+
191
+	/**
192
+	 * Returns the basic statistics data by generation.
193
+	 *
194
+	 * @return Collection<int, \stdClass>
195
+	 */
196
+	private function statisticsByGenerationBasicData(): Collection
197
+	{
198
+		return DB::table('maj_sosa')
199
+			->where('majs_gedcom_id', '=', $this->tree->id())
200
+			->where('majs_user_id', '=', $this->user->id())
201
+			->groupBy('majs_gen')
202
+			->orderBy('majs_gen', 'asc')
203
+			->select('majs_gen AS gen')
204
+			->selectRaw('COUNT(majs_sosa) AS total_sosa')
205
+			->selectRaw('MIN(majs_birth_year) AS first_year')
206
+			->selectRaw('MIN(majs_birth_year_est) AS first_est_year')
207
+			->selectRaw('MAX(majs_birth_year) AS last_year')
208
+			->selectRaw('MAX(majs_birth_year_est) AS last_est_year')
209
+			->get()->keyBy('gen');
210
+	}
211
+
212
+	/**
213
+	 * Returns the cumulative statistics data by generation
214
+	 *
215
+	 * @return Collection<int, \stdClass>
216
+	 */
217
+	private function statisticsByGenerationCumulativeData(): Collection
218
+	{
219
+		$list_gen = DB::table('maj_sosa')->select('majs_gen')->distinct()
220
+			->where('majs_gedcom_id', '=', $this->tree->id())
221
+			->where('majs_user_id', '=', $this->user->id());
222
+
223
+		return DB::table('maj_sosa')
224
+			->joinSub($list_gen, 'list_gen', function (JoinClause $join): void {
225
+				$join->on('maj_sosa.majs_gen', '<=', 'list_gen.majs_gen')
226
+				->where('majs_gedcom_id', '=', $this->tree->id())
227
+				->where('majs_user_id', '=', $this->user->id());
228
+			})
229
+			->groupBy('list_gen.majs_gen')
230
+			->select('list_gen.majs_gen AS gen')
231
+			->selectRaw('COUNT(majs_i_id) AS total_cumul')
232
+			->selectRaw('COUNT(DISTINCT majs_i_id) AS total_distinct_cumul')
233
+			->selectRaw('1 - COUNT(DISTINCT majs_i_id) / COUNT(majs_i_id) AS pedi_collapse_simple')
234
+			->get()->keyBy('gen');
235
+	}
236
+
237
+	/**
238
+	 * Returns the pedigree collapse improved calculation by generation.
239
+	 *
240
+	 * Format:
241
+	 *  - key : generation
242
+	 *  - values:
243
+	 *      - pedi_collapse_roots : pedigree collapse of ancestor roots for the generation
244
+	 *      - pedi_collapse_xgen : pedigree cross-generation shrinkage for the generation
245
+	 *
246
+	 * @return array<int, array<string, float>>
247
+	 */
248
+	public function pedigreeCollapseByGenerationData(): array
249
+	{
250
+		$table_prefix = DB::connection()->getTablePrefix();
251
+
252
+		$list_gen = DB::table('maj_sosa')->select('majs_gen')->distinct()
253
+			->where('majs_gedcom_id', '=', $this->tree->id())
254
+			->where('majs_user_id', '=', $this->user->id());
255
+
256
+		/* Compute the contributions of nodes of previous generations to the current generation */
257
+		$root_ancestors_contributions = DB::table('maj_sosa AS sosa')
258
+			->select(['list_gen.majs_gen AS gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id'])
259
+			->addSelect(['sosa.majs_i_id', 'sosa.majs_gen'])
260
+			->selectRaw(
261
+				'(CASE ' .
262
+					' WHEN ' . $table_prefix . 'sosa_fat.majs_i_id IS NULL' .
263
+					' THEN POWER(2, ' . $table_prefix . 'list_gen.majs_gen - ' . $table_prefix . 'sosa.majs_gen - 1)' .
264
+					' ELSE 0 ' .
265
+				' END)' .
266
+				' + (CASE ' .
267
+					' WHEN ' . $table_prefix . 'sosa_mot.majs_i_id IS NULL' .
268
+					' THEN POWER(2, ' . $table_prefix . 'list_gen.majs_gen - ' . $table_prefix . 'sosa.majs_gen - 1)' .
269
+					' ELSE 0 ' .
270
+				' END) contrib'
271
+			)
272
+			->joinSub($list_gen, 'list_gen', function (JoinClause $join): void {
273
+				$join->on('sosa.majs_gen', '<', 'list_gen.majs_gen')
274
+					->where('majs_gedcom_id', '=', $this->tree->id())
275
+					->where('majs_user_id', '=', $this->user->id());
276
+			})
277
+			->leftJoin('maj_sosa AS sosa_fat', function (JoinClause $join) use ($table_prefix): void {
278
+				// Link to sosa's father
279
+				$join->whereRaw($table_prefix . 'sosa_fat.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa')
280
+					->where('sosa_fat.majs_gedcom_id', '=', $this->tree->id())
281
+					->where('sosa_fat.majs_user_id', '=', $this->user->id());
282
+			})
283
+			->leftJoin('maj_sosa AS sosa_mot', function (JoinClause $join) use ($table_prefix): void {
284
+				// Link to sosa's mother
285
+				$join->whereRaw($table_prefix . 'sosa_mot.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa + 1')
286
+					->where('sosa_mot.majs_gedcom_id', '=', $this->tree->id())
287
+					->where('sosa_mot.majs_user_id', '=', $this->user->id());
288
+			})
289
+			->where('sosa.majs_gedcom_id', '=', $this->tree->id())
290
+			->where('sosa.majs_user_id', '=', $this->user->id())
291
+			->where(function (Builder $query): void {
292
+				$query->whereNull('sosa_fat.majs_i_id')
293
+				->orWhereNull('sosa_mot.majs_i_id');
294
+			});
295
+
296
+		/* Identify nodes in the generations with ancestors who are also in the same generation.
297 297
          * This is the vertical/generational collapse that will reduce the number or roots.
298 298
          */
299
-        $non_roots_ancestors = DB::table('maj_sosa AS sosa')
300
-            ->select(['sosa.majs_gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id', 'sosa.majs_sosa'])
301
-            ->selectRaw('MAX(' . $table_prefix . 'sosa_anc.majs_sosa) - MIN(' . $table_prefix . 'sosa_anc.majs_sosa)' .
302
-                ' AS full_ancestors')
303
-            ->join('maj_sosa AS sosa_anc', function (JoinClause $join) use ($table_prefix): void {
304
-                $join->on('sosa.majs_gen', '<', 'sosa_anc.majs_gen')
305
-                    ->whereRaw('FLOOR(' . $table_prefix . 'sosa_anc.majs_sosa / POWER(2, ' .
306
-                        $table_prefix . 'sosa_anc.majs_gen - ' . $table_prefix . 'sosa.majs_gen)) = ' .
307
-                        $table_prefix . 'sosa.majs_sosa')
308
-                    ->where('sosa_anc.majs_gedcom_id', '=', $this->tree->id())
309
-                    ->where('sosa_anc.majs_user_id', '=', $this->user->id());
310
-            })
311
-            ->where('sosa.majs_gedcom_id', '=', $this->tree->id())
312
-            ->where('sosa.majs_user_id', '=', $this->user->id())
313
-            ->whereIn('sosa_anc.majs_i_id', function (Builder $query) use ($table_prefix): void {
314
-                $query->from('maj_sosa AS sosa_gen')
315
-                ->select('sosa_gen.majs_i_id')->distinct()
316
-                ->where('sosa_gen.majs_gedcom_id', '=', $this->tree->id())
317
-                ->where('sosa_gen.majs_user_id', '=', $this->user->id())
318
-                ->whereRaw($table_prefix . 'sosa_gen.majs_gen = ' . $table_prefix . 'sosa.majs_gen');
319
-            })
320
-            ->groupBy(['sosa.majs_gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id',
321
-                'sosa.majs_sosa', 'sosa.majs_i_id']);
322
-
323
-        /* Compute the contribution of the nodes in the generation,
299
+		$non_roots_ancestors = DB::table('maj_sosa AS sosa')
300
+			->select(['sosa.majs_gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id', 'sosa.majs_sosa'])
301
+			->selectRaw('MAX(' . $table_prefix . 'sosa_anc.majs_sosa) - MIN(' . $table_prefix . 'sosa_anc.majs_sosa)' .
302
+				' AS full_ancestors')
303
+			->join('maj_sosa AS sosa_anc', function (JoinClause $join) use ($table_prefix): void {
304
+				$join->on('sosa.majs_gen', '<', 'sosa_anc.majs_gen')
305
+					->whereRaw('FLOOR(' . $table_prefix . 'sosa_anc.majs_sosa / POWER(2, ' .
306
+						$table_prefix . 'sosa_anc.majs_gen - ' . $table_prefix . 'sosa.majs_gen)) = ' .
307
+						$table_prefix . 'sosa.majs_sosa')
308
+					->where('sosa_anc.majs_gedcom_id', '=', $this->tree->id())
309
+					->where('sosa_anc.majs_user_id', '=', $this->user->id());
310
+			})
311
+			->where('sosa.majs_gedcom_id', '=', $this->tree->id())
312
+			->where('sosa.majs_user_id', '=', $this->user->id())
313
+			->whereIn('sosa_anc.majs_i_id', function (Builder $query) use ($table_prefix): void {
314
+				$query->from('maj_sosa AS sosa_gen')
315
+				->select('sosa_gen.majs_i_id')->distinct()
316
+				->where('sosa_gen.majs_gedcom_id', '=', $this->tree->id())
317
+				->where('sosa_gen.majs_user_id', '=', $this->user->id())
318
+				->whereRaw($table_prefix . 'sosa_gen.majs_gen = ' . $table_prefix . 'sosa.majs_gen');
319
+			})
320
+			->groupBy(['sosa.majs_gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id',
321
+				'sosa.majs_sosa', 'sosa.majs_i_id']);
322
+
323
+		/* Compute the contribution of the nodes in the generation,
324 324
          * excluding the nodes with ancestors in the same generation.
325 325
          * Nodes with a parent missing are not excluded to cater for the missing one.
326 326
          */
327
-        $known_ancestors_contributions = DB::table('maj_sosa AS sosa')
328
-            ->select(['sosa.majs_gen AS gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id'])
329
-            ->addSelect(['sosa.majs_i_id', 'sosa.majs_gen'])
330
-            ->selectRaw('1 AS contrib')
331
-            ->leftJoinSub($non_roots_ancestors, 'nonroot', function (JoinClause $join): void {
332
-                $join->on('sosa.majs_gen', '=', 'nonroot.majs_gen')
333
-                    ->on('sosa.majs_sosa', '=', 'nonroot.majs_sosa')
334
-                    ->where('nonroot.full_ancestors', '>', 0)
335
-                    ->where('nonroot.majs_gedcom_id', '=', $this->tree->id())
336
-                    ->where('nonroot.majs_user_id', '=', $this->user->id());
337
-            })
338
-            ->where('sosa.majs_gedcom_id', '=', $this->tree->id())
339
-            ->where('sosa.majs_user_id', '=', $this->user->id())
340
-            ->whereNull('nonroot.majs_sosa');
341
-
342
-        /* Aggregate both queries, and calculate the sum of contributions by generation roots.
327
+		$known_ancestors_contributions = DB::table('maj_sosa AS sosa')
328
+			->select(['sosa.majs_gen AS gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id'])
329
+			->addSelect(['sosa.majs_i_id', 'sosa.majs_gen'])
330
+			->selectRaw('1 AS contrib')
331
+			->leftJoinSub($non_roots_ancestors, 'nonroot', function (JoinClause $join): void {
332
+				$join->on('sosa.majs_gen', '=', 'nonroot.majs_gen')
333
+					->on('sosa.majs_sosa', '=', 'nonroot.majs_sosa')
334
+					->where('nonroot.full_ancestors', '>', 0)
335
+					->where('nonroot.majs_gedcom_id', '=', $this->tree->id())
336
+					->where('nonroot.majs_user_id', '=', $this->user->id());
337
+			})
338
+			->where('sosa.majs_gedcom_id', '=', $this->tree->id())
339
+			->where('sosa.majs_user_id', '=', $this->user->id())
340
+			->whereNull('nonroot.majs_sosa');
341
+
342
+		/* Aggregate both queries, and calculate the sum of contributions by generation roots.
343 343
          * Exclude as well nodes that already appear in lower generations, as their branche has already been reduced.
344 344
          */
345
-        $ancestors_contributions_sum = DB::connection()->query()
346
-            ->fromSub($root_ancestors_contributions->unionAll($known_ancestors_contributions), 'sosa_contribs')
347
-            ->select(['sosa_contribs.gen', 'sosa_contribs.majs_gedcom_id', 'sosa_contribs.majs_user_id'])
348
-            ->addSelect(['sosa_contribs.majs_i_id', 'sosa_contribs.contrib'])
349
-            ->selectRaw('COUNT(' . $table_prefix . 'sosa_contribs.majs_i_id) * ' .
350
-                $table_prefix . 'sosa_contribs.contrib AS totalContrib')
351
-            ->leftJoin('maj_sosa AS sosa_low', function (JoinClause $join): void {
352
-                $join->on('sosa_low.majs_gen', '<', 'sosa_contribs.majs_gen')
353
-                    ->on('sosa_low.majs_i_id', '=', 'sosa_contribs.majs_i_id')
354
-                    ->where('sosa_low.majs_gedcom_id', '=', $this->tree->id())
355
-                    ->where('sosa_low.majs_user_id', '=', $this->user->id());
356
-            })
357
-            ->whereNull('sosa_low.majs_sosa')
358
-            ->groupBy(['sosa_contribs.gen', 'sosa_contribs.majs_gedcom_id', 'sosa_contribs.majs_user_id',
359
-                'sosa_contribs.majs_i_id', 'sosa_contribs.contrib']);
360
-
361
-        // Aggregate all generation roots to compute root and generation pedigree collapse
362
-        $pedi_collapse_coll = DB::connection()->query()->fromSub($ancestors_contributions_sum, 'sosa_contribs_sum')
363
-            ->select(['gen'])->selectRaw('SUM(contrib), SUM(totalContrib)')
364
-            ->selectRaw('1 - SUM(contrib) / SUM(totalContrib) AS pedi_collapse_roots')  // Roots/horizontal collapse
365
-            ->selectRaw('1 - SUM(totalContrib) / POWER ( 2, gen - 1) AS pedi_collapse_xgen') // Crossgeneration collapse
366
-            ->groupBy(['gen', 'majs_gedcom_id', 'majs_user_id'])
367
-            ->orderBy('gen')
368
-            ->get();
369
-
370
-        $pedi_collapse_by_gen = [];
371
-        foreach ($pedi_collapse_coll as $collapse_gen) {
372
-            $pedi_collapse_by_gen[(int) $collapse_gen->gen] = array(
373
-                'pedi_collapse_roots'   =>  (float) $collapse_gen->pedi_collapse_roots,
374
-                'pedi_collapse_xgen'   =>  (float) $collapse_gen->pedi_collapse_xgen
375
-            );
376
-        }
377
-        return $pedi_collapse_by_gen;
378
-    }
379
-
380
-    /**
381
-     * Return a Collection of the mean generation depth and deviation for all Sosa ancestors at a given generation.
382
-     * Sosa 1 is of generation 1.
383
-     *
384
-     * Mean generation depth and deviation are calculated based on the works of Marie-Héléne Cazes and Pierre Cazes,
385
-     * published in Population (French Edition), Vol. 51, No. 1 (Jan. - Feb., 1996), pp. 117-140
386
-     * http://kintip.net/index.php?option=com_jdownloads&task=download.send&id=9&catid=4&m=0
387
-     *
388
-     * Format:
389
-     *  - key : sosa number of the ancestor
390
-     *  - values:
391
-     *      - root_ancestor_id : ID of the ancestor
392
-     *      - mean_gen_depth : Mean generation depth
393
-     *      - stddev_gen_depth : Standard deviation of generation depth
394
-     *
395
-     * @param int $gen Sosa generation
396
-     * @return Collection<int, \stdClass>
397
-     */
398
-    public function generationDepthStatsAtGeneration(int $gen): Collection
399
-    {
400
-        $table_prefix = DB::connection()->getTablePrefix();
401
-        $missing_ancestors_by_gen = DB::table('maj_sosa AS sosa')
402
-            ->selectRaw($table_prefix . 'sosa.majs_gen - ? AS majs_gen_norm', [$gen])
403
-            ->selectRaw('FLOOR(((' . $table_prefix . 'sosa.majs_sosa / POW(2, ' . $table_prefix . 'sosa.majs_gen -1 )) - 1) * POWER(2, ? - 1)) + POWER(2, ? - 1) AS root_ancestor', [$gen, $gen])   //@phpcs:ignore Generic.Files.LineLength.TooLong
404
-            ->selectRaw('SUM(CASE WHEN ' . $table_prefix . 'sosa_fat.majs_i_id IS NULL AND ' . $table_prefix . 'sosa_mot.majs_i_id IS NULL THEN 1 ELSE 0 END) AS full_root_count')  //@phpcs:ignore Generic.Files.LineLength.TooLong
405
-            ->selectRaw('SUM(CASE WHEN ' . $table_prefix . 'sosa_fat.majs_i_id IS NULL AND ' . $table_prefix . 'sosa_mot.majs_i_id IS NULL THEN 0 ELSE 1 END) As semi_root_count')  //@phpcs:ignore Generic.Files.LineLength.TooLong
406
-            ->leftJoin('maj_sosa AS sosa_fat', function (JoinClause $join) use ($table_prefix): void {
407
-                // Link to sosa's father
408
-                $join->whereRaw($table_prefix . 'sosa_fat.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa')
409
-                ->where('sosa_fat.majs_gedcom_id', '=', $this->tree->id())
410
-                ->where('sosa_fat.majs_user_id', '=', $this->user->id());
411
-            })
412
-            ->leftJoin('maj_sosa AS sosa_mot', function (JoinClause $join) use ($table_prefix): void {
413
-                // Link to sosa's mother
414
-                $join->whereRaw($table_prefix . 'sosa_mot.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa + 1')
415
-                ->where('sosa_mot.majs_gedcom_id', '=', $this->tree->id())
416
-                ->where('sosa_mot.majs_user_id', '=', $this->user->id());
417
-            })
418
-            ->where('sosa.majs_gedcom_id', '=', $this->tree->id())
419
-            ->where('sosa.majs_user_id', '=', $this->user->id())
420
-            ->where('sosa.majs_gen', '>=', $gen)
421
-            ->where(function (Builder $query): void {
422
-                $query->whereNull('sosa_fat.majs_i_id')
423
-                    ->orWhereNull('sosa_mot.majs_i_id');
424
-            })
425
-            ->groupBy(['sosa.majs_gen', 'root_ancestor']);
426
-
427
-        return DB::table('maj_sosa AS sosa_list')
428
-            ->select(['stats_by_gen.root_ancestor AS root_ancestor_sosa', 'sosa_list.majs_i_id as root_ancestor_id'])
429
-            ->selectRaw('1 + SUM( (majs_gen_norm) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm))) AS mean_gen_depth')  //@phpcs:ignore Generic.Files.LineLength.TooLong
430
-            ->selectRaw(' SQRT(' .
431
-                '   SUM(POWER(majs_gen_norm, 2) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm)))' .     //@phpcs:ignore Generic.Files.LineLength.TooLong
432
-                '   - POWER( SUM( (majs_gen_norm) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm))), 2)' .       //@phpcs:ignore Generic.Files.LineLength.TooLong
433
-                ' ) AS stddev_gen_depth')
434
-            ->joinSub($missing_ancestors_by_gen, 'stats_by_gen', function (JoinClause $join): void {
435
-                $join->on('sosa_list.majs_sosa', '=', 'stats_by_gen.root_ancestor')
436
-                    ->where('sosa_list.majs_gedcom_id', '=', $this->tree->id())
437
-                    ->where('sosa_list.majs_user_id', '=', $this->user->id());
438
-            })
439
-            ->groupBy(['stats_by_gen.root_ancestor', 'sosa_list.majs_i_id'])
440
-            ->orderBy('stats_by_gen.root_ancestor')
441
-            ->get()->keyBy('root_ancestor_sosa');
442
-    }
443
-
444
-    /**
445
-     * Return a collection of the most duplicated root Sosa ancestors.
446
-     * The number of ancestors to return is limited by the parameter $limit.
447
-     * If several individuals are tied when reaching the limit, none of them are returned,
448
-     * which means that there can be less individuals returned than requested.
449
-     *
450
-     * Format:
451
-     *  - value:
452
-     *      - sosa_i_id : sosa individual
453
-     *      - sosa_count: number of duplications of the ancestor (e.g. 3 if it appears 3 times)
454
-     *
455
-     * @param int $limit
456
-     * @return Collection<\stdClass>
457
-     */
458
-    public function topMultipleAncestorsWithNoTies(int $limit): Collection
459
-    {
460
-        $table_prefix = DB::connection()->getTablePrefix();
461
-        $multiple_ancestors = DB::table('maj_sosa AS sosa')
462
-            ->select('sosa.majs_i_id AS sosa_i_id')
463
-            ->selectRaw('COUNT(' . $table_prefix . 'sosa.majs_sosa) AS sosa_count')
464
-            ->leftJoin('maj_sosa AS sosa_fat', function (JoinClause $join) use ($table_prefix): void {
465
-                // Link to sosa's father
466
-                $join->whereRaw($table_prefix . 'sosa_fat.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa')
467
-                    ->where('sosa_fat.majs_gedcom_id', '=', $this->tree->id())
468
-                    ->where('sosa_fat.majs_user_id', '=', $this->user->id());
469
-            })
470
-            ->leftJoin('maj_sosa AS sosa_mot', function (JoinClause $join) use ($table_prefix): void {
471
-                // Link to sosa's mother
472
-                $join->whereRaw($table_prefix . 'sosa_mot.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa + 1')
473
-                ->where('sosa_mot.majs_gedcom_id', '=', $this->tree->id())
474
-                ->where('sosa_mot.majs_user_id', '=', $this->user->id());
475
-            })
476
-            ->where('sosa.majs_gedcom_id', '=', $this->tree->id())
477
-            ->where('sosa.majs_user_id', '=', $this->user->id())
478
-            ->whereNull('sosa_fat.majs_sosa')   // We keep only root individuals, i.e. those with no father or mother
479
-            ->whereNull('sosa_mot.majs_sosa')
480
-            ->groupBy('sosa.majs_i_id')
481
-            ->havingRaw('COUNT(' . $table_prefix . 'sosa.majs_sosa) > 1')    // Limit to the duplicate sosas.
482
-            ->orderByRaw('COUNT(' . $table_prefix . 'sosa.majs_sosa) DESC, MIN(' . $table_prefix . 'sosa.majs_sosa) ASC')   //@phpcs:ignore Generic.Files.LineLength.TooLong
483
-            ->limit($limit + 1)     // We want to select one more than required, for ties
484
-            ->get();
485
-
486
-        if ($multiple_ancestors->count() > $limit) {
487
-            $last_count = $multiple_ancestors->last()->sosa_count;
488
-            $multiple_ancestors = $multiple_ancestors->reject(function (stdClass $element) use ($last_count): bool {
489
-                return $element->sosa_count ==  $last_count;
490
-            });
491
-        }
492
-        return $multiple_ancestors;
493
-    }
494
-
495
-    /**
496
-     * Return a computed array of statistics about the dispersion of ancestors across the ancestors
497
-     * at a specified generation.
498
-     *
499
-     * Format:
500
-     *  - key : rank of the ancestor in generation G for which exclusive ancestors have been found
501
-     *          For instance 3 represent the maternal grand father
502
-     *          0 is used for shared ancestors
503
-     *  - values: number of ancestors exclusively in the ancestors of the ancestor in key
504
-     *
505
-     *  For instance a result at generation 3 could be :
506
-     *      array (   0     =>  12      -> 12 ancestors are shared by the grand-parents
507
-     *                1     =>  32      -> 32 ancestors are exclusive to the paternal grand-father
508
-     *                2     =>  25      -> 25 ancestors are exclusive to the paternal grand-mother
509
-     *                3     =>  12      -> 12 ancestors are exclusive to the maternal grand-father
510
-     *                4     =>  30      -> 30 ancestors are exclusive to the maternal grand-mother
511
-     *            )
512
-     *
513
-     * @param int $gen
514
-     * @return Collection<int, int>
515
-     */
516
-    public function ancestorsDispersionForGeneration(int $gen): Collection
517
-    {
518
-        $ancestors_branches = DB::table('maj_sosa')
519
-            ->select('majs_i_id AS i_id')
520
-            ->selectRaw('FLOOR(majs_sosa / POW(2, (majs_gen - ?))) - POW(2, ? -1) + 1 AS branch', [$gen, $gen])
521
-            ->where('majs_gedcom_id', '=', $this->tree->id())
522
-            ->where('majs_user_id', '=', $this->user->id())
523
-            ->where('majs_gen', '>=', $gen)
524
-            ->groupBy('majs_i_id', 'branch');
525
-
526
-
527
-        $consolidated_ancestors_branches = DB::table('maj_sosa')
528
-            ->fromSub($ancestors_branches, 'indi_branch')
529
-            ->select('i_id')
530
-            ->selectRaw('CASE WHEN COUNT(branch) > 1 THEN 0 ELSE MIN(branch) END AS branches')
531
-            ->groupBy('i_id');
532
-
533
-        return DB::table('maj_sosa')
534
-            ->fromSub($consolidated_ancestors_branches, 'indi_branch_consolidated')
535
-            ->select('branches')
536
-            ->selectRaw('COUNT(i_id) AS count_indi')
537
-            ->groupBy('branches')
538
-            ->get()->pluck('count_indi', 'branches');
539
-    }
345
+		$ancestors_contributions_sum = DB::connection()->query()
346
+			->fromSub($root_ancestors_contributions->unionAll($known_ancestors_contributions), 'sosa_contribs')
347
+			->select(['sosa_contribs.gen', 'sosa_contribs.majs_gedcom_id', 'sosa_contribs.majs_user_id'])
348
+			->addSelect(['sosa_contribs.majs_i_id', 'sosa_contribs.contrib'])
349
+			->selectRaw('COUNT(' . $table_prefix . 'sosa_contribs.majs_i_id) * ' .
350
+				$table_prefix . 'sosa_contribs.contrib AS totalContrib')
351
+			->leftJoin('maj_sosa AS sosa_low', function (JoinClause $join): void {
352
+				$join->on('sosa_low.majs_gen', '<', 'sosa_contribs.majs_gen')
353
+					->on('sosa_low.majs_i_id', '=', 'sosa_contribs.majs_i_id')
354
+					->where('sosa_low.majs_gedcom_id', '=', $this->tree->id())
355
+					->where('sosa_low.majs_user_id', '=', $this->user->id());
356
+			})
357
+			->whereNull('sosa_low.majs_sosa')
358
+			->groupBy(['sosa_contribs.gen', 'sosa_contribs.majs_gedcom_id', 'sosa_contribs.majs_user_id',
359
+				'sosa_contribs.majs_i_id', 'sosa_contribs.contrib']);
360
+
361
+		// Aggregate all generation roots to compute root and generation pedigree collapse
362
+		$pedi_collapse_coll = DB::connection()->query()->fromSub($ancestors_contributions_sum, 'sosa_contribs_sum')
363
+			->select(['gen'])->selectRaw('SUM(contrib), SUM(totalContrib)')
364
+			->selectRaw('1 - SUM(contrib) / SUM(totalContrib) AS pedi_collapse_roots')  // Roots/horizontal collapse
365
+			->selectRaw('1 - SUM(totalContrib) / POWER ( 2, gen - 1) AS pedi_collapse_xgen') // Crossgeneration collapse
366
+			->groupBy(['gen', 'majs_gedcom_id', 'majs_user_id'])
367
+			->orderBy('gen')
368
+			->get();
369
+
370
+		$pedi_collapse_by_gen = [];
371
+		foreach ($pedi_collapse_coll as $collapse_gen) {
372
+			$pedi_collapse_by_gen[(int) $collapse_gen->gen] = array(
373
+				'pedi_collapse_roots'   =>  (float) $collapse_gen->pedi_collapse_roots,
374
+				'pedi_collapse_xgen'   =>  (float) $collapse_gen->pedi_collapse_xgen
375
+			);
376
+		}
377
+		return $pedi_collapse_by_gen;
378
+	}
379
+
380
+	/**
381
+	 * Return a Collection of the mean generation depth and deviation for all Sosa ancestors at a given generation.
382
+	 * Sosa 1 is of generation 1.
383
+	 *
384
+	 * Mean generation depth and deviation are calculated based on the works of Marie-Héléne Cazes and Pierre Cazes,
385
+	 * published in Population (French Edition), Vol. 51, No. 1 (Jan. - Feb., 1996), pp. 117-140
386
+	 * http://kintip.net/index.php?option=com_jdownloads&task=download.send&id=9&catid=4&m=0
387
+	 *
388
+	 * Format:
389
+	 *  - key : sosa number of the ancestor
390
+	 *  - values:
391
+	 *      - root_ancestor_id : ID of the ancestor
392
+	 *      - mean_gen_depth : Mean generation depth
393
+	 *      - stddev_gen_depth : Standard deviation of generation depth
394
+	 *
395
+	 * @param int $gen Sosa generation
396
+	 * @return Collection<int, \stdClass>
397
+	 */
398
+	public function generationDepthStatsAtGeneration(int $gen): Collection
399
+	{
400
+		$table_prefix = DB::connection()->getTablePrefix();
401
+		$missing_ancestors_by_gen = DB::table('maj_sosa AS sosa')
402
+			->selectRaw($table_prefix . 'sosa.majs_gen - ? AS majs_gen_norm', [$gen])
403
+			->selectRaw('FLOOR(((' . $table_prefix . 'sosa.majs_sosa / POW(2, ' . $table_prefix . 'sosa.majs_gen -1 )) - 1) * POWER(2, ? - 1)) + POWER(2, ? - 1) AS root_ancestor', [$gen, $gen])   //@phpcs:ignore Generic.Files.LineLength.TooLong
404
+			->selectRaw('SUM(CASE WHEN ' . $table_prefix . 'sosa_fat.majs_i_id IS NULL AND ' . $table_prefix . 'sosa_mot.majs_i_id IS NULL THEN 1 ELSE 0 END) AS full_root_count')  //@phpcs:ignore Generic.Files.LineLength.TooLong
405
+			->selectRaw('SUM(CASE WHEN ' . $table_prefix . 'sosa_fat.majs_i_id IS NULL AND ' . $table_prefix . 'sosa_mot.majs_i_id IS NULL THEN 0 ELSE 1 END) As semi_root_count')  //@phpcs:ignore Generic.Files.LineLength.TooLong
406
+			->leftJoin('maj_sosa AS sosa_fat', function (JoinClause $join) use ($table_prefix): void {
407
+				// Link to sosa's father
408
+				$join->whereRaw($table_prefix . 'sosa_fat.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa')
409
+				->where('sosa_fat.majs_gedcom_id', '=', $this->tree->id())
410
+				->where('sosa_fat.majs_user_id', '=', $this->user->id());
411
+			})
412
+			->leftJoin('maj_sosa AS sosa_mot', function (JoinClause $join) use ($table_prefix): void {
413
+				// Link to sosa's mother
414
+				$join->whereRaw($table_prefix . 'sosa_mot.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa + 1')
415
+				->where('sosa_mot.majs_gedcom_id', '=', $this->tree->id())
416
+				->where('sosa_mot.majs_user_id', '=', $this->user->id());
417
+			})
418
+			->where('sosa.majs_gedcom_id', '=', $this->tree->id())
419
+			->where('sosa.majs_user_id', '=', $this->user->id())
420
+			->where('sosa.majs_gen', '>=', $gen)
421
+			->where(function (Builder $query): void {
422
+				$query->whereNull('sosa_fat.majs_i_id')
423
+					->orWhereNull('sosa_mot.majs_i_id');
424
+			})
425
+			->groupBy(['sosa.majs_gen', 'root_ancestor']);
426
+
427
+		return DB::table('maj_sosa AS sosa_list')
428
+			->select(['stats_by_gen.root_ancestor AS root_ancestor_sosa', 'sosa_list.majs_i_id as root_ancestor_id'])
429
+			->selectRaw('1 + SUM( (majs_gen_norm) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm))) AS mean_gen_depth')  //@phpcs:ignore Generic.Files.LineLength.TooLong
430
+			->selectRaw(' SQRT(' .
431
+				'   SUM(POWER(majs_gen_norm, 2) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm)))' .     //@phpcs:ignore Generic.Files.LineLength.TooLong
432
+				'   - POWER( SUM( (majs_gen_norm) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm))), 2)' .       //@phpcs:ignore Generic.Files.LineLength.TooLong
433
+				' ) AS stddev_gen_depth')
434
+			->joinSub($missing_ancestors_by_gen, 'stats_by_gen', function (JoinClause $join): void {
435
+				$join->on('sosa_list.majs_sosa', '=', 'stats_by_gen.root_ancestor')
436
+					->where('sosa_list.majs_gedcom_id', '=', $this->tree->id())
437
+					->where('sosa_list.majs_user_id', '=', $this->user->id());
438
+			})
439
+			->groupBy(['stats_by_gen.root_ancestor', 'sosa_list.majs_i_id'])
440
+			->orderBy('stats_by_gen.root_ancestor')
441
+			->get()->keyBy('root_ancestor_sosa');
442
+	}
443
+
444
+	/**
445
+	 * Return a collection of the most duplicated root Sosa ancestors.
446
+	 * The number of ancestors to return is limited by the parameter $limit.
447
+	 * If several individuals are tied when reaching the limit, none of them are returned,
448
+	 * which means that there can be less individuals returned than requested.
449
+	 *
450
+	 * Format:
451
+	 *  - value:
452
+	 *      - sosa_i_id : sosa individual
453
+	 *      - sosa_count: number of duplications of the ancestor (e.g. 3 if it appears 3 times)
454
+	 *
455
+	 * @param int $limit
456
+	 * @return Collection<\stdClass>
457
+	 */
458
+	public function topMultipleAncestorsWithNoTies(int $limit): Collection
459
+	{
460
+		$table_prefix = DB::connection()->getTablePrefix();
461
+		$multiple_ancestors = DB::table('maj_sosa AS sosa')
462
+			->select('sosa.majs_i_id AS sosa_i_id')
463
+			->selectRaw('COUNT(' . $table_prefix . 'sosa.majs_sosa) AS sosa_count')
464
+			->leftJoin('maj_sosa AS sosa_fat', function (JoinClause $join) use ($table_prefix): void {
465
+				// Link to sosa's father
466
+				$join->whereRaw($table_prefix . 'sosa_fat.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa')
467
+					->where('sosa_fat.majs_gedcom_id', '=', $this->tree->id())
468
+					->where('sosa_fat.majs_user_id', '=', $this->user->id());
469
+			})
470
+			->leftJoin('maj_sosa AS sosa_mot', function (JoinClause $join) use ($table_prefix): void {
471
+				// Link to sosa's mother
472
+				$join->whereRaw($table_prefix . 'sosa_mot.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa + 1')
473
+				->where('sosa_mot.majs_gedcom_id', '=', $this->tree->id())
474
+				->where('sosa_mot.majs_user_id', '=', $this->user->id());
475
+			})
476
+			->where('sosa.majs_gedcom_id', '=', $this->tree->id())
477
+			->where('sosa.majs_user_id', '=', $this->user->id())
478
+			->whereNull('sosa_fat.majs_sosa')   // We keep only root individuals, i.e. those with no father or mother
479
+			->whereNull('sosa_mot.majs_sosa')
480
+			->groupBy('sosa.majs_i_id')
481
+			->havingRaw('COUNT(' . $table_prefix . 'sosa.majs_sosa) > 1')    // Limit to the duplicate sosas.
482
+			->orderByRaw('COUNT(' . $table_prefix . 'sosa.majs_sosa) DESC, MIN(' . $table_prefix . 'sosa.majs_sosa) ASC')   //@phpcs:ignore Generic.Files.LineLength.TooLong
483
+			->limit($limit + 1)     // We want to select one more than required, for ties
484
+			->get();
485
+
486
+		if ($multiple_ancestors->count() > $limit) {
487
+			$last_count = $multiple_ancestors->last()->sosa_count;
488
+			$multiple_ancestors = $multiple_ancestors->reject(function (stdClass $element) use ($last_count): bool {
489
+				return $element->sosa_count ==  $last_count;
490
+			});
491
+		}
492
+		return $multiple_ancestors;
493
+	}
494
+
495
+	/**
496
+	 * Return a computed array of statistics about the dispersion of ancestors across the ancestors
497
+	 * at a specified generation.
498
+	 *
499
+	 * Format:
500
+	 *  - key : rank of the ancestor in generation G for which exclusive ancestors have been found
501
+	 *          For instance 3 represent the maternal grand father
502
+	 *          0 is used for shared ancestors
503
+	 *  - values: number of ancestors exclusively in the ancestors of the ancestor in key
504
+	 *
505
+	 *  For instance a result at generation 3 could be :
506
+	 *      array (   0     =>  12      -> 12 ancestors are shared by the grand-parents
507
+	 *                1     =>  32      -> 32 ancestors are exclusive to the paternal grand-father
508
+	 *                2     =>  25      -> 25 ancestors are exclusive to the paternal grand-mother
509
+	 *                3     =>  12      -> 12 ancestors are exclusive to the maternal grand-father
510
+	 *                4     =>  30      -> 30 ancestors are exclusive to the maternal grand-mother
511
+	 *            )
512
+	 *
513
+	 * @param int $gen
514
+	 * @return Collection<int, int>
515
+	 */
516
+	public function ancestorsDispersionForGeneration(int $gen): Collection
517
+	{
518
+		$ancestors_branches = DB::table('maj_sosa')
519
+			->select('majs_i_id AS i_id')
520
+			->selectRaw('FLOOR(majs_sosa / POW(2, (majs_gen - ?))) - POW(2, ? -1) + 1 AS branch', [$gen, $gen])
521
+			->where('majs_gedcom_id', '=', $this->tree->id())
522
+			->where('majs_user_id', '=', $this->user->id())
523
+			->where('majs_gen', '>=', $gen)
524
+			->groupBy('majs_i_id', 'branch');
525
+
526
+
527
+		$consolidated_ancestors_branches = DB::table('maj_sosa')
528
+			->fromSub($ancestors_branches, 'indi_branch')
529
+			->select('i_id')
530
+			->selectRaw('CASE WHEN COUNT(branch) > 1 THEN 0 ELSE MIN(branch) END AS branches')
531
+			->groupBy('i_id');
532
+
533
+		return DB::table('maj_sosa')
534
+			->fromSub($consolidated_ancestors_branches, 'indi_branch_consolidated')
535
+			->select('branches')
536
+			->selectRaw('COUNT(i_id) AS count_indi')
537
+			->groupBy('branches')
538
+			->get()->pluck('count_indi', 'branches');
539
+	}
540 540
 }
Please login to merge, or discard this patch.
Spacing   +58 added lines, -59 removed lines patch added patch discarded remove patch
@@ -72,7 +72,7 @@  discard block
 block discarded – undo
72 72
      */
73 73
     public function maxGeneration(): int
74 74
     {
75
-        return (int) DB::table('maj_sosa')
75
+        return (int)DB::table('maj_sosa')
76 76
             ->where('majs_gedcom_id', '=', $this->tree->id())
77 77
             ->where('majs_user_id', '=', $this->user->id())
78 78
             ->max('majs_gen');
@@ -149,8 +149,7 @@  discard block
 block discarded – undo
149 149
             ->selectRaw('SUM(majs_gen * majs_gen) AS sum_x2')
150 150
             ->get()->first();
151 151
 
152
-        return $row->n == 0 ? 0 :
153
-            -($row->n * $row->sum_xy - $row->sum_x * $row->sum_y) / ($row->n * $row->sum_x2 - pow($row->sum_x, 2));
152
+        return $row->n == 0 ? 0 : -($row->n * $row->sum_xy - $row->sum_x * $row->sum_y) / ($row->n * $row->sum_x2 - pow($row->sum_x, 2));
154 153
     }
155 154
 
156 155
     /**
@@ -174,10 +173,10 @@  discard block
 block discarded – undo
174 173
 
175 174
         $statistics_by_gen = [];
176 175
         foreach ($stats_by_gen as $gen => $stats_gen) {
177
-            $statistics_by_gen[(int) $stats_gen->gen] = array(
178
-                'sosaCount'             =>  (int) $stats_gen->total_sosa,
179
-                'sosaTotalCount'        =>  (int) $cumul_stats_by_gen[$gen]->total_cumul,
180
-                'diffSosaTotalCount'    =>  (int) $cumul_stats_by_gen[$gen]->total_distinct_cumul,
176
+            $statistics_by_gen[(int)$stats_gen->gen] = array(
177
+                'sosaCount'             =>  (int)$stats_gen->total_sosa,
178
+                'sosaTotalCount'        =>  (int)$cumul_stats_by_gen[$gen]->total_cumul,
179
+                'diffSosaTotalCount'    =>  (int)$cumul_stats_by_gen[$gen]->total_distinct_cumul,
181 180
                 'firstBirth'            =>  $stats_gen->first_year,
182 181
                 'firstEstimatedBirth'   =>  $stats_gen->first_est_year,
183 182
                 'lastBirth'             =>  $stats_gen->last_year,
@@ -221,7 +220,7 @@  discard block
 block discarded – undo
221 220
             ->where('majs_user_id', '=', $this->user->id());
222 221
 
223 222
         return DB::table('maj_sosa')
224
-            ->joinSub($list_gen, 'list_gen', function (JoinClause $join): void {
223
+            ->joinSub($list_gen, 'list_gen', function(JoinClause $join): void {
225 224
                 $join->on('maj_sosa.majs_gen', '<=', 'list_gen.majs_gen')
226 225
                 ->where('majs_gedcom_id', '=', $this->tree->id())
227 226
                 ->where('majs_user_id', '=', $this->user->id());
@@ -258,37 +257,37 @@  discard block
 block discarded – undo
258 257
             ->select(['list_gen.majs_gen AS gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id'])
259 258
             ->addSelect(['sosa.majs_i_id', 'sosa.majs_gen'])
260 259
             ->selectRaw(
261
-                '(CASE ' .
262
-                    ' WHEN ' . $table_prefix . 'sosa_fat.majs_i_id IS NULL' .
263
-                    ' THEN POWER(2, ' . $table_prefix . 'list_gen.majs_gen - ' . $table_prefix . 'sosa.majs_gen - 1)' .
264
-                    ' ELSE 0 ' .
265
-                ' END)' .
266
-                ' + (CASE ' .
267
-                    ' WHEN ' . $table_prefix . 'sosa_mot.majs_i_id IS NULL' .
268
-                    ' THEN POWER(2, ' . $table_prefix . 'list_gen.majs_gen - ' . $table_prefix . 'sosa.majs_gen - 1)' .
269
-                    ' ELSE 0 ' .
260
+                '(CASE '.
261
+                    ' WHEN '.$table_prefix.'sosa_fat.majs_i_id IS NULL'.
262
+                    ' THEN POWER(2, '.$table_prefix.'list_gen.majs_gen - '.$table_prefix.'sosa.majs_gen - 1)'.
263
+                    ' ELSE 0 '.
264
+                ' END)'.
265
+                ' + (CASE '.
266
+                    ' WHEN '.$table_prefix.'sosa_mot.majs_i_id IS NULL'.
267
+                    ' THEN POWER(2, '.$table_prefix.'list_gen.majs_gen - '.$table_prefix.'sosa.majs_gen - 1)'.
268
+                    ' ELSE 0 '.
270 269
                 ' END) contrib'
271 270
             )
272
-            ->joinSub($list_gen, 'list_gen', function (JoinClause $join): void {
271
+            ->joinSub($list_gen, 'list_gen', function(JoinClause $join): void {
273 272
                 $join->on('sosa.majs_gen', '<', 'list_gen.majs_gen')
274 273
                     ->where('majs_gedcom_id', '=', $this->tree->id())
275 274
                     ->where('majs_user_id', '=', $this->user->id());
276 275
             })
277
-            ->leftJoin('maj_sosa AS sosa_fat', function (JoinClause $join) use ($table_prefix): void {
276
+            ->leftJoin('maj_sosa AS sosa_fat', function(JoinClause $join) use ($table_prefix): void {
278 277
                 // Link to sosa's father
279
-                $join->whereRaw($table_prefix . 'sosa_fat.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa')
278
+                $join->whereRaw($table_prefix.'sosa_fat.majs_sosa = 2 * '.$table_prefix.'sosa.majs_sosa')
280 279
                     ->where('sosa_fat.majs_gedcom_id', '=', $this->tree->id())
281 280
                     ->where('sosa_fat.majs_user_id', '=', $this->user->id());
282 281
             })
283
-            ->leftJoin('maj_sosa AS sosa_mot', function (JoinClause $join) use ($table_prefix): void {
282
+            ->leftJoin('maj_sosa AS sosa_mot', function(JoinClause $join) use ($table_prefix): void {
284 283
                 // Link to sosa's mother
285
-                $join->whereRaw($table_prefix . 'sosa_mot.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa + 1')
284
+                $join->whereRaw($table_prefix.'sosa_mot.majs_sosa = 2 * '.$table_prefix.'sosa.majs_sosa + 1')
286 285
                     ->where('sosa_mot.majs_gedcom_id', '=', $this->tree->id())
287 286
                     ->where('sosa_mot.majs_user_id', '=', $this->user->id());
288 287
             })
289 288
             ->where('sosa.majs_gedcom_id', '=', $this->tree->id())
290 289
             ->where('sosa.majs_user_id', '=', $this->user->id())
291
-            ->where(function (Builder $query): void {
290
+            ->where(function(Builder $query): void {
292 291
                 $query->whereNull('sosa_fat.majs_i_id')
293 292
                 ->orWhereNull('sosa_mot.majs_i_id');
294 293
             });
@@ -298,24 +297,24 @@  discard block
 block discarded – undo
298 297
          */
299 298
         $non_roots_ancestors = DB::table('maj_sosa AS sosa')
300 299
             ->select(['sosa.majs_gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id', 'sosa.majs_sosa'])
301
-            ->selectRaw('MAX(' . $table_prefix . 'sosa_anc.majs_sosa) - MIN(' . $table_prefix . 'sosa_anc.majs_sosa)' .
300
+            ->selectRaw('MAX('.$table_prefix.'sosa_anc.majs_sosa) - MIN('.$table_prefix.'sosa_anc.majs_sosa)'.
302 301
                 ' AS full_ancestors')
303
-            ->join('maj_sosa AS sosa_anc', function (JoinClause $join) use ($table_prefix): void {
302
+            ->join('maj_sosa AS sosa_anc', function(JoinClause $join) use ($table_prefix): void {
304 303
                 $join->on('sosa.majs_gen', '<', 'sosa_anc.majs_gen')
305
-                    ->whereRaw('FLOOR(' . $table_prefix . 'sosa_anc.majs_sosa / POWER(2, ' .
306
-                        $table_prefix . 'sosa_anc.majs_gen - ' . $table_prefix . 'sosa.majs_gen)) = ' .
307
-                        $table_prefix . 'sosa.majs_sosa')
304
+                    ->whereRaw('FLOOR('.$table_prefix.'sosa_anc.majs_sosa / POWER(2, '.
305
+                        $table_prefix.'sosa_anc.majs_gen - '.$table_prefix.'sosa.majs_gen)) = '.
306
+                        $table_prefix.'sosa.majs_sosa')
308 307
                     ->where('sosa_anc.majs_gedcom_id', '=', $this->tree->id())
309 308
                     ->where('sosa_anc.majs_user_id', '=', $this->user->id());
310 309
             })
311 310
             ->where('sosa.majs_gedcom_id', '=', $this->tree->id())
312 311
             ->where('sosa.majs_user_id', '=', $this->user->id())
313
-            ->whereIn('sosa_anc.majs_i_id', function (Builder $query) use ($table_prefix): void {
312
+            ->whereIn('sosa_anc.majs_i_id', function(Builder $query) use ($table_prefix): void {
314 313
                 $query->from('maj_sosa AS sosa_gen')
315 314
                 ->select('sosa_gen.majs_i_id')->distinct()
316 315
                 ->where('sosa_gen.majs_gedcom_id', '=', $this->tree->id())
317 316
                 ->where('sosa_gen.majs_user_id', '=', $this->user->id())
318
-                ->whereRaw($table_prefix . 'sosa_gen.majs_gen = ' . $table_prefix . 'sosa.majs_gen');
317
+                ->whereRaw($table_prefix.'sosa_gen.majs_gen = '.$table_prefix.'sosa.majs_gen');
319 318
             })
320 319
             ->groupBy(['sosa.majs_gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id',
321 320
                 'sosa.majs_sosa', 'sosa.majs_i_id']);
@@ -328,7 +327,7 @@  discard block
 block discarded – undo
328 327
             ->select(['sosa.majs_gen AS gen', 'sosa.majs_gedcom_id', 'sosa.majs_user_id'])
329 328
             ->addSelect(['sosa.majs_i_id', 'sosa.majs_gen'])
330 329
             ->selectRaw('1 AS contrib')
331
-            ->leftJoinSub($non_roots_ancestors, 'nonroot', function (JoinClause $join): void {
330
+            ->leftJoinSub($non_roots_ancestors, 'nonroot', function(JoinClause $join): void {
332 331
                 $join->on('sosa.majs_gen', '=', 'nonroot.majs_gen')
333 332
                     ->on('sosa.majs_sosa', '=', 'nonroot.majs_sosa')
334 333
                     ->where('nonroot.full_ancestors', '>', 0)
@@ -346,9 +345,9 @@  discard block
 block discarded – undo
346 345
             ->fromSub($root_ancestors_contributions->unionAll($known_ancestors_contributions), 'sosa_contribs')
347 346
             ->select(['sosa_contribs.gen', 'sosa_contribs.majs_gedcom_id', 'sosa_contribs.majs_user_id'])
348 347
             ->addSelect(['sosa_contribs.majs_i_id', 'sosa_contribs.contrib'])
349
-            ->selectRaw('COUNT(' . $table_prefix . 'sosa_contribs.majs_i_id) * ' .
350
-                $table_prefix . 'sosa_contribs.contrib AS totalContrib')
351
-            ->leftJoin('maj_sosa AS sosa_low', function (JoinClause $join): void {
348
+            ->selectRaw('COUNT('.$table_prefix.'sosa_contribs.majs_i_id) * '.
349
+                $table_prefix.'sosa_contribs.contrib AS totalContrib')
350
+            ->leftJoin('maj_sosa AS sosa_low', function(JoinClause $join): void {
352 351
                 $join->on('sosa_low.majs_gen', '<', 'sosa_contribs.majs_gen')
353 352
                     ->on('sosa_low.majs_i_id', '=', 'sosa_contribs.majs_i_id')
354 353
                     ->where('sosa_low.majs_gedcom_id', '=', $this->tree->id())
@@ -369,9 +368,9 @@  discard block
 block discarded – undo
369 368
 
370 369
         $pedi_collapse_by_gen = [];
371 370
         foreach ($pedi_collapse_coll as $collapse_gen) {
372
-            $pedi_collapse_by_gen[(int) $collapse_gen->gen] = array(
373
-                'pedi_collapse_roots'   =>  (float) $collapse_gen->pedi_collapse_roots,
374
-                'pedi_collapse_xgen'   =>  (float) $collapse_gen->pedi_collapse_xgen
371
+            $pedi_collapse_by_gen[(int)$collapse_gen->gen] = array(
372
+                'pedi_collapse_roots'   =>  (float)$collapse_gen->pedi_collapse_roots,
373
+                'pedi_collapse_xgen'   =>  (float)$collapse_gen->pedi_collapse_xgen
375 374
             );
376 375
         }
377 376
         return $pedi_collapse_by_gen;
@@ -399,26 +398,26 @@  discard block
 block discarded – undo
399 398
     {
400 399
         $table_prefix = DB::connection()->getTablePrefix();
401 400
         $missing_ancestors_by_gen = DB::table('maj_sosa AS sosa')
402
-            ->selectRaw($table_prefix . 'sosa.majs_gen - ? AS majs_gen_norm', [$gen])
403
-            ->selectRaw('FLOOR(((' . $table_prefix . 'sosa.majs_sosa / POW(2, ' . $table_prefix . 'sosa.majs_gen -1 )) - 1) * POWER(2, ? - 1)) + POWER(2, ? - 1) AS root_ancestor', [$gen, $gen])   //@phpcs:ignore Generic.Files.LineLength.TooLong
404
-            ->selectRaw('SUM(CASE WHEN ' . $table_prefix . 'sosa_fat.majs_i_id IS NULL AND ' . $table_prefix . 'sosa_mot.majs_i_id IS NULL THEN 1 ELSE 0 END) AS full_root_count')  //@phpcs:ignore Generic.Files.LineLength.TooLong
405
-            ->selectRaw('SUM(CASE WHEN ' . $table_prefix . 'sosa_fat.majs_i_id IS NULL AND ' . $table_prefix . 'sosa_mot.majs_i_id IS NULL THEN 0 ELSE 1 END) As semi_root_count')  //@phpcs:ignore Generic.Files.LineLength.TooLong
406
-            ->leftJoin('maj_sosa AS sosa_fat', function (JoinClause $join) use ($table_prefix): void {
401
+            ->selectRaw($table_prefix.'sosa.majs_gen - ? AS majs_gen_norm', [$gen])
402
+            ->selectRaw('FLOOR((('.$table_prefix.'sosa.majs_sosa / POW(2, '.$table_prefix.'sosa.majs_gen -1 )) - 1) * POWER(2, ? - 1)) + POWER(2, ? - 1) AS root_ancestor', [$gen, $gen])   //@phpcs:ignore Generic.Files.LineLength.TooLong
403
+            ->selectRaw('SUM(CASE WHEN '.$table_prefix.'sosa_fat.majs_i_id IS NULL AND '.$table_prefix.'sosa_mot.majs_i_id IS NULL THEN 1 ELSE 0 END) AS full_root_count')  //@phpcs:ignore Generic.Files.LineLength.TooLong
404
+            ->selectRaw('SUM(CASE WHEN '.$table_prefix.'sosa_fat.majs_i_id IS NULL AND '.$table_prefix.'sosa_mot.majs_i_id IS NULL THEN 0 ELSE 1 END) As semi_root_count')  //@phpcs:ignore Generic.Files.LineLength.TooLong
405
+            ->leftJoin('maj_sosa AS sosa_fat', function(JoinClause $join) use ($table_prefix): void {
407 406
                 // Link to sosa's father
408
-                $join->whereRaw($table_prefix . 'sosa_fat.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa')
407
+                $join->whereRaw($table_prefix.'sosa_fat.majs_sosa = 2 * '.$table_prefix.'sosa.majs_sosa')
409 408
                 ->where('sosa_fat.majs_gedcom_id', '=', $this->tree->id())
410 409
                 ->where('sosa_fat.majs_user_id', '=', $this->user->id());
411 410
             })
412
-            ->leftJoin('maj_sosa AS sosa_mot', function (JoinClause $join) use ($table_prefix): void {
411
+            ->leftJoin('maj_sosa AS sosa_mot', function(JoinClause $join) use ($table_prefix): void {
413 412
                 // Link to sosa's mother
414
-                $join->whereRaw($table_prefix . 'sosa_mot.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa + 1')
413
+                $join->whereRaw($table_prefix.'sosa_mot.majs_sosa = 2 * '.$table_prefix.'sosa.majs_sosa + 1')
415 414
                 ->where('sosa_mot.majs_gedcom_id', '=', $this->tree->id())
416 415
                 ->where('sosa_mot.majs_user_id', '=', $this->user->id());
417 416
             })
418 417
             ->where('sosa.majs_gedcom_id', '=', $this->tree->id())
419 418
             ->where('sosa.majs_user_id', '=', $this->user->id())
420 419
             ->where('sosa.majs_gen', '>=', $gen)
421
-            ->where(function (Builder $query): void {
420
+            ->where(function(Builder $query): void {
422 421
                 $query->whereNull('sosa_fat.majs_i_id')
423 422
                     ->orWhereNull('sosa_mot.majs_i_id');
424 423
             })
@@ -427,11 +426,11 @@  discard block
 block discarded – undo
427 426
         return DB::table('maj_sosa AS sosa_list')
428 427
             ->select(['stats_by_gen.root_ancestor AS root_ancestor_sosa', 'sosa_list.majs_i_id as root_ancestor_id'])
429 428
             ->selectRaw('1 + SUM( (majs_gen_norm) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm))) AS mean_gen_depth')  //@phpcs:ignore Generic.Files.LineLength.TooLong
430
-            ->selectRaw(' SQRT(' .
431
-                '   SUM(POWER(majs_gen_norm, 2) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm)))' .     //@phpcs:ignore Generic.Files.LineLength.TooLong
432
-                '   - POWER( SUM( (majs_gen_norm) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm))), 2)' .       //@phpcs:ignore Generic.Files.LineLength.TooLong
429
+            ->selectRaw(' SQRT('.
430
+                '   SUM(POWER(majs_gen_norm, 2) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm)))'.//@phpcs:ignore Generic.Files.LineLength.TooLong
431
+                '   - POWER( SUM( (majs_gen_norm) * ( 2 * full_root_count + semi_root_count) /  (2 * POWER(2, majs_gen_norm))), 2)'.//@phpcs:ignore Generic.Files.LineLength.TooLong
433 432
                 ' ) AS stddev_gen_depth')
434
-            ->joinSub($missing_ancestors_by_gen, 'stats_by_gen', function (JoinClause $join): void {
433
+            ->joinSub($missing_ancestors_by_gen, 'stats_by_gen', function(JoinClause $join): void {
435 434
                 $join->on('sosa_list.majs_sosa', '=', 'stats_by_gen.root_ancestor')
436 435
                     ->where('sosa_list.majs_gedcom_id', '=', $this->tree->id())
437 436
                     ->where('sosa_list.majs_user_id', '=', $this->user->id());
@@ -460,16 +459,16 @@  discard block
 block discarded – undo
460 459
         $table_prefix = DB::connection()->getTablePrefix();
461 460
         $multiple_ancestors = DB::table('maj_sosa AS sosa')
462 461
             ->select('sosa.majs_i_id AS sosa_i_id')
463
-            ->selectRaw('COUNT(' . $table_prefix . 'sosa.majs_sosa) AS sosa_count')
464
-            ->leftJoin('maj_sosa AS sosa_fat', function (JoinClause $join) use ($table_prefix): void {
462
+            ->selectRaw('COUNT('.$table_prefix.'sosa.majs_sosa) AS sosa_count')
463
+            ->leftJoin('maj_sosa AS sosa_fat', function(JoinClause $join) use ($table_prefix): void {
465 464
                 // Link to sosa's father
466
-                $join->whereRaw($table_prefix . 'sosa_fat.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa')
465
+                $join->whereRaw($table_prefix.'sosa_fat.majs_sosa = 2 * '.$table_prefix.'sosa.majs_sosa')
467 466
                     ->where('sosa_fat.majs_gedcom_id', '=', $this->tree->id())
468 467
                     ->where('sosa_fat.majs_user_id', '=', $this->user->id());
469 468
             })
470
-            ->leftJoin('maj_sosa AS sosa_mot', function (JoinClause $join) use ($table_prefix): void {
469
+            ->leftJoin('maj_sosa AS sosa_mot', function(JoinClause $join) use ($table_prefix): void {
471 470
                 // Link to sosa's mother
472
-                $join->whereRaw($table_prefix . 'sosa_mot.majs_sosa = 2 * ' . $table_prefix . 'sosa.majs_sosa + 1')
471
+                $join->whereRaw($table_prefix.'sosa_mot.majs_sosa = 2 * '.$table_prefix.'sosa.majs_sosa + 1')
473 472
                 ->where('sosa_mot.majs_gedcom_id', '=', $this->tree->id())
474 473
                 ->where('sosa_mot.majs_user_id', '=', $this->user->id());
475 474
             })
@@ -478,15 +477,15 @@  discard block
 block discarded – undo
478 477
             ->whereNull('sosa_fat.majs_sosa')   // We keep only root individuals, i.e. those with no father or mother
479 478
             ->whereNull('sosa_mot.majs_sosa')
480 479
             ->groupBy('sosa.majs_i_id')
481
-            ->havingRaw('COUNT(' . $table_prefix . 'sosa.majs_sosa) > 1')    // Limit to the duplicate sosas.
482
-            ->orderByRaw('COUNT(' . $table_prefix . 'sosa.majs_sosa) DESC, MIN(' . $table_prefix . 'sosa.majs_sosa) ASC')   //@phpcs:ignore Generic.Files.LineLength.TooLong
480
+            ->havingRaw('COUNT('.$table_prefix.'sosa.majs_sosa) > 1')    // Limit to the duplicate sosas.
481
+            ->orderByRaw('COUNT('.$table_prefix.'sosa.majs_sosa) DESC, MIN('.$table_prefix.'sosa.majs_sosa) ASC')   //@phpcs:ignore Generic.Files.LineLength.TooLong
483 482
             ->limit($limit + 1)     // We want to select one more than required, for ties
484 483
             ->get();
485 484
 
486 485
         if ($multiple_ancestors->count() > $limit) {
487 486
             $last_count = $multiple_ancestors->last()->sosa_count;
488
-            $multiple_ancestors = $multiple_ancestors->reject(function (stdClass $element) use ($last_count): bool {
489
-                return $element->sosa_count ==  $last_count;
487
+            $multiple_ancestors = $multiple_ancestors->reject(function(stdClass $element) use ($last_count): bool {
488
+                return $element->sosa_count == $last_count;
490 489
             });
491 490
         }
492 491
         return $multiple_ancestors;
Please login to merge, or discard this patch.
app/Module/Sosa/GeoAnalyses/SosaByGenerationGeoAnalysis.php 2 patches
Indentation   +97 added lines, -97 removed lines patch added patch discarded remove patch
@@ -31,101 +31,101 @@
 block discarded – undo
31 31
  */
32 32
 class SosaByGenerationGeoAnalysis implements GeoAnalysisInterface
33 33
 {
34
-    private SosaRecordsService $records_service;
35
-
36
-    /**
37
-     * Constructor for SosaByGenerationGeoAnalysis
38
-     *
39
-     * @param SosaRecordsService $records_service
40
-     */
41
-    public function __construct(SosaRecordsService $records_service)
42
-    {
43
-        $this->records_service = $records_service;
44
-    }
45
-
46
-    /**
47
-     * {@inheritDoc}
48
-     * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\GeoAnalysisInterface::title()
49
-     */
50
-    public function title(): string
51
-    {
52
-        return I18N::translate('Sosa ancestors places by generation');
53
-    }
54
-
55
-    /**
56
-     * {@inheritDoc}
57
-     * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\GeoAnalysisInterface::itemsDescription()
58
-     */
59
-    public function itemsDescription(): callable
60
-    {
61
-        return fn(int $count): string => I18N::plural('ancestor', 'ancestors', $count);
62
-    }
63
-
64
-    /**
65
-     * {@inheritDoc}
66
-     * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\GeoAnalysisInterface::results()
67
-     */
68
-    public function results(Tree $tree, int $depth): GeoAnalysisResults
69
-    {
70
-        $results = new GeoAnalysisResults();
71
-
72
-        $unique_ancestors = $this->records_service
73
-            ->listAncestors($tree, Auth::user())
74
-            ->uniqueStrict(fn(stdClass $item): string => $item->majs_i_id);
75
-
76
-        foreach ($unique_ancestors as $item) {
77
-            $ancestor = Registry::individualFactory()->make($item->majs_i_id, $tree);
78
-            if ($ancestor === null || !$ancestor->canShow()) {
79
-                continue;
80
-            }
81
-            $generation = $this->records_service->generation((int) $item->majs_sosa);
82
-            $significantplace = new GeoAnalysisPlace($tree, null, $depth);
83
-            foreach ($this->significantPlaces($ancestor) as $place) {
84
-                $significantplace = new GeoAnalysisPlace($tree, $place, $depth, true);
85
-                if ($significantplace->isKnown()) {
86
-                    break;
87
-                }
88
-            }
89
-            $results->addPlace($significantplace);
90
-            $results->addPlaceInCategory(
91
-                I18N::translate('Generation %s', I18N::number($generation)),
92
-                $generation,
93
-                $significantplace
94
-            );
95
-        }
96
-
97
-        return $results;
98
-    }
99
-
100
-    /**
101
-     * Returns significant places in order of priority for an individual
102
-     *
103
-     * @param Individual $individual
104
-     * @return Generator<\Fisharebest\Webtrees\Place>
105
-     */
106
-    protected function significantPlaces(Individual $individual): Generator
107
-    {
108
-        yield $individual->getBirthPlace();
109
-
110
-        /** @var \Fisharebest\Webtrees\Fact $fact */
111
-        foreach ($individual->facts(['RESI']) as $fact) {
112
-            yield $fact->place();
113
-        }
114
-
115
-        yield $individual->getDeathPlace();
116
-
117
-        /** @var \Fisharebest\Webtrees\Family $family */
118
-        foreach ($individual->childFamilies() as $family) {
119
-            foreach ($family->facts(['RESI']) as $fact) {
120
-                yield $fact->place();
121
-            }
122
-        }
123
-
124
-        /** @var \Fisharebest\Webtrees\Family $family */
125
-        foreach ($individual->spouseFamilies() as $family) {
126
-            foreach ($family->facts(['RESI']) as $fact) {
127
-                yield $fact->place();
128
-            }
129
-        }
130
-    }
34
+	private SosaRecordsService $records_service;
35
+
36
+	/**
37
+	 * Constructor for SosaByGenerationGeoAnalysis
38
+	 *
39
+	 * @param SosaRecordsService $records_service
40
+	 */
41
+	public function __construct(SosaRecordsService $records_service)
42
+	{
43
+		$this->records_service = $records_service;
44
+	}
45
+
46
+	/**
47
+	 * {@inheritDoc}
48
+	 * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\GeoAnalysisInterface::title()
49
+	 */
50
+	public function title(): string
51
+	{
52
+		return I18N::translate('Sosa ancestors places by generation');
53
+	}
54
+
55
+	/**
56
+	 * {@inheritDoc}
57
+	 * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\GeoAnalysisInterface::itemsDescription()
58
+	 */
59
+	public function itemsDescription(): callable
60
+	{
61
+		return fn(int $count): string => I18N::plural('ancestor', 'ancestors', $count);
62
+	}
63
+
64
+	/**
65
+	 * {@inheritDoc}
66
+	 * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\GeoAnalysisInterface::results()
67
+	 */
68
+	public function results(Tree $tree, int $depth): GeoAnalysisResults
69
+	{
70
+		$results = new GeoAnalysisResults();
71
+
72
+		$unique_ancestors = $this->records_service
73
+			->listAncestors($tree, Auth::user())
74
+			->uniqueStrict(fn(stdClass $item): string => $item->majs_i_id);
75
+
76
+		foreach ($unique_ancestors as $item) {
77
+			$ancestor = Registry::individualFactory()->make($item->majs_i_id, $tree);
78
+			if ($ancestor === null || !$ancestor->canShow()) {
79
+				continue;
80
+			}
81
+			$generation = $this->records_service->generation((int) $item->majs_sosa);
82
+			$significantplace = new GeoAnalysisPlace($tree, null, $depth);
83
+			foreach ($this->significantPlaces($ancestor) as $place) {
84
+				$significantplace = new GeoAnalysisPlace($tree, $place, $depth, true);
85
+				if ($significantplace->isKnown()) {
86
+					break;
87
+				}
88
+			}
89
+			$results->addPlace($significantplace);
90
+			$results->addPlaceInCategory(
91
+				I18N::translate('Generation %s', I18N::number($generation)),
92
+				$generation,
93
+				$significantplace
94
+			);
95
+		}
96
+
97
+		return $results;
98
+	}
99
+
100
+	/**
101
+	 * Returns significant places in order of priority for an individual
102
+	 *
103
+	 * @param Individual $individual
104
+	 * @return Generator<\Fisharebest\Webtrees\Place>
105
+	 */
106
+	protected function significantPlaces(Individual $individual): Generator
107
+	{
108
+		yield $individual->getBirthPlace();
109
+
110
+		/** @var \Fisharebest\Webtrees\Fact $fact */
111
+		foreach ($individual->facts(['RESI']) as $fact) {
112
+			yield $fact->place();
113
+		}
114
+
115
+		yield $individual->getDeathPlace();
116
+
117
+		/** @var \Fisharebest\Webtrees\Family $family */
118
+		foreach ($individual->childFamilies() as $family) {
119
+			foreach ($family->facts(['RESI']) as $fact) {
120
+				yield $fact->place();
121
+			}
122
+		}
123
+
124
+		/** @var \Fisharebest\Webtrees\Family $family */
125
+		foreach ($individual->spouseFamilies() as $family) {
126
+			foreach ($family->facts(['RESI']) as $fact) {
127
+				yield $fact->place();
128
+			}
129
+		}
130
+	}
131 131
 }
Please login to merge, or discard this patch.
Spacing   +1 added lines, -1 removed lines patch added patch discarded remove patch
@@ -78,7 +78,7 @@
 block discarded – undo
78 78
             if ($ancestor === null || !$ancestor->canShow()) {
79 79
                 continue;
80 80
             }
81
-            $generation = $this->records_service->generation((int) $item->majs_sosa);
81
+            $generation = $this->records_service->generation((int)$item->majs_sosa);
82 82
             $significantplace = new GeoAnalysisPlace($tree, null, $depth);
83 83
             foreach ($this->significantPlaces($ancestor) as $place) {
84 84
                 $significantplace = new GeoAnalysisPlace($tree, $place, $depth, true);
Please login to merge, or discard this patch.
app/Module/GeoDispersion/GeoDispersionModule.php 2 patches
Indentation   +181 added lines, -181 removed lines patch added patch discarded remove patch
@@ -59,186 +59,186 @@
 block discarded – undo
59 59
  * Geographical Dispersion Module.
60 60
  */
61 61
 class GeoDispersionModule extends AbstractModule implements
62
-    ModuleMyArtJaubInterface,
63
-    ModuleChartInterface,
64
-    ModuleConfigInterface,
65
-    ModuleGlobalInterface,
66
-    ModuleGeoAnalysisProviderInterface,
67
-    ModulePlaceMapperProviderInterface
62
+	ModuleMyArtJaubInterface,
63
+	ModuleChartInterface,
64
+	ModuleConfigInterface,
65
+	ModuleGlobalInterface,
66
+	ModuleGeoAnalysisProviderInterface,
67
+	ModulePlaceMapperProviderInterface
68 68
 {
69
-    use ModuleMyArtJaubTrait {
70
-        boot as traitBoot;
71
-    }
72
-    use ModuleChartTrait;
73
-    use ModuleConfigTrait;
74
-    use ModuleGlobalTrait;
75
-
76
-    // How to update the database schema for this module
77
-    private const SCHEMA_TARGET_VERSION   = 3;
78
-    private const SCHEMA_SETTING_NAME     = 'MAJ_GEODISP_SCHEMA_VERSION';
79
-    private const SCHEMA_MIGRATION_PREFIX = __NAMESPACE__ . '\Schema';
80
-
81
-    /**
82
-     * {@inheritDoc}
83
-     * @see \Fisharebest\Webtrees\Module\AbstractModule::title()
84
-     */
85
-    public function title(): string
86
-    {
87
-        return /* I18N: Name of the “GeoDispersion” module */ I18N::translate('Geographical dispersion');
88
-    }
89
-
90
-    /**
91
-     * {@inheritDoc}
92
-     * @see \Fisharebest\Webtrees\Module\AbstractModule::description()
93
-     */
94
-    public function description(): string
95
-    {
96
-        //phpcs:ignore Generic.Files.LineLength.TooLong
97
-        return /* I18N: Description of the “GeoDispersion” module */ I18N::translate('Perform and display geographical dispersion analyses.');
98
-    }
99
-
100
-    /**
101
-     * {@inheritDoc}
102
-     * @see \Fisharebest\Webtrees\Module\AbstractModule::boot()
103
-     */
104
-    public function boot(): void
105
-    {
106
-        $this->traitBoot();
107
-        app(MigrationService::class)->updateSchema(
108
-            self::SCHEMA_MIGRATION_PREFIX,
109
-            self::SCHEMA_SETTING_NAME,
110
-            self::SCHEMA_TARGET_VERSION
111
-        );
112
-    }
113
-
114
-    /**
115
-     * {@inheritDoc}
116
-     * @see \Fisharebest\Webtrees\Module\ModuleCustomInterface::customModuleVersion()
117
-     */
118
-    public function customModuleVersion(): string
119
-    {
120
-        return '2.1.0-v.1';
121
-    }
122
-
123
-    /**
124
-     * {@inheritDoc}
125
-     * @see \MyArtJaub\Webtrees\Module\ModuleMyArtJaubInterface::loadRoutes()
126
-     */
127
-    public function loadRoutes(Map $router): void
128
-    {
129
-        $router->attach('', '', static function (Map $router): void {
130
-
131
-            $router->attach('', '/module-maj/geodispersion', static function (Map $router): void {
132
-                $router->attach('', '/admin', static function (Map $router): void {
133
-                    $router->get(AdminConfigPage::class, '/config{/tree}', AdminConfigPage::class);
134
-
135
-                    $router->attach('', '/analysis-views/{tree}', static function (Map $router): void {
136
-                        $router->tokens(['view_id' => '\d+', 'enable' => '[01]']);
137
-                        $router->extras([
138
-                            'middleware' => [
139
-                                AuthManager::class,
140
-                            ],
141
-                        ]);
142
-                        $router->get(GeoAnalysisViewListData::class, '', GeoAnalysisViewListData::class);
143
-
144
-                        $router->get(GeoAnalysisViewAddPage::class, '/add', GeoAnalysisViewAddPage::class);
145
-                        $router->post(GeoAnalysisViewAddAction::class, '/add', GeoAnalysisViewAddAction::class);
146
-                        $router->get(GeoAnalysisViewEditPage::class, '/{view_id}', GeoAnalysisViewEditPage::class);
147
-                        $router->post(GeoAnalysisViewEditAction::class, '/{view_id}', GeoAnalysisViewEditAction::class);
148
-                        //phpcs:disable Generic.Files.LineLength.TooLong
149
-                        $router->get(GeoAnalysisViewStatusAction::class, '/{view_id}/status/{enable}', GeoAnalysisViewStatusAction::class);
150
-                        $router->get(GeoAnalysisViewDeleteAction::class, '/{view_id}/delete', GeoAnalysisViewDeleteAction::class);
151
-                        //phpcs:enable
152
-                    });
153
-
154
-                    $router->attach('', '/map-adapters/{tree}', static function (Map $router): void {
155
-                        $router->tokens(['adapter_id' => '\d+', 'view_id' => '\d+']);
156
-                        $router->extras([
157
-                            'middleware' => [
158
-                                AuthManager::class,
159
-                            ],
160
-                        ]);
161
-
162
-                        $router->get(MapAdapterAddPage::class, '/add/{view_id}', MapAdapterAddPage::class);
163
-                        $router->post(MapAdapterAddAction::class, '/add/{view_id}', MapAdapterAddAction::class);
164
-                        $router->get(MapAdapterEditPage::class, '/{adapter_id}', MapAdapterEditPage::class);
165
-                        $router->post(MapAdapterEditAction::class, '/{adapter_id}', MapAdapterEditAction::class);
166
-                        //phpcs:disable Generic.Files.LineLength.TooLong
167
-                        $router->get(MapAdapterDeleteAction::class, '/{adapter_id}/delete', MapAdapterDeleteAction::class);
168
-                        $router->get(MapAdapterDeleteInvalidAction::class, '/delete-invalid/{view_id}', MapAdapterDeleteInvalidAction::class);
169
-                        $router->get(MapAdapterMapperConfig::class, '/mapper/config{/adapter_id}', MapAdapterMapperConfig::class);
170
-                        //phpcs:enable
171
-                    });
172
-
173
-                    //phpcs:ignore Generic.Files.LineLength.TooLong
174
-                    $router->get(MapFeaturePropertyData::class, '/map/feature-properties{/map_id}', MapFeaturePropertyData::class);
175
-                });
176
-
177
-                $router->get(GeoAnalysisViewsList::class, '/list/{tree}', GeoAnalysisViewsList::class);
178
-
179
-                $router->attach('', '/analysisview/{tree}/{view_id}', static function (Map $router): void {
180
-                    $router->tokens(['view_id' => '\d+']);
181
-                    $router->get(GeoAnalysisViewPage::class, '', GeoAnalysisViewPage::class);
182
-                    $router->get(GeoAnalysisViewTabs::class, '/tabs', GeoAnalysisViewTabs::class);
183
-                });
184
-            });
185
-        });
186
-    }
187
-
188
-    public function getConfigLink(): string
189
-    {
190
-        return route(AdminConfigPage::class);
191
-    }
192
-
193
-    /**
194
-     * {@inheritDoc}
195
-     * @see \Fisharebest\Webtrees\Module\ModuleChartInterface::chartUrl()
196
-     */
197
-    public function chartUrl(Individual $individual, array $parameters = []): string
198
-    {
199
-        return route(GeoAnalysisViewsList::class, ['tree' => $individual->tree()->name()] + $parameters);
200
-    }
201
-
202
-    /**
203
-     * {@inheritDoc}
204
-     * @see \Fisharebest\Webtrees\Module\ModuleChartInterface::chartMenuClass()
205
-     */
206
-    public function chartMenuClass(): string
207
-    {
208
-        return 'menu-maj-geodispersion';
209
-    }
210
-
211
-    /**
212
-     * {@inheritDoc}
213
-     * @see \Fisharebest\Webtrees\Module\ModuleGlobalInterface::headContent()
214
-     */
215
-    public function headContent(): string
216
-    {
217
-        return '<link rel="stylesheet" href="' . e($this->moduleCssUrl()) . '">';
218
-    }
219
-
220
-    /**
221
-     * {@inheritDoc}
222
-     * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\ModulePlaceMapperProviderInterface::listPlaceMappers()
223
-     */
224
-    public function listPlaceMappers(): array
225
-    {
226
-        return [
227
-            CoordinatesPlaceMapper::class,
228
-            SimplePlaceMapper::class,
229
-            SimpleTopFilteredPlaceMapper::class
230
-        ];
231
-    }
232
-
233
-    /**
234
-     * {@inheritDoc}
235
-     * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\ModuleGeoAnalysisProviderInterface::listGeoAnalyses()
236
-     */
237
-    public function listGeoAnalyses(): array
238
-    {
239
-        return [
240
-            AllEventsByCenturyGeoAnalysis::class,
241
-            AllEventsByTypeGeoAnalysis::class
242
-        ];
243
-    }
69
+	use ModuleMyArtJaubTrait {
70
+		boot as traitBoot;
71
+	}
72
+	use ModuleChartTrait;
73
+	use ModuleConfigTrait;
74
+	use ModuleGlobalTrait;
75
+
76
+	// How to update the database schema for this module
77
+	private const SCHEMA_TARGET_VERSION   = 3;
78
+	private const SCHEMA_SETTING_NAME     = 'MAJ_GEODISP_SCHEMA_VERSION';
79
+	private const SCHEMA_MIGRATION_PREFIX = __NAMESPACE__ . '\Schema';
80
+
81
+	/**
82
+	 * {@inheritDoc}
83
+	 * @see \Fisharebest\Webtrees\Module\AbstractModule::title()
84
+	 */
85
+	public function title(): string
86
+	{
87
+		return /* I18N: Name of the “GeoDispersion” module */ I18N::translate('Geographical dispersion');
88
+	}
89
+
90
+	/**
91
+	 * {@inheritDoc}
92
+	 * @see \Fisharebest\Webtrees\Module\AbstractModule::description()
93
+	 */
94
+	public function description(): string
95
+	{
96
+		//phpcs:ignore Generic.Files.LineLength.TooLong
97
+		return /* I18N: Description of the “GeoDispersion” module */ I18N::translate('Perform and display geographical dispersion analyses.');
98
+	}
99
+
100
+	/**
101
+	 * {@inheritDoc}
102
+	 * @see \Fisharebest\Webtrees\Module\AbstractModule::boot()
103
+	 */
104
+	public function boot(): void
105
+	{
106
+		$this->traitBoot();
107
+		app(MigrationService::class)->updateSchema(
108
+			self::SCHEMA_MIGRATION_PREFIX,
109
+			self::SCHEMA_SETTING_NAME,
110
+			self::SCHEMA_TARGET_VERSION
111
+		);
112
+	}
113
+
114
+	/**
115
+	 * {@inheritDoc}
116
+	 * @see \Fisharebest\Webtrees\Module\ModuleCustomInterface::customModuleVersion()
117
+	 */
118
+	public function customModuleVersion(): string
119
+	{
120
+		return '2.1.0-v.1';
121
+	}
122
+
123
+	/**
124
+	 * {@inheritDoc}
125
+	 * @see \MyArtJaub\Webtrees\Module\ModuleMyArtJaubInterface::loadRoutes()
126
+	 */
127
+	public function loadRoutes(Map $router): void
128
+	{
129
+		$router->attach('', '', static function (Map $router): void {
130
+
131
+			$router->attach('', '/module-maj/geodispersion', static function (Map $router): void {
132
+				$router->attach('', '/admin', static function (Map $router): void {
133
+					$router->get(AdminConfigPage::class, '/config{/tree}', AdminConfigPage::class);
134
+
135
+					$router->attach('', '/analysis-views/{tree}', static function (Map $router): void {
136
+						$router->tokens(['view_id' => '\d+', 'enable' => '[01]']);
137
+						$router->extras([
138
+							'middleware' => [
139
+								AuthManager::class,
140
+							],
141
+						]);
142
+						$router->get(GeoAnalysisViewListData::class, '', GeoAnalysisViewListData::class);
143
+
144
+						$router->get(GeoAnalysisViewAddPage::class, '/add', GeoAnalysisViewAddPage::class);
145
+						$router->post(GeoAnalysisViewAddAction::class, '/add', GeoAnalysisViewAddAction::class);
146
+						$router->get(GeoAnalysisViewEditPage::class, '/{view_id}', GeoAnalysisViewEditPage::class);
147
+						$router->post(GeoAnalysisViewEditAction::class, '/{view_id}', GeoAnalysisViewEditAction::class);
148
+						//phpcs:disable Generic.Files.LineLength.TooLong
149
+						$router->get(GeoAnalysisViewStatusAction::class, '/{view_id}/status/{enable}', GeoAnalysisViewStatusAction::class);
150
+						$router->get(GeoAnalysisViewDeleteAction::class, '/{view_id}/delete', GeoAnalysisViewDeleteAction::class);
151
+						//phpcs:enable
152
+					});
153
+
154
+					$router->attach('', '/map-adapters/{tree}', static function (Map $router): void {
155
+						$router->tokens(['adapter_id' => '\d+', 'view_id' => '\d+']);
156
+						$router->extras([
157
+							'middleware' => [
158
+								AuthManager::class,
159
+							],
160
+						]);
161
+
162
+						$router->get(MapAdapterAddPage::class, '/add/{view_id}', MapAdapterAddPage::class);
163
+						$router->post(MapAdapterAddAction::class, '/add/{view_id}', MapAdapterAddAction::class);
164
+						$router->get(MapAdapterEditPage::class, '/{adapter_id}', MapAdapterEditPage::class);
165
+						$router->post(MapAdapterEditAction::class, '/{adapter_id}', MapAdapterEditAction::class);
166
+						//phpcs:disable Generic.Files.LineLength.TooLong
167
+						$router->get(MapAdapterDeleteAction::class, '/{adapter_id}/delete', MapAdapterDeleteAction::class);
168
+						$router->get(MapAdapterDeleteInvalidAction::class, '/delete-invalid/{view_id}', MapAdapterDeleteInvalidAction::class);
169
+						$router->get(MapAdapterMapperConfig::class, '/mapper/config{/adapter_id}', MapAdapterMapperConfig::class);
170
+						//phpcs:enable
171
+					});
172
+
173
+					//phpcs:ignore Generic.Files.LineLength.TooLong
174
+					$router->get(MapFeaturePropertyData::class, '/map/feature-properties{/map_id}', MapFeaturePropertyData::class);
175
+				});
176
+
177
+				$router->get(GeoAnalysisViewsList::class, '/list/{tree}', GeoAnalysisViewsList::class);
178
+
179
+				$router->attach('', '/analysisview/{tree}/{view_id}', static function (Map $router): void {
180
+					$router->tokens(['view_id' => '\d+']);
181
+					$router->get(GeoAnalysisViewPage::class, '', GeoAnalysisViewPage::class);
182
+					$router->get(GeoAnalysisViewTabs::class, '/tabs', GeoAnalysisViewTabs::class);
183
+				});
184
+			});
185
+		});
186
+	}
187
+
188
+	public function getConfigLink(): string
189
+	{
190
+		return route(AdminConfigPage::class);
191
+	}
192
+
193
+	/**
194
+	 * {@inheritDoc}
195
+	 * @see \Fisharebest\Webtrees\Module\ModuleChartInterface::chartUrl()
196
+	 */
197
+	public function chartUrl(Individual $individual, array $parameters = []): string
198
+	{
199
+		return route(GeoAnalysisViewsList::class, ['tree' => $individual->tree()->name()] + $parameters);
200
+	}
201
+
202
+	/**
203
+	 * {@inheritDoc}
204
+	 * @see \Fisharebest\Webtrees\Module\ModuleChartInterface::chartMenuClass()
205
+	 */
206
+	public function chartMenuClass(): string
207
+	{
208
+		return 'menu-maj-geodispersion';
209
+	}
210
+
211
+	/**
212
+	 * {@inheritDoc}
213
+	 * @see \Fisharebest\Webtrees\Module\ModuleGlobalInterface::headContent()
214
+	 */
215
+	public function headContent(): string
216
+	{
217
+		return '<link rel="stylesheet" href="' . e($this->moduleCssUrl()) . '">';
218
+	}
219
+
220
+	/**
221
+	 * {@inheritDoc}
222
+	 * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\ModulePlaceMapperProviderInterface::listPlaceMappers()
223
+	 */
224
+	public function listPlaceMappers(): array
225
+	{
226
+		return [
227
+			CoordinatesPlaceMapper::class,
228
+			SimplePlaceMapper::class,
229
+			SimpleTopFilteredPlaceMapper::class
230
+		];
231
+	}
232
+
233
+	/**
234
+	 * {@inheritDoc}
235
+	 * @see \MyArtJaub\Webtrees\Contracts\GeoDispersion\ModuleGeoAnalysisProviderInterface::listGeoAnalyses()
236
+	 */
237
+	public function listGeoAnalyses(): array
238
+	{
239
+		return [
240
+			AllEventsByCenturyGeoAnalysis::class,
241
+			AllEventsByTypeGeoAnalysis::class
242
+		];
243
+	}
244 244
 }
Please login to merge, or discard this patch.
Spacing   +8 added lines, -8 removed lines patch added patch discarded remove patch
@@ -76,7 +76,7 @@  discard block
 block discarded – undo
76 76
     // How to update the database schema for this module
77 77
     private const SCHEMA_TARGET_VERSION   = 3;
78 78
     private const SCHEMA_SETTING_NAME     = 'MAJ_GEODISP_SCHEMA_VERSION';
79
-    private const SCHEMA_MIGRATION_PREFIX = __NAMESPACE__ . '\Schema';
79
+    private const SCHEMA_MIGRATION_PREFIX = __NAMESPACE__.'\Schema';
80 80
 
81 81
     /**
82 82
      * {@inheritDoc}
@@ -126,13 +126,13 @@  discard block
 block discarded – undo
126 126
      */
127 127
     public function loadRoutes(Map $router): void
128 128
     {
129
-        $router->attach('', '', static function (Map $router): void {
129
+        $router->attach('', '', static function(Map $router): void {
130 130
 
131
-            $router->attach('', '/module-maj/geodispersion', static function (Map $router): void {
132
-                $router->attach('', '/admin', static function (Map $router): void {
131
+            $router->attach('', '/module-maj/geodispersion', static function(Map $router): void {
132
+                $router->attach('', '/admin', static function(Map $router): void {
133 133
                     $router->get(AdminConfigPage::class, '/config{/tree}', AdminConfigPage::class);
134 134
 
135
-                    $router->attach('', '/analysis-views/{tree}', static function (Map $router): void {
135
+                    $router->attach('', '/analysis-views/{tree}', static function(Map $router): void {
136 136
                         $router->tokens(['view_id' => '\d+', 'enable' => '[01]']);
137 137
                         $router->extras([
138 138
                             'middleware' => [
@@ -151,7 +151,7 @@  discard block
 block discarded – undo
151 151
                         //phpcs:enable
152 152
                     });
153 153
 
154
-                    $router->attach('', '/map-adapters/{tree}', static function (Map $router): void {
154
+                    $router->attach('', '/map-adapters/{tree}', static function(Map $router): void {
155 155
                         $router->tokens(['adapter_id' => '\d+', 'view_id' => '\d+']);
156 156
                         $router->extras([
157 157
                             'middleware' => [
@@ -176,7 +176,7 @@  discard block
 block discarded – undo
176 176
 
177 177
                 $router->get(GeoAnalysisViewsList::class, '/list/{tree}', GeoAnalysisViewsList::class);
178 178
 
179
-                $router->attach('', '/analysisview/{tree}/{view_id}', static function (Map $router): void {
179
+                $router->attach('', '/analysisview/{tree}/{view_id}', static function(Map $router): void {
180 180
                     $router->tokens(['view_id' => '\d+']);
181 181
                     $router->get(GeoAnalysisViewPage::class, '', GeoAnalysisViewPage::class);
182 182
                     $router->get(GeoAnalysisViewTabs::class, '/tabs', GeoAnalysisViewTabs::class);
@@ -214,7 +214,7 @@  discard block
 block discarded – undo
214 214
      */
215 215
     public function headContent(): string
216 216
     {
217
-        return '<link rel="stylesheet" href="' . e($this->moduleCssUrl()) . '">';
217
+        return '<link rel="stylesheet" href="'.e($this->moduleCssUrl()).'">';
218 218
     }
219 219
 
220 220
     /**
Please login to merge, or discard this patch.
app/Module/GeoDispersion/Http/RequestHandlers/GeoAnalysisViewEditPage.php 2 patches
Indentation   +53 added lines, -53 removed lines patch added patch discarded remove patch
@@ -38,64 +38,64 @@
 block discarded – undo
38 38
  */
39 39
 class GeoAnalysisViewEditPage implements RequestHandlerInterface
40 40
 {
41
-    use ViewResponseTrait;
41
+	use ViewResponseTrait;
42 42
 
43
-    private ?GeoDispersionModule $module;
44
-    private GeoAnalysisViewDataService $geoview_data_service;
45
-    private GeoAnalysisService $geoanalysis_service;
46
-    private GeoAnalysisDataService $geoanalysis_data_service;
43
+	private ?GeoDispersionModule $module;
44
+	private GeoAnalysisViewDataService $geoview_data_service;
45
+	private GeoAnalysisService $geoanalysis_service;
46
+	private GeoAnalysisDataService $geoanalysis_data_service;
47 47
 
48
-    /**
49
-     * Constructor for GeoAnalysisViewEditPage Request Handler
50
-     *
51
-     * @param ModuleService $module_service
52
-     * @param GeoAnalysisViewDataService $geoview_data_service
53
-     * @param GeoAnalysisService $geoanalysis_service
54
-     * @param GeoAnalysisDataService $geoanalysis_data_service
55
-     */
56
-    public function __construct(
57
-        ModuleService $module_service,
58
-        GeoAnalysisViewDataService $geoview_data_service,
59
-        GeoAnalysisService $geoanalysis_service,
60
-        GeoAnalysisDataService $geoanalysis_data_service
61
-    ) {
62
-        $this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
63
-        $this->geoview_data_service = $geoview_data_service;
64
-        $this->geoanalysis_service = $geoanalysis_service;
65
-        $this->geoanalysis_data_service = $geoanalysis_data_service;
66
-    }
48
+	/**
49
+	 * Constructor for GeoAnalysisViewEditPage Request Handler
50
+	 *
51
+	 * @param ModuleService $module_service
52
+	 * @param GeoAnalysisViewDataService $geoview_data_service
53
+	 * @param GeoAnalysisService $geoanalysis_service
54
+	 * @param GeoAnalysisDataService $geoanalysis_data_service
55
+	 */
56
+	public function __construct(
57
+		ModuleService $module_service,
58
+		GeoAnalysisViewDataService $geoview_data_service,
59
+		GeoAnalysisService $geoanalysis_service,
60
+		GeoAnalysisDataService $geoanalysis_data_service
61
+	) {
62
+		$this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
63
+		$this->geoview_data_service = $geoview_data_service;
64
+		$this->geoanalysis_service = $geoanalysis_service;
65
+		$this->geoanalysis_data_service = $geoanalysis_data_service;
66
+	}
67 67
 
68
-    /**
69
-     * {@inheritDoc}
70
-     * @see \Psr\Http\Server\RequestHandlerInterface::handle()
71
-     */
72
-    public function handle(ServerRequestInterface $request): ResponseInterface
73
-    {
74
-        $this->layout = 'layouts/administration';
68
+	/**
69
+	 * {@inheritDoc}
70
+	 * @see \Psr\Http\Server\RequestHandlerInterface::handle()
71
+	 */
72
+	public function handle(ServerRequestInterface $request): ResponseInterface
73
+	{
74
+		$this->layout = 'layouts/administration';
75 75
 
76
-        if ($this->module === null) {
77
-            throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
78
-        }
79
-        $tree = $request->getAttribute('tree');
80
-        assert($tree instanceof Tree);
76
+		if ($this->module === null) {
77
+			throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
78
+		}
79
+		$tree = $request->getAttribute('tree');
80
+		assert($tree instanceof Tree);
81 81
 
82
-        $view_id = (int) $request->getAttribute('view_id');
83
-        $view = $this->geoview_data_service->find($tree, $view_id, true);
82
+		$view_id = (int) $request->getAttribute('view_id');
83
+		$view = $this->geoview_data_service->find($tree, $view_id, true);
84 84
 
85
-        if ($view === null) {
86
-            throw new HttpNotFoundException(
87
-                I18N::translate('The geographical dispersion analysis view could not be found.')
88
-            );
89
-        }
85
+		if ($view === null) {
86
+			throw new HttpNotFoundException(
87
+				I18N::translate('The geographical dispersion analysis view could not be found.')
88
+			);
89
+		}
90 90
 
91
-        return $this->viewResponse($this->module->name() . '::admin/view-edit', [
92
-            'module'        =>  $this->module,
93
-            'title'         =>  I18N::translate('Edit the geographical dispersion analysis view - %s', $view->type()),
94
-            'tree'          =>  $tree,
95
-            'view'          =>  $view,
96
-            'geoanalysis_list'  =>  $this->geoanalysis_service->all(),
97
-            'place_example'     =>  $this->geoanalysis_data_service->placeHierarchyExample($tree),
98
-            'global_settings'   =>  $view->globalSettingsContent($this->module)
99
-        ]);
100
-    }
91
+		return $this->viewResponse($this->module->name() . '::admin/view-edit', [
92
+			'module'        =>  $this->module,
93
+			'title'         =>  I18N::translate('Edit the geographical dispersion analysis view - %s', $view->type()),
94
+			'tree'          =>  $tree,
95
+			'view'          =>  $view,
96
+			'geoanalysis_list'  =>  $this->geoanalysis_service->all(),
97
+			'place_example'     =>  $this->geoanalysis_data_service->placeHierarchyExample($tree),
98
+			'global_settings'   =>  $view->globalSettingsContent($this->module)
99
+		]);
100
+	}
101 101
 }
Please login to merge, or discard this patch.
Spacing   +2 added lines, -2 removed lines patch added patch discarded remove patch
@@ -79,7 +79,7 @@  discard block
 block discarded – undo
79 79
         $tree = $request->getAttribute('tree');
80 80
         assert($tree instanceof Tree);
81 81
 
82
-        $view_id = (int) $request->getAttribute('view_id');
82
+        $view_id = (int)$request->getAttribute('view_id');
83 83
         $view = $this->geoview_data_service->find($tree, $view_id, true);
84 84
 
85 85
         if ($view === null) {
@@ -88,7 +88,7 @@  discard block
 block discarded – undo
88 88
             );
89 89
         }
90 90
 
91
-        return $this->viewResponse($this->module->name() . '::admin/view-edit', [
91
+        return $this->viewResponse($this->module->name().'::admin/view-edit', [
92 92
             'module'        =>  $this->module,
93 93
             'title'         =>  I18N::translate('Edit the geographical dispersion analysis view - %s', $view->type()),
94 94
             'tree'          =>  $tree,
Please login to merge, or discard this patch.
app/Module/GeoDispersion/Http/RequestHandlers/GeoAnalysisViewEditAction.php 2 patches
Indentation   +85 added lines, -85 removed lines patch added patch discarded remove patch
@@ -34,89 +34,89 @@
 block discarded – undo
34 34
  */
35 35
 class GeoAnalysisViewEditAction implements RequestHandlerInterface
36 36
 {
37
-    private ?GeoDispersionModule $module;
38
-    private GeoAnalysisViewDataService $geoview_data_service;
39
-
40
-    /**
41
-     * Constructor for GeoAnalysisViewEditAction Request Handler
42
-     *
43
-     * @param ModuleService $module_service
44
-     * @param GeoAnalysisViewDataService $geoview_data_service
45
-     */
46
-    public function __construct(ModuleService $module_service, GeoAnalysisViewDataService $geoview_data_service)
47
-    {
48
-        $this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
49
-        $this->geoview_data_service = $geoview_data_service;
50
-    }
51
-
52
-    /**
53
-     * {@inheritDoc}
54
-     * @see \Psr\Http\Server\RequestHandlerInterface::handle()
55
-     */
56
-    public function handle(ServerRequestInterface $request): ResponseInterface
57
-    {
58
-        $tree = $request->getAttribute('tree');
59
-        assert($tree instanceof Tree);
60
-
61
-        $admin_config_route = route(AdminConfigPage::class, ['tree' => $tree->name()]);
62
-
63
-        if ($this->module === null) {
64
-            FlashMessages::addMessage(
65
-                I18N::translate('The attached module could not be found.'),
66
-                'danger'
67
-            );
68
-            return redirect($admin_config_route);
69
-        }
70
-
71
-
72
-        $view_id = (int) $request->getAttribute('view_id');
73
-        $view = $this->geoview_data_service->find($tree, $view_id, true);
74
-
75
-        $params = (array) $request->getParsedBody();
76
-
77
-        $description    = $params['view_description'] ?? '';
78
-        $place_depth    = (int) ($params['view_depth'] ?? 1);
79
-        $top_places     = (int) ($params['view_top_places'] ?? 0);
80
-
81
-        $analysis = null;
82
-        try {
83
-            $analysis = app($params['view_analysis'] ?? '');
84
-        } catch (BindingResolutionException $ex) {
85
-        }
86
-
87
-        if (
88
-            $view === null
89
-            || $analysis === null || !($analysis instanceof GeoAnalysisInterface)
90
-            || $place_depth <= 0 && $top_places < 0
91
-        ) {
92
-            FlashMessages::addMessage(
93
-                I18N::translate('The parameters for view with ID “%s” are not valid.', I18N::number($view_id)),
94
-                'danger'
95
-            );
96
-            return redirect($admin_config_route);
97
-        }
98
-
99
-        $new_view = $view
100
-            ->with($view->isEnabled(), $description, $analysis, $place_depth, $top_places)
101
-            ->withGlobalSettingsUpdate($request);
102
-
103
-        try {
104
-            $this->geoview_data_service->update($new_view);
105
-            FlashMessages::addMessage(
106
-                I18N::translate('The geographical dispersion analysis view has been successfully updated.'),
107
-                'success'
108
-            );
109
-            //phpcs:ignore Generic.Files.LineLength.TooLong
110
-            Log::addConfigurationLog('Module ' . $this->module->title() . ' : View “' . $view->id() . '” has been updated.');
111
-        } catch (Throwable $ex) {
112
-            FlashMessages::addMessage(
113
-                I18N::translate('An error occured while updating the geographical dispersion analysis view.'),
114
-                'danger'
115
-            );
116
-            //phpcs:ignore Generic.Files.LineLength.TooLong
117
-            Log::addErrorLog('Module ' . $this->module->title() . ' : Error when updating view “' . $view->id() . '”: ' . $ex->getMessage());
118
-        }
119
-
120
-        return redirect($admin_config_route);
121
-    }
37
+	private ?GeoDispersionModule $module;
38
+	private GeoAnalysisViewDataService $geoview_data_service;
39
+
40
+	/**
41
+	 * Constructor for GeoAnalysisViewEditAction Request Handler
42
+	 *
43
+	 * @param ModuleService $module_service
44
+	 * @param GeoAnalysisViewDataService $geoview_data_service
45
+	 */
46
+	public function __construct(ModuleService $module_service, GeoAnalysisViewDataService $geoview_data_service)
47
+	{
48
+		$this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
49
+		$this->geoview_data_service = $geoview_data_service;
50
+	}
51
+
52
+	/**
53
+	 * {@inheritDoc}
54
+	 * @see \Psr\Http\Server\RequestHandlerInterface::handle()
55
+	 */
56
+	public function handle(ServerRequestInterface $request): ResponseInterface
57
+	{
58
+		$tree = $request->getAttribute('tree');
59
+		assert($tree instanceof Tree);
60
+
61
+		$admin_config_route = route(AdminConfigPage::class, ['tree' => $tree->name()]);
62
+
63
+		if ($this->module === null) {
64
+			FlashMessages::addMessage(
65
+				I18N::translate('The attached module could not be found.'),
66
+				'danger'
67
+			);
68
+			return redirect($admin_config_route);
69
+		}
70
+
71
+
72
+		$view_id = (int) $request->getAttribute('view_id');
73
+		$view = $this->geoview_data_service->find($tree, $view_id, true);
74
+
75
+		$params = (array) $request->getParsedBody();
76
+
77
+		$description    = $params['view_description'] ?? '';
78
+		$place_depth    = (int) ($params['view_depth'] ?? 1);
79
+		$top_places     = (int) ($params['view_top_places'] ?? 0);
80
+
81
+		$analysis = null;
82
+		try {
83
+			$analysis = app($params['view_analysis'] ?? '');
84
+		} catch (BindingResolutionException $ex) {
85
+		}
86
+
87
+		if (
88
+			$view === null
89
+			|| $analysis === null || !($analysis instanceof GeoAnalysisInterface)
90
+			|| $place_depth <= 0 && $top_places < 0
91
+		) {
92
+			FlashMessages::addMessage(
93
+				I18N::translate('The parameters for view with ID “%s” are not valid.', I18N::number($view_id)),
94
+				'danger'
95
+			);
96
+			return redirect($admin_config_route);
97
+		}
98
+
99
+		$new_view = $view
100
+			->with($view->isEnabled(), $description, $analysis, $place_depth, $top_places)
101
+			->withGlobalSettingsUpdate($request);
102
+
103
+		try {
104
+			$this->geoview_data_service->update($new_view);
105
+			FlashMessages::addMessage(
106
+				I18N::translate('The geographical dispersion analysis view has been successfully updated.'),
107
+				'success'
108
+			);
109
+			//phpcs:ignore Generic.Files.LineLength.TooLong
110
+			Log::addConfigurationLog('Module ' . $this->module->title() . ' : View “' . $view->id() . '” has been updated.');
111
+		} catch (Throwable $ex) {
112
+			FlashMessages::addMessage(
113
+				I18N::translate('An error occured while updating the geographical dispersion analysis view.'),
114
+				'danger'
115
+			);
116
+			//phpcs:ignore Generic.Files.LineLength.TooLong
117
+			Log::addErrorLog('Module ' . $this->module->title() . ' : Error when updating view “' . $view->id() . '”: ' . $ex->getMessage());
118
+		}
119
+
120
+		return redirect($admin_config_route);
121
+	}
122 122
 }
Please login to merge, or discard this patch.
Spacing   +6 added lines, -6 removed lines patch added patch discarded remove patch
@@ -69,14 +69,14 @@  discard block
 block discarded – undo
69 69
         }
70 70
 
71 71
 
72
-        $view_id = (int) $request->getAttribute('view_id');
72
+        $view_id = (int)$request->getAttribute('view_id');
73 73
         $view = $this->geoview_data_service->find($tree, $view_id, true);
74 74
 
75
-        $params = (array) $request->getParsedBody();
75
+        $params = (array)$request->getParsedBody();
76 76
 
77 77
         $description    = $params['view_description'] ?? '';
78
-        $place_depth    = (int) ($params['view_depth'] ?? 1);
79
-        $top_places     = (int) ($params['view_top_places'] ?? 0);
78
+        $place_depth    = (int)($params['view_depth'] ?? 1);
79
+        $top_places     = (int)($params['view_top_places'] ?? 0);
80 80
 
81 81
         $analysis = null;
82 82
         try {
@@ -107,14 +107,14 @@  discard block
 block discarded – undo
107 107
                 'success'
108 108
             );
109 109
             //phpcs:ignore Generic.Files.LineLength.TooLong
110
-            Log::addConfigurationLog('Module ' . $this->module->title() . ' : View “' . $view->id() . '” has been updated.');
110
+            Log::addConfigurationLog('Module '.$this->module->title().' : View “'.$view->id().'” has been updated.');
111 111
         } catch (Throwable $ex) {
112 112
             FlashMessages::addMessage(
113 113
                 I18N::translate('An error occured while updating the geographical dispersion analysis view.'),
114 114
                 'danger'
115 115
             );
116 116
             //phpcs:ignore Generic.Files.LineLength.TooLong
117
-            Log::addErrorLog('Module ' . $this->module->title() . ' : Error when updating view “' . $view->id() . '”: ' . $ex->getMessage());
117
+            Log::addErrorLog('Module '.$this->module->title().' : Error when updating view “'.$view->id().'”: '.$ex->getMessage());
118 118
         }
119 119
 
120 120
         return redirect($admin_config_route);
Please login to merge, or discard this patch.
app/Module/GeoDispersion/Http/RequestHandlers/GeoAnalysisViewsList.php 2 patches
Indentation   +37 added lines, -37 removed lines patch added patch discarded remove patch
@@ -32,47 +32,47 @@
 block discarded – undo
32 32
  */
33 33
 class GeoAnalysisViewsList implements RequestHandlerInterface
34 34
 {
35
-    use ViewResponseTrait;
35
+	use ViewResponseTrait;
36 36
 
37
-    private ?GeoDispersionModule $module;
38
-    private GeoAnalysisViewDataService $geoviewdata_service;
37
+	private ?GeoDispersionModule $module;
38
+	private GeoAnalysisViewDataService $geoviewdata_service;
39 39
 
40
-    /**
41
-     * Constructor for GeoAnalysisViewsList Request Handler
42
-     *
43
-     * @param ModuleService $module_service
44
-     */
45
-    public function __construct(
46
-        ModuleService $module_service,
47
-        GeoAnalysisViewDataService $geoviewdata_service
48
-    ) {
49
-        $this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
50
-        $this->geoviewdata_service = $geoviewdata_service;
51
-    }
40
+	/**
41
+	 * Constructor for GeoAnalysisViewsList Request Handler
42
+	 *
43
+	 * @param ModuleService $module_service
44
+	 */
45
+	public function __construct(
46
+		ModuleService $module_service,
47
+		GeoAnalysisViewDataService $geoviewdata_service
48
+	) {
49
+		$this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
50
+		$this->geoviewdata_service = $geoviewdata_service;
51
+	}
52 52
 
53
-    /**
54
-     * {@inheritDoc}
55
-     * @see \Psr\Http\Server\RequestHandlerInterface::handle()
56
-     */
57
-    public function handle(ServerRequestInterface $request): ResponseInterface
58
-    {
59
-        if ($this->module === null) {
60
-            throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
61
-        }
53
+	/**
54
+	 * {@inheritDoc}
55
+	 * @see \Psr\Http\Server\RequestHandlerInterface::handle()
56
+	 */
57
+	public function handle(ServerRequestInterface $request): ResponseInterface
58
+	{
59
+		if ($this->module === null) {
60
+			throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
61
+		}
62 62
 
63
-        $tree = $request->getAttribute('tree');
64
-        assert($tree instanceof Tree);
63
+		$tree = $request->getAttribute('tree');
64
+		assert($tree instanceof Tree);
65 65
 
66
-        $views_list = $this->geoviewdata_service
67
-            ->all($tree)
68
-            ->sortBy(fn(AbstractGeoAnalysisView $view) => $view->description());
66
+		$views_list = $this->geoviewdata_service
67
+			->all($tree)
68
+			->sortBy(fn(AbstractGeoAnalysisView $view) => $view->description());
69 69
 
70
-        return $this->viewResponse($this->module->name() . '::geoanalysisviews-list', [
71
-            'module'        =>  $this->module,
72
-            'title'         =>  I18N::translate('Geographical dispersion'),
73
-            'tree'          =>  $tree,
74
-            'views_list'    =>  $views_list,
75
-            'js_script_url' =>  $this->module->assetUrl('js/geodispersion.min.js')
76
-        ]);
77
-    }
70
+		return $this->viewResponse($this->module->name() . '::geoanalysisviews-list', [
71
+			'module'        =>  $this->module,
72
+			'title'         =>  I18N::translate('Geographical dispersion'),
73
+			'tree'          =>  $tree,
74
+			'views_list'    =>  $views_list,
75
+			'js_script_url' =>  $this->module->assetUrl('js/geodispersion.min.js')
76
+		]);
77
+	}
78 78
 }
Please login to merge, or discard this patch.
Spacing   +1 added lines, -1 removed lines patch added patch discarded remove patch
@@ -67,7 +67,7 @@
 block discarded – undo
67 67
             ->all($tree)
68 68
             ->sortBy(fn(AbstractGeoAnalysisView $view) => $view->description());
69 69
 
70
-        return $this->viewResponse($this->module->name() . '::geoanalysisviews-list', [
70
+        return $this->viewResponse($this->module->name().'::geoanalysisviews-list', [
71 71
             'module'        =>  $this->module,
72 72
             'title'         =>  I18N::translate('Geographical dispersion'),
73 73
             'tree'          =>  $tree,
Please login to merge, or discard this patch.
app/Module/GeoDispersion/Http/RequestHandlers/GeoAnalysisViewTabs.php 2 patches
Indentation   +48 added lines, -48 removed lines patch added patch discarded remove patch
@@ -30,61 +30,61 @@
 block discarded – undo
30 30
  */
31 31
 class GeoAnalysisViewTabs implements RequestHandlerInterface
32 32
 {
33
-    private ?GeoDispersionModule $module;
34
-    private GeoAnalysisViewDataService $geoviewdata_service;
33
+	private ?GeoDispersionModule $module;
34
+	private GeoAnalysisViewDataService $geoviewdata_service;
35 35
 
36
-    /**
37
-     * Constructor for GeoAnalysisMapsList Request Handler
38
-     *
39
-     * @param ModuleService $module_service
40
-     */
41
-    public function __construct(
42
-        ModuleService $module_service,
43
-        GeoAnalysisViewDataService $geoviewdata_service
44
-    ) {
45
-        $this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
46
-        $this->geoviewdata_service = $geoviewdata_service;
47
-    }
36
+	/**
37
+	 * Constructor for GeoAnalysisMapsList Request Handler
38
+	 *
39
+	 * @param ModuleService $module_service
40
+	 */
41
+	public function __construct(
42
+		ModuleService $module_service,
43
+		GeoAnalysisViewDataService $geoviewdata_service
44
+	) {
45
+		$this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
46
+		$this->geoviewdata_service = $geoviewdata_service;
47
+	}
48 48
 
49
-    /**
50
-     * {@inheritDoc}
51
-     * @see \Psr\Http\Server\RequestHandlerInterface::handle()
52
-     */
53
-    public function handle(ServerRequestInterface $request): ResponseInterface
54
-    {
55
-        if ($this->module === null) {
56
-            throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
57
-        }
49
+	/**
50
+	 * {@inheritDoc}
51
+	 * @see \Psr\Http\Server\RequestHandlerInterface::handle()
52
+	 */
53
+	public function handle(ServerRequestInterface $request): ResponseInterface
54
+	{
55
+		if ($this->module === null) {
56
+			throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
57
+		}
58 58
 
59
-        $tree = $request->getAttribute('tree');
60
-        assert($tree instanceof Tree);
59
+		$tree = $request->getAttribute('tree');
60
+		assert($tree instanceof Tree);
61 61
 
62
-        $view_id = $request->getAttribute('view_id');
63
-        $view_id = is_numeric($view_id) ? (int) $view_id : 0;
62
+		$view_id = $request->getAttribute('view_id');
63
+		$view_id = is_numeric($view_id) ? (int) $view_id : 0;
64 64
 
65
-        $view = $this->geoviewdata_service->find($tree, $view_id);
65
+		$view = $this->geoviewdata_service->find($tree, $view_id);
66 66
 
67
-        if ($view === null) {
68
-            throw new HttpNotFoundException(I18N::translate('The requested dispersion analysis does not exist.'));
69
-        }
67
+		if ($view === null) {
68
+			throw new HttpNotFoundException(I18N::translate('The requested dispersion analysis does not exist.'));
69
+		}
70 70
 
71
-        $results = $view->analysis()->results($tree, $view->placesDepth());
71
+		$results = $view->analysis()->results($tree, $view->placesDepth());
72 72
 
73
-        $params = [
74
-            'module_name'   =>  $this->module->name(),
75
-            'tree'          =>  $tree,
76
-            'view'          =>  $view,
77
-            'items_descr'   =>  $view->analysis()->itemsDescription()
78
-        ];
79
-        $response = [
80
-            'global'    =>  view('layouts/ajax', [
81
-                'content' =>    $view->globalTabContent($this->module, $results->global(), $params)
82
-            ]),
83
-            'detailed'  => view('layouts/ajax', [
84
-                'content' =>    $view->detailedTabContent($this->module, $results->sortedDetailed(), $params)
85
-            ])
86
-        ];
73
+		$params = [
74
+			'module_name'   =>  $this->module->name(),
75
+			'tree'          =>  $tree,
76
+			'view'          =>  $view,
77
+			'items_descr'   =>  $view->analysis()->itemsDescription()
78
+		];
79
+		$response = [
80
+			'global'    =>  view('layouts/ajax', [
81
+				'content' =>    $view->globalTabContent($this->module, $results->global(), $params)
82
+			]),
83
+			'detailed'  => view('layouts/ajax', [
84
+				'content' =>    $view->detailedTabContent($this->module, $results->sortedDetailed(), $params)
85
+			])
86
+		];
87 87
 
88
-        return response($response);
89
-    }
88
+		return response($response);
89
+	}
90 90
 }
Please login to merge, or discard this patch.
Spacing   +1 added lines, -1 removed lines patch added patch discarded remove patch
@@ -60,7 +60,7 @@
 block discarded – undo
60 60
         assert($tree instanceof Tree);
61 61
 
62 62
         $view_id = $request->getAttribute('view_id');
63
-        $view_id = is_numeric($view_id) ? (int) $view_id : 0;
63
+        $view_id = is_numeric($view_id) ? (int)$view_id : 0;
64 64
 
65 65
         $view = $this->geoviewdata_service->find($tree, $view_id);
66 66
 
Please login to merge, or discard this patch.
app/Module/GeoDispersion/Http/RequestHandlers/MapAdapterMapperConfig.php 2 patches
Indentation   +55 added lines, -55 removed lines patch added patch discarded remove patch
@@ -32,68 +32,68 @@
 block discarded – undo
32 32
  */
33 33
 class MapAdapterMapperConfig implements RequestHandlerInterface
34 34
 {
35
-    use ViewResponseTrait;
35
+	use ViewResponseTrait;
36 36
 
37
-    private ?GeoDispersionModule $module;
38
-    private MapAdapterDataService $mapadapter_data_service;
37
+	private ?GeoDispersionModule $module;
38
+	private MapAdapterDataService $mapadapter_data_service;
39 39
 
40
-    /**
41
-     * Constructor for MapAdapterMapperConfig Request Handler
42
-     *
43
-     * @param ModuleService $module_service
44
-     * @param MapAdapterDataService $mapadapter_data_service
45
-     */
46
-    public function __construct(
47
-        ModuleService $module_service,
48
-        MapAdapterDataService $mapadapter_data_service
49
-    ) {
50
-        $this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
51
-        $this->mapadapter_data_service = $mapadapter_data_service;
52
-    }
40
+	/**
41
+	 * Constructor for MapAdapterMapperConfig Request Handler
42
+	 *
43
+	 * @param ModuleService $module_service
44
+	 * @param MapAdapterDataService $mapadapter_data_service
45
+	 */
46
+	public function __construct(
47
+		ModuleService $module_service,
48
+		MapAdapterDataService $mapadapter_data_service
49
+	) {
50
+		$this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
51
+		$this->mapadapter_data_service = $mapadapter_data_service;
52
+	}
53 53
 
54
-    /**
55
-     * {@inheritDoc}
56
-     * @see \Psr\Http\Server\RequestHandlerInterface::handle()
57
-     */
58
-    public function handle(ServerRequestInterface $request): ResponseInterface
59
-    {
60
-        $this->layout = 'layouts/ajax';
54
+	/**
55
+	 * {@inheritDoc}
56
+	 * @see \Psr\Http\Server\RequestHandlerInterface::handle()
57
+	 */
58
+	public function handle(ServerRequestInterface $request): ResponseInterface
59
+	{
60
+		$this->layout = 'layouts/ajax';
61 61
 
62
-        if ($this->module === null) {
63
-            throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
64
-        }
65
-        $tree = $request->getAttribute('tree');
66
-        assert($tree instanceof Tree);
62
+		if ($this->module === null) {
63
+			throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
64
+		}
65
+		$tree = $request->getAttribute('tree');
66
+		assert($tree instanceof Tree);
67 67
 
68
-        $adapter_id = (int) $request->getAttribute('adapter_id');
69
-        $map_adapter = $this->mapadapter_data_service->find($adapter_id);
68
+		$adapter_id = (int) $request->getAttribute('adapter_id');
69
+		$map_adapter = $this->mapadapter_data_service->find($adapter_id);
70 70
 
71
-        $mapper_class = $request->getQueryParams()['mapper'] ?? '';
72
-        $mapper = null;
73
-        if ($mapper_class === '' && $map_adapter !== null) {
74
-            $mapper = $map_adapter->placeMapper();
75
-        } else {
76
-            try {
77
-                $mapper = app($mapper_class);
78
-            } catch (BindingResolutionException $ex) {
79
-            }
71
+		$mapper_class = $request->getQueryParams()['mapper'] ?? '';
72
+		$mapper = null;
73
+		if ($mapper_class === '' && $map_adapter !== null) {
74
+			$mapper = $map_adapter->placeMapper();
75
+		} else {
76
+			try {
77
+				$mapper = app($mapper_class);
78
+			} catch (BindingResolutionException $ex) {
79
+			}
80 80
 
81
-            if (
82
-                $mapper !== null && $map_adapter !== null &&
83
-                get_class($map_adapter->placeMapper()) === get_class($mapper)
84
-            ) {
85
-                $mapper = $map_adapter->placeMapper();
86
-            }
87
-        }
81
+			if (
82
+				$mapper !== null && $map_adapter !== null &&
83
+				get_class($map_adapter->placeMapper()) === get_class($mapper)
84
+			) {
85
+				$mapper = $map_adapter->placeMapper();
86
+			}
87
+		}
88 88
 
89
-        if ($mapper === null || !($mapper instanceof PlaceMapperInterface)) {
90
-            throw new HttpNotFoundException(
91
-                I18N::translate('The configuration for the place mapper could not be found.')
92
-            );
93
-        }
89
+		if ($mapper === null || !($mapper instanceof PlaceMapperInterface)) {
90
+			throw new HttpNotFoundException(
91
+				I18N::translate('The configuration for the place mapper could not be found.')
92
+			);
93
+		}
94 94
 
95
-        return $this->viewResponse('layouts/ajax', [
96
-            'content' => $mapper->config()->configContent($this->module, $tree)
97
-        ]);
98
-    }
95
+		return $this->viewResponse('layouts/ajax', [
96
+			'content' => $mapper->config()->configContent($this->module, $tree)
97
+		]);
98
+	}
99 99
 }
Please login to merge, or discard this patch.
Spacing   +1 added lines, -1 removed lines patch added patch discarded remove patch
@@ -65,7 +65,7 @@
 block discarded – undo
65 65
         $tree = $request->getAttribute('tree');
66 66
         assert($tree instanceof Tree);
67 67
 
68
-        $adapter_id = (int) $request->getAttribute('adapter_id');
68
+        $adapter_id = (int)$request->getAttribute('adapter_id');
69 69
         $map_adapter = $this->mapadapter_data_service->find($adapter_id);
70 70
 
71 71
         $mapper_class = $request->getQueryParams()['mapper'] ?? '';
Please login to merge, or discard this patch.
app/Module/GeoDispersion/Http/RequestHandlers/GeoAnalysisViewAddPage.php 2 patches
Indentation   +40 added lines, -40 removed lines patch added patch discarded remove patch
@@ -31,49 +31,49 @@
 block discarded – undo
31 31
  */
32 32
 class GeoAnalysisViewAddPage implements RequestHandlerInterface
33 33
 {
34
-    use ViewResponseTrait;
34
+	use ViewResponseTrait;
35 35
 
36
-    private ?GeoDispersionModule $module;
37
-    private GeoAnalysisService $geoanalysis_service;
38
-    private GeoAnalysisDataService $geoanalysis_data_service;
36
+	private ?GeoDispersionModule $module;
37
+	private GeoAnalysisService $geoanalysis_service;
38
+	private GeoAnalysisDataService $geoanalysis_data_service;
39 39
 
40
-    /**
41
-     * Constructor for GeoAnalysisViewAddPage Request Handler
42
-     *
43
-     * @param ModuleService $module_service
44
-     * @param GeoAnalysisService $geoanalysis_service
45
-     * @param GeoAnalysisDataService $geoanalysis_data_service
46
-     */
47
-    public function __construct(
48
-        ModuleService $module_service,
49
-        GeoAnalysisService $geoanalysis_service,
50
-        GeoAnalysisDataService $geoanalysis_data_service
51
-    ) {
52
-        $this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
53
-        $this->geoanalysis_service = $geoanalysis_service;
54
-        $this->geoanalysis_data_service = $geoanalysis_data_service;
55
-    }
40
+	/**
41
+	 * Constructor for GeoAnalysisViewAddPage Request Handler
42
+	 *
43
+	 * @param ModuleService $module_service
44
+	 * @param GeoAnalysisService $geoanalysis_service
45
+	 * @param GeoAnalysisDataService $geoanalysis_data_service
46
+	 */
47
+	public function __construct(
48
+		ModuleService $module_service,
49
+		GeoAnalysisService $geoanalysis_service,
50
+		GeoAnalysisDataService $geoanalysis_data_service
51
+	) {
52
+		$this->module = $module_service->findByInterface(GeoDispersionModule::class)->first();
53
+		$this->geoanalysis_service = $geoanalysis_service;
54
+		$this->geoanalysis_data_service = $geoanalysis_data_service;
55
+	}
56 56
 
57
-    /**
58
-     * {@inheritDoc}
59
-     * @see \Psr\Http\Server\RequestHandlerInterface::handle()
60
-     */
61
-    public function handle(ServerRequestInterface $request): ResponseInterface
62
-    {
63
-        $this->layout = 'layouts/administration';
57
+	/**
58
+	 * {@inheritDoc}
59
+	 * @see \Psr\Http\Server\RequestHandlerInterface::handle()
60
+	 */
61
+	public function handle(ServerRequestInterface $request): ResponseInterface
62
+	{
63
+		$this->layout = 'layouts/administration';
64 64
 
65
-        if ($this->module === null) {
66
-            throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
67
-        }
68
-        $tree = $request->getAttribute('tree');
69
-        assert($tree instanceof Tree);
65
+		if ($this->module === null) {
66
+			throw new HttpNotFoundException(I18N::translate('The attached module could not be found.'));
67
+		}
68
+		$tree = $request->getAttribute('tree');
69
+		assert($tree instanceof Tree);
70 70
 
71
-        return $this->viewResponse($this->module->name() . '::admin/view-add', [
72
-            'module'        =>  $this->module,
73
-            'title'         =>  I18N::translate('Add a geographical dispersion analysis view'),
74
-            'tree'          =>  $tree,
75
-            'geoanalysis_list'  =>  $this->geoanalysis_service->all(),
76
-            'place_example'     =>  $this->geoanalysis_data_service->placeHierarchyExample($tree)
77
-        ]);
78
-    }
71
+		return $this->viewResponse($this->module->name() . '::admin/view-add', [
72
+			'module'        =>  $this->module,
73
+			'title'         =>  I18N::translate('Add a geographical dispersion analysis view'),
74
+			'tree'          =>  $tree,
75
+			'geoanalysis_list'  =>  $this->geoanalysis_service->all(),
76
+			'place_example'     =>  $this->geoanalysis_data_service->placeHierarchyExample($tree)
77
+		]);
78
+	}
79 79
 }
Please login to merge, or discard this patch.
Spacing   +1 added lines, -1 removed lines patch added patch discarded remove patch
@@ -68,7 +68,7 @@
 block discarded – undo
68 68
         $tree = $request->getAttribute('tree');
69 69
         assert($tree instanceof Tree);
70 70
 
71
-        return $this->viewResponse($this->module->name() . '::admin/view-add', [
71
+        return $this->viewResponse($this->module->name().'::admin/view-add', [
72 72
             'module'        =>  $this->module,
73 73
             'title'         =>  I18N::translate('Add a geographical dispersion analysis view'),
74 74
             'tree'          =>  $tree,
Please login to merge, or discard this patch.