xref: /webtrees/app/Statistics/Google/ChartDivorce.php (revision 88de55fda5bcccfc1527a19eaa4a245e17861255)
18add1155SRico Sonntag<?php
28add1155SRico Sonntag/**
38add1155SRico Sonntag * webtrees: online genealogy
48add1155SRico Sonntag * Copyright (C) 2018 webtrees development team
58add1155SRico Sonntag * This program is free software: you can redistribute it and/or modify
68add1155SRico Sonntag * it under the terms of the GNU General Public License as published by
78add1155SRico Sonntag * the Free Software Foundation, either version 3 of the License, or
88add1155SRico Sonntag * (at your option) any later version.
98add1155SRico Sonntag * This program is distributed in the hope that it will be useful,
108add1155SRico Sonntag * but WITHOUT ANY WARRANTY; without even the implied warranty of
118add1155SRico Sonntag * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
128add1155SRico Sonntag * GNU General Public License for more details.
138add1155SRico Sonntag * You should have received a copy of the GNU General Public License
148add1155SRico Sonntag * along with this program. If not, see <http://www.gnu.org/licenses/>.
158add1155SRico Sonntag */
168add1155SRico Sonntagdeclare(strict_types=1);
178add1155SRico Sonntag
188add1155SRico Sonntagnamespace Fisharebest\Webtrees\Statistics\Google;
198add1155SRico Sonntag
208add1155SRico Sonntaguse Fisharebest\Webtrees\I18N;
218add1155SRico Sonntaguse Fisharebest\Webtrees\Statistics\AbstractGoogle;
228add1155SRico Sonntaguse Fisharebest\Webtrees\Statistics\Helper\Century;
238add1155SRico Sonntaguse Fisharebest\Webtrees\Tree;
248add1155SRico Sonntaguse Illuminate\Database\Capsule\Manager as DB;
258add1155SRico Sonntag
268add1155SRico Sonntag/**
278add1155SRico Sonntag *
288add1155SRico Sonntag */
298add1155SRico Sonntagclass ChartDivorce extends AbstractGoogle
308add1155SRico Sonntag{
318add1155SRico Sonntag    /**
328add1155SRico Sonntag     * @var Century
338add1155SRico Sonntag     */
348add1155SRico Sonntag    private $centuryHelper;
358add1155SRico Sonntag
368add1155SRico Sonntag    /**
378add1155SRico Sonntag     * Constructor.
388add1155SRico Sonntag     *
398add1155SRico Sonntag     * @param Tree $tree
408add1155SRico Sonntag     */
418add1155SRico Sonntag    public function __construct(Tree $tree)
428add1155SRico Sonntag    {
43*88de55fdSRico Sonntag        parent::__construct($tree);
44*88de55fdSRico Sonntag
458add1155SRico Sonntag        $this->centuryHelper = new Century();
468add1155SRico Sonntag    }
478add1155SRico Sonntag
488add1155SRico Sonntag    /**
498add1155SRico Sonntag     * Returns the related database records.
508add1155SRico Sonntag     *
518add1155SRico Sonntag     * @return \stdClass[]
528add1155SRico Sonntag     */
538add1155SRico Sonntag    private function queryRecords(): array
548add1155SRico Sonntag    {
558add1155SRico Sonntag        $query = DB::table('dates')
563dc8167dSGreg Roach            ->selectRaw('ROUND((d_year - 50) / 100) AS century')
578add1155SRico Sonntag            ->selectRaw('COUNT(*) AS total')
588add1155SRico Sonntag            ->where('d_file', '=', $this->tree->id())
598add1155SRico Sonntag            ->where('d_year', '<>', 0)
608add1155SRico Sonntag            ->where('d_fact', '=', 'DIV')
618add1155SRico Sonntag            ->whereIn('d_type', ['@#DGREGORIAN@', '@#DJULIAN@'])
628add1155SRico Sonntag            ->groupBy(['century'])
638add1155SRico Sonntag            ->orderBy('century');
648add1155SRico Sonntag
658add1155SRico Sonntag        return $query->get()->all();
668add1155SRico Sonntag    }
678add1155SRico Sonntag
688add1155SRico Sonntag    /**
698add1155SRico Sonntag     * General query on divorces.
708add1155SRico Sonntag     *
718add1155SRico Sonntag     * @param string|null $color_from
728add1155SRico Sonntag     * @param string|null $color_to
738add1155SRico Sonntag     *
748add1155SRico Sonntag     * @return string
758add1155SRico Sonntag     */
76*88de55fdSRico Sonntag    public function chartDivorce(string $color_from = null, string $color_to = null): string
778add1155SRico Sonntag    {
78*88de55fdSRico Sonntag        $chart_color1 = (string) $this->theme->parameter('distribution-chart-no-values');
79*88de55fdSRico Sonntag        $chart_color2 = (string) $this->theme->parameter('distribution-chart-high-values');
808add1155SRico Sonntag        $color_from   = $color_from ?? $chart_color1;
818add1155SRico Sonntag        $color_to     = $color_to   ?? $chart_color2;
828add1155SRico Sonntag
83*88de55fdSRico Sonntag        $data = [
84*88de55fdSRico Sonntag            [
85*88de55fdSRico Sonntag                I18N::translate('Century'),
86*88de55fdSRico Sonntag                I18N::translate('Total')
87*88de55fdSRico Sonntag            ],
88*88de55fdSRico Sonntag        ];
898add1155SRico Sonntag
90*88de55fdSRico Sonntag        foreach ($this->queryRecords() as $record) {
91*88de55fdSRico Sonntag            $data[] = [
92*88de55fdSRico Sonntag                $this->centuryHelper->centuryName((int) $record->century),
93*88de55fdSRico Sonntag                $record->total
94*88de55fdSRico Sonntag            ];
958add1155SRico Sonntag        }
968add1155SRico Sonntag
97*88de55fdSRico Sonntag        $colors = $this->interpolateRgb($color_from, $color_to, \count($data) - 1);
988add1155SRico Sonntag
998add1155SRico Sonntag        return view(
100*88de55fdSRico Sonntag            'statistics/other/charts/pie',
1018add1155SRico Sonntag            [
102*88de55fdSRico Sonntag                'title'  => I18N::translate('Divorces by century'),
103*88de55fdSRico Sonntag                'data'   => $data,
104*88de55fdSRico Sonntag                'colors' => $colors,
1058add1155SRico Sonntag            ]
1068add1155SRico Sonntag        );
1078add1155SRico Sonntag    }
1088add1155SRico Sonntag}
109