18add1155SRico Sonntag<?php 28add1155SRico Sonntag/** 38add1155SRico Sonntag * webtrees: online genealogy 4242a7862SGreg Roach * Copyright (C) 2019 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; 2193ccd686SRico Sonntaguse Fisharebest\Webtrees\Module\ModuleThemeInterface; 2293ccd686SRico Sonntaguse Fisharebest\Webtrees\Statistics\Service\CenturyService; 2393ccd686SRico Sonntaguse Fisharebest\Webtrees\Statistics\Service\ColorService; 248add1155SRico Sonntaguse Fisharebest\Webtrees\Tree; 258add1155SRico Sonntaguse Illuminate\Database\Capsule\Manager as DB; 268add1155SRico Sonntag 278add1155SRico Sonntag/** 2893ccd686SRico Sonntag * A chart showing birth by century. 298add1155SRico Sonntag */ 3093ccd686SRico Sonntagclass ChartBirth 318add1155SRico Sonntag{ 328add1155SRico Sonntag /** 3393ccd686SRico Sonntag * @var Tree 348add1155SRico Sonntag */ 3593ccd686SRico Sonntag private $tree; 3693ccd686SRico Sonntag 3793ccd686SRico Sonntag /** 3893ccd686SRico Sonntag * @var ModuleThemeInterface 3993ccd686SRico Sonntag */ 4093ccd686SRico Sonntag private $theme; 4193ccd686SRico Sonntag 4293ccd686SRico Sonntag /** 4393ccd686SRico Sonntag * @var CenturyService 4493ccd686SRico Sonntag */ 4593ccd686SRico Sonntag private $century_service; 4693ccd686SRico Sonntag 4793ccd686SRico Sonntag /** 4893ccd686SRico Sonntag * @var ColorService 4993ccd686SRico Sonntag */ 5093ccd686SRico Sonntag private $color_service; 518add1155SRico Sonntag 528add1155SRico Sonntag /** 538add1155SRico Sonntag * Constructor. 548add1155SRico Sonntag * 558add1155SRico Sonntag * @param Tree $tree 568add1155SRico Sonntag */ 578add1155SRico Sonntag public function __construct(Tree $tree) 588add1155SRico Sonntag { 5993ccd686SRico Sonntag $this->tree = $tree; 60*cab242e7SGreg Roach $this->theme = app(ModuleThemeInterface::class); 6193ccd686SRico Sonntag $this->century_service = new CenturyService(); 6293ccd686SRico Sonntag $this->color_service = new ColorService(); 638add1155SRico Sonntag } 648add1155SRico Sonntag 658add1155SRico Sonntag /** 668add1155SRico Sonntag * Returns the related database records. 678add1155SRico Sonntag * 688add1155SRico Sonntag * @return \stdClass[] 698add1155SRico Sonntag */ 708add1155SRico Sonntag private function queryRecords(): array 718add1155SRico Sonntag { 728add1155SRico Sonntag $query = DB::table('dates') 733413ec75SRico Sonntag ->selectRaw('ROUND((d_year + 49) / 100) AS century') 748add1155SRico Sonntag ->selectRaw('COUNT(*) AS total') 758add1155SRico Sonntag ->where('d_file', '=', $this->tree->id()) 768add1155SRico Sonntag ->where('d_year', '<>', 0) 778add1155SRico Sonntag ->where('d_fact', '=', 'BIRT') 788add1155SRico Sonntag ->whereIn('d_type', ['@#DGREGORIAN@', '@#DJULIAN@']) 798add1155SRico Sonntag ->groupBy(['century']) 808add1155SRico Sonntag ->orderBy('century'); 818add1155SRico Sonntag 828add1155SRico Sonntag return $query->get()->all(); 838add1155SRico Sonntag } 848add1155SRico Sonntag 858add1155SRico Sonntag /** 868add1155SRico Sonntag * Create a chart of birth places. 878add1155SRico Sonntag * 888add1155SRico Sonntag * @param string|null $color_from 898add1155SRico Sonntag * @param string|null $color_to 908add1155SRico Sonntag * 918add1155SRico Sonntag * @return string 928add1155SRico Sonntag */ 9388de55fdSRico Sonntag public function chartBirth(string $color_from = null, string $color_to = null): string 948add1155SRico Sonntag { 9588de55fdSRico Sonntag $chart_color1 = (string) $this->theme->parameter('distribution-chart-no-values'); 9688de55fdSRico Sonntag $chart_color2 = (string) $this->theme->parameter('distribution-chart-high-values'); 978add1155SRico Sonntag $color_from = $color_from ?? $chart_color1; 988add1155SRico Sonntag $color_to = $color_to ?? $chart_color2; 998add1155SRico Sonntag 10088de55fdSRico Sonntag $data = [ 10188de55fdSRico Sonntag [ 10288de55fdSRico Sonntag I18N::translate('Century'), 10388de55fdSRico Sonntag I18N::translate('Total') 10488de55fdSRico Sonntag ], 10588de55fdSRico Sonntag ]; 1068add1155SRico Sonntag 10788de55fdSRico Sonntag foreach ($this->queryRecords() as $record) { 10888de55fdSRico Sonntag $data[] = [ 10993ccd686SRico Sonntag $this->century_service->centuryName((int) $record->century), 11088de55fdSRico Sonntag $record->total 11188de55fdSRico Sonntag ]; 1128add1155SRico Sonntag } 1138add1155SRico Sonntag 11493ccd686SRico Sonntag $colors = $this->color_service->interpolateRgb($color_from, $color_to, \count($data) - 1); 1158add1155SRico Sonntag 1168add1155SRico Sonntag return view( 11788de55fdSRico Sonntag 'statistics/other/charts/pie', 1188add1155SRico Sonntag [ 11988de55fdSRico Sonntag 'title' => I18N::translate('Births by century'), 12088de55fdSRico Sonntag 'data' => $data, 12188de55fdSRico Sonntag 'colors' => $colors, 1228add1155SRico Sonntag ] 1238add1155SRico Sonntag ); 1248add1155SRico Sonntag } 1258add1155SRico Sonntag} 126