xref: /webtrees/app/Module/ModuleThemeTrait.php (revision ca50fb84724cb523ca8f4be8abd453a667296dcf)
1<?php
2
3/**
4 * webtrees: online genealogy
5 * Copyright (C) 2019 webtrees development team
6 * This program is free software: you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation, either version 3 of the License, or
9 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program. If not, see <http://www.gnu.org/licenses/>.
16 */
17
18declare(strict_types=1);
19
20namespace Fisharebest\Webtrees\Module;
21
22use Fisharebest\Localization\Locale\LocaleInterface;
23use Fisharebest\Webtrees\Auth;
24use Fisharebest\Webtrees\Fact;
25use Fisharebest\Webtrees\Gedcom;
26use Fisharebest\Webtrees\GedcomTag;
27use Fisharebest\Webtrees\Http\RequestHandlers\AccountEdit;
28use Fisharebest\Webtrees\Http\RequestHandlers\ControlPanel;
29use Fisharebest\Webtrees\Http\RequestHandlers\HomePage;
30use Fisharebest\Webtrees\Http\RequestHandlers\LoginPage;
31use Fisharebest\Webtrees\Http\RequestHandlers\Logout;
32use Fisharebest\Webtrees\Http\RequestHandlers\PendingChanges;
33use Fisharebest\Webtrees\Http\RequestHandlers\SelectLanguage;
34use Fisharebest\Webtrees\Http\RequestHandlers\SelectTheme;
35use Fisharebest\Webtrees\I18N;
36use Fisharebest\Webtrees\Individual;
37use Fisharebest\Webtrees\Menu;
38use Fisharebest\Webtrees\Services\ModuleService;
39use Fisharebest\Webtrees\Tree;
40use Fisharebest\Webtrees\Webtrees;
41use Psr\Http\Message\ServerRequestInterface;
42
43use function app;
44use function assert;
45use function route;
46
47/**
48 * Trait ModuleThemeTrait - default implementation of ModuleThemeInterface
49 */
50trait ModuleThemeTrait
51{
52    /**
53     * @return string
54     */
55    abstract public function name(): string;
56
57    /**
58     * @return string
59     */
60    abstract public function title(): string;
61
62    /**
63     * A sentence describing what this module does.
64     *
65     * @return string
66     */
67    public function description(): string
68    {
69        return I18N::translate('Theme') . ' — ' . $this->title();
70    }
71
72    /**
73     * Display an icon for this fact.
74     *
75     * @TODO use CSS for this
76     *
77     * @param Fact $fact
78     *
79     * @return string
80     */
81    public function icon(Fact $fact): string
82    {
83        $asset = 'public/css/' . $this->name() . '/images/facts/' . $fact->getTag() . '.png';
84        if (file_exists(Webtrees::ROOT_DIR . 'public' . $asset)) {
85            return '<img src="' . e(asset($asset)) . '" title="' . GedcomTag::getLabel($fact->getTag()) . '">';
86        }
87
88        // Spacer image - for alignment - until we move to a sprite.
89        $asset = 'public/css/' . $this->name() . '/images/facts/NULL.png';
90        if (file_exists(Webtrees::ROOT_DIR . 'public' . $asset)) {
91            return '<img src="' . e(asset($asset)) . '">';
92        }
93
94        return '';
95    }
96
97    /**
98     * Generate the facts, for display in charts.
99     *
100     * @param Individual $individual
101     *
102     * @return string
103     */
104    public function individualBoxFacts(Individual $individual): string
105    {
106        $html = '';
107
108        $opt_tags = preg_split('/\W/', $individual->tree()->getPreference('CHART_BOX_TAGS'), 0, PREG_SPLIT_NO_EMPTY);
109        // Show BIRT or equivalent event
110        foreach (Gedcom::BIRTH_EVENTS as $birttag) {
111            if (!in_array($birttag, $opt_tags, true)) {
112                $event = $individual->facts([$birttag])->first();
113                if ($event instanceof Fact) {
114                    $html .= $event->summary();
115                    break;
116                }
117            }
118        }
119        // Show optional events (before death)
120        foreach ($opt_tags as $key => $tag) {
121            if (!in_array($tag, Gedcom::DEATH_EVENTS, true)) {
122                $event = $individual->facts([$tag])->first();
123                if ($event instanceof Fact) {
124                    $html .= $event->summary();
125                    unset($opt_tags[$key]);
126                }
127            }
128        }
129        // Show DEAT or equivalent event
130        foreach (Gedcom::DEATH_EVENTS as $deattag) {
131            $event = $individual->facts([$deattag])->first();
132            if ($event instanceof Fact) {
133                $html .= $event->summary();
134                if (in_array($deattag, $opt_tags, true)) {
135                    unset($opt_tags[array_search($deattag, $opt_tags, true)]);
136                }
137                break;
138            }
139        }
140        // Show remaining optional events (after death)
141        foreach ($opt_tags as $tag) {
142            $event = $individual->facts([$tag])->first();
143            if ($event instanceof Fact) {
144                $html .= $event->summary();
145            }
146        }
147
148        return $html;
149    }
150
151    /**
152     * Links, to show in chart boxes;
153     *
154     * @param Individual $individual
155     *
156     * @return Menu[]
157     */
158    public function individualBoxMenu(Individual $individual): array
159    {
160        $menus = array_merge(
161            $this->individualBoxMenuCharts($individual),
162            $this->individualBoxMenuFamilyLinks($individual)
163        );
164
165        return $menus;
166    }
167
168    /**
169     * Chart links, to show in chart boxes;
170     *
171     * @param Individual $individual
172     *
173     * @return Menu[]
174     */
175    public function individualBoxMenuCharts(Individual $individual): array
176    {
177        $menus = [];
178        foreach (app(ModuleService::class)->findByComponent(ModuleChartInterface::class, $individual->tree(), Auth::user()) as $chart) {
179            $menu = $chart->chartBoxMenu($individual);
180            if ($menu) {
181                $menus[] = $menu;
182            }
183        }
184
185        usort($menus, static function (Menu $x, Menu $y): int {
186            return I18N::strcasecmp($x->getLabel(), $y->getLabel());
187        });
188
189        return $menus;
190    }
191
192    /**
193     * Family links, to show in chart boxes.
194     *
195     * @param Individual $individual
196     *
197     * @return Menu[]
198     */
199    public function individualBoxMenuFamilyLinks(Individual $individual): array
200    {
201        $menus = [];
202
203        foreach ($individual->spouseFamilies() as $family) {
204            $menus[] = new Menu('<strong>' . I18N::translate('Family with spouse') . '</strong>', $family->url());
205            $spouse  = $family->spouse($individual);
206            if ($spouse && $spouse->canShowName()) {
207                $menus[] = new Menu($spouse->fullName(), $spouse->url());
208            }
209            foreach ($family->children() as $child) {
210                if ($child->canShowName()) {
211                    $menus[] = new Menu($child->fullName(), $child->url());
212                }
213            }
214        }
215
216        return $menus;
217    }
218
219    /**
220     * Generate a menu item to change the blocks on the current tree/user page.
221     *
222     * @param Tree $tree
223     *
224     * @return Menu|null
225     */
226    public function menuChangeBlocks(Tree $tree): ?Menu
227    {
228        /** @var ServerRequestInterface $request */
229        $request = app(ServerRequestInterface::class);
230
231        $route = $request->getAttribute('route');
232
233        if (Auth::check() && $route === 'user-page') {
234            return new Menu(I18N::translate('Customize this page'), route('user-page-edit', ['tree' => $tree->name()]), 'menu-change-blocks');
235        }
236
237        if (Auth::isManager($tree) && $route === 'tree-page') {
238            return new Menu(I18N::translate('Customize this page'), route('tree-page-edit', ['tree' => $tree->name()]), 'menu-change-blocks');
239        }
240
241        return null;
242    }
243
244    /**
245     * Generate a menu item for the control panel.
246     *
247     * @param Tree $tree
248     *
249     * @return Menu|null
250     */
251    public function menuControlPanel(Tree $tree): ?Menu
252    {
253        if (Auth::isAdmin()) {
254            return new Menu(I18N::translate('Control panel'), route(ControlPanel::class), 'menu-admin');
255        }
256
257        if (Auth::isManager($tree)) {
258            return new Menu(I18N::translate('Control panel'), route('manage-trees'), 'menu-admin');
259        }
260
261        return null;
262    }
263
264    /**
265     * A menu to show a list of available languages.
266     *
267     * @return Menu|null
268     */
269    public function menuLanguages(): ?Menu
270    {
271        $locale = app(ServerRequestInterface::class)->getAttribute('locale');
272        assert($locale instanceof LocaleInterface);
273
274        $menu = new Menu(I18N::translate('Language'), '#', 'menu-language');
275
276        foreach (I18N::activeLocales() as $active_locale) {
277            $language_tag = $active_locale->languageTag();
278            $class        = 'menu-language-' . $language_tag . ($locale->languageTag() === $language_tag ? ' active' : '');
279            $menu->addSubmenu(new Menu($active_locale->endonym(), '#', $class, [
280                'data-post-url' => route(SelectLanguage::class, ['language' => $language_tag]),
281            ]));
282        }
283
284        if (count($menu->getSubmenus()) > 1) {
285            return $menu;
286        }
287
288        return null;
289    }
290
291    /**
292     * A login menu option (or null if we are already logged in).
293     *
294     * @return Menu|null
295     */
296    public function menuLogin(): ?Menu
297    {
298        if (Auth::check()) {
299            return null;
300        }
301
302        $request = app(ServerRequestInterface::class);
303
304        // Return to this page after login...
305        $redirect = $request->getQueryParams()['url'] ?? (string) $request->getUri();
306
307        // ...but switch from the tree-page to the user-page
308        if ($request->getAttribute('route') === 'tree-page') {
309            $tree = $request->getAttribute('tree');
310            assert($tree instanceof Tree);
311            $redirect = route('user-page', ['tree' => $tree->name()]);
312        }
313
314        // Stay on the same tree page
315        $tree = $request->getAttribute('tree');
316        $url  = route(LoginPage::class, ['tree' => $tree instanceof Tree ? $tree->name() : null, 'url' => $redirect]);
317
318        return new Menu(I18N::translate('Sign in'), $url, 'menu-login', ['rel' => 'nofollow']);
319    }
320
321    /**
322     * A logout menu option (or null if we are already logged out).
323     *
324     * @return Menu|null
325     */
326    public function menuLogout(): ?Menu
327    {
328        if (Auth::check()) {
329            $parameters = [
330                'data-post-url'   => route(Logout::class),
331            ];
332
333            return new Menu(I18N::translate('Sign out'), '#', 'menu-logout', $parameters);
334        }
335
336        return null;
337    }
338
339    /**
340     * A link to allow users to edit their account settings.
341     *
342     * @param Tree|null $tree
343     *
344     * @return Menu
345     */
346    public function menuMyAccount(?Tree $tree): Menu
347    {
348        $url = route(AccountEdit::class, ['tree' => $tree instanceof Tree ? $tree->name() : null]);
349
350        return new Menu(I18N::translate('My account'), $url);
351    }
352
353    /**
354     * A link to the user's individual record (individual.php).
355     *
356     * @param Tree $tree
357     *
358     * @return Menu|null
359     */
360    public function menuMyIndividualRecord(Tree $tree): ?Menu
361    {
362        $record = Individual::getInstance($tree->getUserPreference(Auth::user(), 'gedcomid'), $tree);
363
364        if ($record) {
365            return new Menu(I18N::translate('My individual record'), $record->url(), 'menu-myrecord');
366        }
367
368        return null;
369    }
370
371    /**
372     * A link to the user's personal home page.
373     *
374     * @param Tree $tree
375     *
376     * @return Menu
377     */
378    public function menuMyPage(Tree $tree): Menu
379    {
380        return new Menu(I18N::translate('My page'), route('user-page', ['tree' => $tree->name()]), 'menu-mypage');
381    }
382
383    /**
384     * A menu for the user's personal pages.
385     *
386     * @param Tree|null $tree
387     *
388     * @return Menu|null
389     */
390    public function menuMyPages(?Tree $tree): ?Menu
391    {
392        if (Auth::id()) {
393            if ($tree instanceof Tree) {
394                return new Menu(I18N::translate('My pages'), '#', 'menu-mymenu', [], array_filter([
395                    $this->menuMyPage($tree),
396                    $this->menuMyIndividualRecord($tree),
397                    $this->menuMyPedigree($tree),
398                    $this->menuMyAccount($tree),
399                    $this->menuControlPanel($tree),
400                    $this->menuChangeBlocks($tree),
401                ]));
402            }
403
404            return $this->menuMyAccount($tree);
405        }
406
407        return null;
408    }
409
410    /**
411     * A link to the user's individual record.
412     *
413     * @param Tree $tree
414     *
415     * @return Menu|null
416     */
417    public function menuMyPedigree(Tree $tree): ?Menu
418    {
419        $gedcomid = $tree->getUserPreference(Auth::user(), 'gedcomid');
420
421        $pedigree_chart = app(ModuleService::class)->findByComponent(ModuleChartInterface::class, $tree, Auth::user())
422            ->filter(static function (ModuleInterface $module): bool {
423                return $module instanceof PedigreeChartModule;
424            });
425
426        if ($gedcomid !== '' && $pedigree_chart instanceof PedigreeChartModule) {
427            return new Menu(
428                I18N::translate('My pedigree'),
429                route('pedigree', [
430                    'xref' => $gedcomid,
431                    'tree'  => $tree->name(),
432                ]),
433                'menu-mypedigree'
434            );
435        }
436
437        return null;
438    }
439
440    /**
441     * Create a pending changes menu.
442     *
443     * @param Tree|null $tree
444     *
445     * @return Menu|null
446     */
447    public function menuPendingChanges(?Tree $tree): ?Menu
448    {
449        if ($tree instanceof Tree && $tree->hasPendingEdit() && Auth::isModerator($tree)) {
450            $url = route(PendingChanges::class, [
451                'tree' => $tree->name(),
452                'url' => (string) app(ServerRequestInterface::class)->getUri(),
453            ]);
454
455            return new Menu(I18N::translate('Pending changes'), $url, 'menu-pending');
456        }
457
458        return null;
459    }
460
461    /**
462     * Themes menu.
463     *
464     * @return Menu|null
465     */
466    public function menuThemes(): ?Menu
467    {
468        $themes = app(ModuleService::class)->findByInterface(ModuleThemeInterface::class, false, true);
469
470        $current_theme = app(ModuleThemeInterface::class);
471
472        if ($themes->count() > 1) {
473            $submenus = $themes->map(static function (ModuleThemeInterface $theme) use ($current_theme): Menu {
474                $active     = $theme->name() === $current_theme->name();
475                $class      = 'menu-theme-' . $theme->name() . ($active ? ' active' : '');
476
477                return new Menu($theme->title(), '#', $class, [
478                    'data-post-url' => route(SelectTheme::class, ['theme' => $theme->name()]),
479                ]);
480            });
481
482            return new Menu(I18N::translate('Theme'), '#', 'menu-theme', [], $submenus->all());
483        }
484
485        return null;
486    }
487
488    /**
489     * Misecellaneous dimensions, fonts, styles, etc.
490     *
491     * @param string $parameter_name
492     *
493     * @return string|int|float
494     */
495    public function parameter($parameter_name)
496    {
497        return '';
498    }
499
500    /**
501     * Generate a list of items for the main menu.
502     *
503     * @param Tree|null $tree
504     *
505     * @return Menu[]
506     */
507    public function genealogyMenu(?Tree $tree): array
508    {
509        if ($tree === null) {
510            return [];
511        }
512
513        return app(ModuleService::class)->findByComponent(ModuleMenuInterface::class, $tree, Auth::user())
514            ->map(static function (ModuleMenuInterface $menu) use ($tree): ?Menu {
515                return $menu->getMenu($tree);
516            })
517            ->filter()
518            ->all();
519    }
520
521    /**
522     * Create the genealogy menu.
523     *
524     * @param Menu[] $menus
525     *
526     * @return string
527     */
528    public function genealogyMenuContent(array $menus): string
529    {
530        return implode('', array_map(static function (Menu $menu): string {
531            return $menu->bootstrap4();
532        }, $menus));
533    }
534
535    /**
536     * Generate a list of items for the user menu.
537     *
538     * @param Tree|null $tree
539     *
540     * @return Menu[]
541     */
542    public function userMenu(?Tree $tree): array
543    {
544        return array_filter([
545            $this->menuPendingChanges($tree),
546            $this->menuMyPages($tree),
547            $this->menuThemes(),
548            $this->menuLanguages(),
549            $this->menuLogin(),
550            $this->menuLogout(),
551        ]);
552    }
553
554    /**
555     * A list of CSS files to include for this page.
556     *
557     * @return string[]
558     */
559    public function stylesheets(): array
560    {
561        return [];
562    }
563}
564