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\Repository; 198add1155SRico Sonntag 208add1155SRico Sonntaguse Fisharebest\Webtrees\I18N; 218add1155SRico Sonntaguse Fisharebest\Webtrees\Statistics\Google\ChartMedia; 228add1155SRico Sonntaguse Fisharebest\Webtrees\Statistics\Repository\Interfaces\MediaRepositoryInterface; 238add1155SRico Sonntaguse Fisharebest\Webtrees\Tree; 248add1155SRico Sonntaguse Illuminate\Database\Capsule\Manager as DB; 258add1155SRico Sonntaguse Illuminate\Database\Query\Builder; 268add1155SRico Sonntag 278add1155SRico Sonntag/** 288add1155SRico Sonntag * A repository providing methods for media type related statistics. 298add1155SRico Sonntag */ 308add1155SRico Sonntagclass MediaRepository implements MediaRepositoryInterface 318add1155SRico Sonntag{ 328add1155SRico Sonntag /** 338add1155SRico Sonntag * @var Tree 348add1155SRico Sonntag */ 358add1155SRico Sonntag private $tree; 368add1155SRico Sonntag 378add1155SRico Sonntag /** 388add1155SRico Sonntag * Available media types. 398add1155SRico Sonntag */ 408add1155SRico Sonntag private const MEDIA_TYPE_ALL = 'all'; 418add1155SRico Sonntag private const MEDIA_TYPE_AUDIO = 'audio'; 428add1155SRico Sonntag private const MEDIA_TYPE_BOOK = 'book'; 438add1155SRico Sonntag private const MEDIA_TYPE_CARD = 'card'; 448add1155SRico Sonntag private const MEDIA_TYPE_CERTIFICATE = 'certificate'; 458add1155SRico Sonntag private const MEDIA_TYPE_COAT = 'coat'; 468add1155SRico Sonntag private const MEDIA_TYPE_DOCUMENT = 'document'; 478add1155SRico Sonntag private const MEDIA_TYPE_ELECTRONIC = 'electronic'; 488add1155SRico Sonntag private const MEDIA_TYPE_FICHE = 'fiche'; 498add1155SRico Sonntag private const MEDIA_TYPE_FILM = 'film'; 508add1155SRico Sonntag private const MEDIA_TYPE_MAGAZINE = 'magazine'; 518add1155SRico Sonntag private const MEDIA_TYPE_MANUSCRIPT = 'manuscript'; 528add1155SRico Sonntag private const MEDIA_TYPE_MAP = 'map'; 538add1155SRico Sonntag private const MEDIA_TYPE_NEWSPAPER = 'newspaper'; 548add1155SRico Sonntag private const MEDIA_TYPE_PAINTING = 'painting'; 558add1155SRico Sonntag private const MEDIA_TYPE_PHOTO = 'photo'; 568add1155SRico Sonntag private const MEDIA_TYPE_TOMBSTONE = 'tombstone'; 578add1155SRico Sonntag private const MEDIA_TYPE_VIDEO = 'video'; 588add1155SRico Sonntag private const MEDIA_TYPE_OTHER = 'other'; 598add1155SRico Sonntag private const MEDIA_TYPE_UNKNOWN = 'unknown'; 608add1155SRico Sonntag 618add1155SRico Sonntag /** 628add1155SRico Sonntag * List of GEDCOM media types. 638add1155SRico Sonntag * 648add1155SRico Sonntag * @var string[] 658add1155SRico Sonntag */ 668add1155SRico Sonntag private const MEDIA_TYPES = [ 678add1155SRico Sonntag self::MEDIA_TYPE_AUDIO, 688add1155SRico Sonntag self::MEDIA_TYPE_BOOK, 698add1155SRico Sonntag self::MEDIA_TYPE_CARD, 708add1155SRico Sonntag self::MEDIA_TYPE_CERTIFICATE, 718add1155SRico Sonntag self::MEDIA_TYPE_COAT, 728add1155SRico Sonntag self::MEDIA_TYPE_DOCUMENT, 738add1155SRico Sonntag self::MEDIA_TYPE_ELECTRONIC, 748add1155SRico Sonntag self::MEDIA_TYPE_FICHE, 758add1155SRico Sonntag self::MEDIA_TYPE_FILM, 768add1155SRico Sonntag self::MEDIA_TYPE_MAGAZINE, 778add1155SRico Sonntag self::MEDIA_TYPE_MANUSCRIPT, 788add1155SRico Sonntag self::MEDIA_TYPE_MAP, 798add1155SRico Sonntag self::MEDIA_TYPE_NEWSPAPER, 808add1155SRico Sonntag self::MEDIA_TYPE_PAINTING, 818add1155SRico Sonntag self::MEDIA_TYPE_PHOTO, 828add1155SRico Sonntag self::MEDIA_TYPE_TOMBSTONE, 838add1155SRico Sonntag self::MEDIA_TYPE_VIDEO, 848add1155SRico Sonntag self::MEDIA_TYPE_OTHER, 858add1155SRico Sonntag ]; 868add1155SRico Sonntag 878add1155SRico Sonntag /** 888add1155SRico Sonntag * Constructor. 898add1155SRico Sonntag * 908add1155SRico Sonntag * @param Tree $tree 918add1155SRico Sonntag */ 928add1155SRico Sonntag public function __construct(Tree $tree) 938add1155SRico Sonntag { 948add1155SRico Sonntag $this->tree = $tree; 958add1155SRico Sonntag } 968add1155SRico Sonntag 978add1155SRico Sonntag /** 988add1155SRico Sonntag * Returns the number of media records of the given type. 998add1155SRico Sonntag * 1008add1155SRico Sonntag * @param string $type The media type to query 1018add1155SRico Sonntag * 1028add1155SRico Sonntag * @return int 1038add1155SRico Sonntag */ 1048add1155SRico Sonntag private function totalMediaTypeQuery(string $type): int 1058add1155SRico Sonntag { 1068add1155SRico Sonntag if (($type !== self::MEDIA_TYPE_ALL) 1078add1155SRico Sonntag && ($type !== self::MEDIA_TYPE_UNKNOWN) 1088add1155SRico Sonntag && !\in_array($type, self::MEDIA_TYPES, true) 1098add1155SRico Sonntag ) { 1108add1155SRico Sonntag return 0; 1118add1155SRico Sonntag } 1128add1155SRico Sonntag 1138add1155SRico Sonntag $query = DB::table('media') 1148add1155SRico Sonntag ->where('m_file', '=', $this->tree->id()); 1158add1155SRico Sonntag 1168add1155SRico Sonntag if ($type !== self::MEDIA_TYPE_ALL) { 1178add1155SRico Sonntag if ($type === self::MEDIA_TYPE_UNKNOWN) { 1188add1155SRico Sonntag // There has to be a better way then this :( 1198add1155SRico Sonntag foreach (self::MEDIA_TYPES as $t) { 1208add1155SRico Sonntag // Use function to add brackets 121*0b5fd0a6SGreg Roach $query->where(static function (Builder $query) use ($t): void { 1228add1155SRico Sonntag $query->where('m_gedcom', 'not like', '%3 TYPE ' . $t . '%') 1238add1155SRico Sonntag ->where('m_gedcom', 'not like', '%1 _TYPE ' . $t . '%'); 1248add1155SRico Sonntag }); 1258add1155SRico Sonntag } 1268add1155SRico Sonntag } else { 1278add1155SRico Sonntag // Use function to add brackets 128*0b5fd0a6SGreg Roach $query->where(static function (Builder $query) use ($type): void { 1298add1155SRico Sonntag $query->where('m_gedcom', 'like', '%3 TYPE ' . $type . '%') 1308add1155SRico Sonntag ->orWhere('m_gedcom', 'like', '%1 _TYPE ' . $type . '%'); 1318add1155SRico Sonntag }); 1328add1155SRico Sonntag } 1338add1155SRico Sonntag } 1348add1155SRico Sonntag 1358add1155SRico Sonntag return $query->count(); 1368add1155SRico Sonntag } 1378add1155SRico Sonntag 1388add1155SRico Sonntag /** 1398add1155SRico Sonntag * @inheritDoc 1408add1155SRico Sonntag */ 1418add1155SRico Sonntag public function totalMedia(): string 1428add1155SRico Sonntag { 1438add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_ALL)); 1448add1155SRico Sonntag } 1458add1155SRico Sonntag 1468add1155SRico Sonntag /** 1478add1155SRico Sonntag * @inheritDoc 1488add1155SRico Sonntag */ 1498add1155SRico Sonntag public function totalMediaAudio(): string 1508add1155SRico Sonntag { 1518add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_AUDIO)); 1528add1155SRico Sonntag } 1538add1155SRico Sonntag 1548add1155SRico Sonntag /** 1558add1155SRico Sonntag * @inheritDoc 1568add1155SRico Sonntag */ 1578add1155SRico Sonntag public function totalMediaBook(): string 1588add1155SRico Sonntag { 1598add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_BOOK)); 1608add1155SRico Sonntag } 1618add1155SRico Sonntag 1628add1155SRico Sonntag /** 1638add1155SRico Sonntag * @inheritDoc 1648add1155SRico Sonntag */ 1658add1155SRico Sonntag public function totalMediaCard(): string 1668add1155SRico Sonntag { 1678add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_CARD)); 1688add1155SRico Sonntag } 1698add1155SRico Sonntag 1708add1155SRico Sonntag /** 1718add1155SRico Sonntag * @inheritDoc 1728add1155SRico Sonntag */ 1738add1155SRico Sonntag public function totalMediaCertificate(): string 1748add1155SRico Sonntag { 1758add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_CERTIFICATE)); 1768add1155SRico Sonntag } 1778add1155SRico Sonntag 1788add1155SRico Sonntag /** 1798add1155SRico Sonntag * @inheritDoc 1808add1155SRico Sonntag */ 1818add1155SRico Sonntag public function totalMediaCoatOfArms(): string 1828add1155SRico Sonntag { 1838add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_COAT)); 1848add1155SRico Sonntag } 1858add1155SRico Sonntag 1868add1155SRico Sonntag /** 1878add1155SRico Sonntag * @inheritDoc 1888add1155SRico Sonntag */ 1898add1155SRico Sonntag public function totalMediaDocument(): string 1908add1155SRico Sonntag { 1918add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_DOCUMENT)); 1928add1155SRico Sonntag } 1938add1155SRico Sonntag 1948add1155SRico Sonntag /** 1958add1155SRico Sonntag * @inheritDoc 1968add1155SRico Sonntag */ 1978add1155SRico Sonntag public function totalMediaElectronic(): string 1988add1155SRico Sonntag { 1998add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_ELECTRONIC)); 2008add1155SRico Sonntag } 2018add1155SRico Sonntag 2028add1155SRico Sonntag /** 2038add1155SRico Sonntag * @inheritDoc 2048add1155SRico Sonntag */ 2058add1155SRico Sonntag public function totalMediaFiche(): string 2068add1155SRico Sonntag { 2078add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_FICHE)); 2088add1155SRico Sonntag } 2098add1155SRico Sonntag 2108add1155SRico Sonntag /** 2118add1155SRico Sonntag * @inheritDoc 2128add1155SRico Sonntag */ 2138add1155SRico Sonntag public function totalMediaFilm(): string 2148add1155SRico Sonntag { 2158add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_FILM)); 2168add1155SRico Sonntag } 2178add1155SRico Sonntag 2188add1155SRico Sonntag /** 2198add1155SRico Sonntag * @inheritDoc 2208add1155SRico Sonntag */ 2218add1155SRico Sonntag public function totalMediaMagazine(): string 2228add1155SRico Sonntag { 2238add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_MAGAZINE)); 2248add1155SRico Sonntag } 2258add1155SRico Sonntag 2268add1155SRico Sonntag /** 2278add1155SRico Sonntag * @inheritDoc 2288add1155SRico Sonntag */ 2298add1155SRico Sonntag public function totalMediaManuscript(): string 2308add1155SRico Sonntag { 2318add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_MANUSCRIPT)); 2328add1155SRico Sonntag } 2338add1155SRico Sonntag 2348add1155SRico Sonntag /** 2358add1155SRico Sonntag * @inheritDoc 2368add1155SRico Sonntag */ 2378add1155SRico Sonntag public function totalMediaMap(): string 2388add1155SRico Sonntag { 2398add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_MAP)); 2408add1155SRico Sonntag } 2418add1155SRico Sonntag 2428add1155SRico Sonntag /** 2438add1155SRico Sonntag * @inheritDoc 2448add1155SRico Sonntag */ 2458add1155SRico Sonntag public function totalMediaNewspaper(): string 2468add1155SRico Sonntag { 2478add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_NEWSPAPER)); 2488add1155SRico Sonntag } 2498add1155SRico Sonntag 2508add1155SRico Sonntag /** 2518add1155SRico Sonntag * @inheritDoc 2528add1155SRico Sonntag */ 2538add1155SRico Sonntag public function totalMediaPainting(): string 2548add1155SRico Sonntag { 2558add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_PAINTING)); 2568add1155SRico Sonntag } 2578add1155SRico Sonntag 2588add1155SRico Sonntag /** 2598add1155SRico Sonntag * @inheritDoc 2608add1155SRico Sonntag */ 2618add1155SRico Sonntag public function totalMediaPhoto(): string 2628add1155SRico Sonntag { 2638add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_PHOTO)); 2648add1155SRico Sonntag } 2658add1155SRico Sonntag 2668add1155SRico Sonntag /** 2678add1155SRico Sonntag * @inheritDoc 2688add1155SRico Sonntag */ 2698add1155SRico Sonntag public function totalMediaTombstone(): string 2708add1155SRico Sonntag { 2718add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_TOMBSTONE)); 2728add1155SRico Sonntag } 2738add1155SRico Sonntag 2748add1155SRico Sonntag /** 2758add1155SRico Sonntag * @inheritDoc 2768add1155SRico Sonntag */ 2778add1155SRico Sonntag public function totalMediaVideo(): string 2788add1155SRico Sonntag { 2798add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_VIDEO)); 2808add1155SRico Sonntag } 2818add1155SRico Sonntag 2828add1155SRico Sonntag /** 2838add1155SRico Sonntag * @inheritDoc 2848add1155SRico Sonntag */ 2858add1155SRico Sonntag public function totalMediaOther(): string 2868add1155SRico Sonntag { 2878add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_OTHER)); 2888add1155SRico Sonntag } 2898add1155SRico Sonntag 2908add1155SRico Sonntag /** 2918add1155SRico Sonntag * @inheritDoc 2928add1155SRico Sonntag */ 2938add1155SRico Sonntag public function totalMediaUnknown(): string 2948add1155SRico Sonntag { 2958add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_UNKNOWN)); 2968add1155SRico Sonntag } 2978add1155SRico Sonntag 2988add1155SRico Sonntag /** 2998add1155SRico Sonntag * Returns a sorted list of media types and their total counts. 3008add1155SRico Sonntag * 3018add1155SRico Sonntag * @param int $tot The total number of media files 3028add1155SRico Sonntag * 3038add1155SRico Sonntag * @return array 3048add1155SRico Sonntag */ 3058add1155SRico Sonntag private function getSortedMediaTypeList(int $tot): array 3068add1155SRico Sonntag { 3078add1155SRico Sonntag $media = []; 3088add1155SRico Sonntag $c = 0; 3098add1155SRico Sonntag $max = 0; 3108add1155SRico Sonntag 3118add1155SRico Sonntag foreach (self::MEDIA_TYPES as $type) { 3128add1155SRico Sonntag $count = $this->totalMediaTypeQuery($type); 3138add1155SRico Sonntag 3148add1155SRico Sonntag if ($count > 0) { 3158add1155SRico Sonntag $media[$type] = $count; 3168add1155SRico Sonntag 3178add1155SRico Sonntag if ($count > $max) { 3188add1155SRico Sonntag $max = $count; 3198add1155SRico Sonntag } 3208add1155SRico Sonntag 3218add1155SRico Sonntag $c += $count; 3228add1155SRico Sonntag } 3238add1155SRico Sonntag } 3248add1155SRico Sonntag 3258add1155SRico Sonntag $count = $this->totalMediaTypeQuery(self::MEDIA_TYPE_UNKNOWN); 3268add1155SRico Sonntag if ($count > 0) { 3278add1155SRico Sonntag $media[self::MEDIA_TYPE_UNKNOWN] = $tot - $c; 3288add1155SRico Sonntag if ($tot - $c > $max) { 3298add1155SRico Sonntag $max = $count; 3308add1155SRico Sonntag } 3318add1155SRico Sonntag } 3328add1155SRico Sonntag 333cb2263dcSGreg Roach if (\count($media) > 10 && ($max / $tot) > 0.6) { 3348add1155SRico Sonntag arsort($media); 3358add1155SRico Sonntag $media = \array_slice($media, 0, 10); 3368add1155SRico Sonntag $c = $tot; 3378add1155SRico Sonntag 3388add1155SRico Sonntag foreach ($media as $cm) { 3398add1155SRico Sonntag $c -= $cm; 3408add1155SRico Sonntag } 3418add1155SRico Sonntag 3428add1155SRico Sonntag if (isset($media[self::MEDIA_TYPE_OTHER])) { 3438add1155SRico Sonntag $media[self::MEDIA_TYPE_OTHER] += $c; 3448add1155SRico Sonntag } else { 3458add1155SRico Sonntag $media[self::MEDIA_TYPE_OTHER] = $c; 3468add1155SRico Sonntag } 3478add1155SRico Sonntag } 3488add1155SRico Sonntag 3498add1155SRico Sonntag asort($media); 3508add1155SRico Sonntag 3518add1155SRico Sonntag return $media; 3528add1155SRico Sonntag } 3538add1155SRico Sonntag 3548add1155SRico Sonntag /** 3558add1155SRico Sonntag * @inheritDoc 3568add1155SRico Sonntag */ 35788de55fdSRico Sonntag public function chartMedia(string $color_from = null, string $color_to = null): string 3588add1155SRico Sonntag { 3598add1155SRico Sonntag $tot = $this->totalMediaTypeQuery(self::MEDIA_TYPE_ALL); 3608add1155SRico Sonntag $media = $this->getSortedMediaTypeList($tot); 3618add1155SRico Sonntag 36293ccd686SRico Sonntag return (new ChartMedia()) 36388de55fdSRico Sonntag ->chartMedia($media, $color_from, $color_to); 3648add1155SRico Sonntag } 3658add1155SRico Sonntag} 366