18add1155SRico Sonntag<?php 23976b470SGreg Roach 38add1155SRico Sonntag/** 48add1155SRico Sonntag * webtrees: online genealogy 5242a7862SGreg Roach * Copyright (C) 2019 webtrees development team 68add1155SRico Sonntag * This program is free software: you can redistribute it and/or modify 78add1155SRico Sonntag * it under the terms of the GNU General Public License as published by 88add1155SRico Sonntag * the Free Software Foundation, either version 3 of the License, or 98add1155SRico Sonntag * (at your option) any later version. 108add1155SRico Sonntag * This program is distributed in the hope that it will be useful, 118add1155SRico Sonntag * but WITHOUT ANY WARRANTY; without even the implied warranty of 128add1155SRico Sonntag * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 138add1155SRico Sonntag * GNU General Public License for more details. 148add1155SRico Sonntag * You should have received a copy of the GNU General Public License 158add1155SRico Sonntag * along with this program. If not, see <http://www.gnu.org/licenses/>. 168add1155SRico Sonntag */ 178add1155SRico Sonntagdeclare(strict_types=1); 188add1155SRico Sonntag 198add1155SRico Sonntagnamespace Fisharebest\Webtrees\Statistics\Repository; 208add1155SRico Sonntag 218add1155SRico Sonntaguse Fisharebest\Webtrees\I18N; 228add1155SRico Sonntaguse Fisharebest\Webtrees\Statistics\Google\ChartMedia; 238add1155SRico Sonntaguse Fisharebest\Webtrees\Statistics\Repository\Interfaces\MediaRepositoryInterface; 248add1155SRico Sonntaguse Fisharebest\Webtrees\Tree; 258add1155SRico Sonntaguse Illuminate\Database\Capsule\Manager as DB; 268add1155SRico Sonntaguse Illuminate\Database\Query\Builder; 273976b470SGreg Roach 2871378461SGreg Roachuse function array_slice; 2971378461SGreg Roachuse function count; 306ccdf4f0SGreg Roachuse function in_array; 318add1155SRico Sonntag 328add1155SRico Sonntag/** 338add1155SRico Sonntag * A repository providing methods for media type related statistics. 348add1155SRico Sonntag */ 358add1155SRico Sonntagclass MediaRepository implements MediaRepositoryInterface 368add1155SRico Sonntag{ 378add1155SRico Sonntag /** 388add1155SRico Sonntag * @var Tree 398add1155SRico Sonntag */ 408add1155SRico Sonntag private $tree; 418add1155SRico Sonntag 428add1155SRico Sonntag /** 438add1155SRico Sonntag * Available media types. 448add1155SRico Sonntag */ 458add1155SRico Sonntag private const MEDIA_TYPE_ALL = 'all'; 468add1155SRico Sonntag private const MEDIA_TYPE_AUDIO = 'audio'; 478add1155SRico Sonntag private const MEDIA_TYPE_BOOK = 'book'; 488add1155SRico Sonntag private const MEDIA_TYPE_CARD = 'card'; 498add1155SRico Sonntag private const MEDIA_TYPE_CERTIFICATE = 'certificate'; 508add1155SRico Sonntag private const MEDIA_TYPE_COAT = 'coat'; 518add1155SRico Sonntag private const MEDIA_TYPE_DOCUMENT = 'document'; 528add1155SRico Sonntag private const MEDIA_TYPE_ELECTRONIC = 'electronic'; 538add1155SRico Sonntag private const MEDIA_TYPE_FICHE = 'fiche'; 548add1155SRico Sonntag private const MEDIA_TYPE_FILM = 'film'; 558add1155SRico Sonntag private const MEDIA_TYPE_MAGAZINE = 'magazine'; 568add1155SRico Sonntag private const MEDIA_TYPE_MANUSCRIPT = 'manuscript'; 578add1155SRico Sonntag private const MEDIA_TYPE_MAP = 'map'; 588add1155SRico Sonntag private const MEDIA_TYPE_NEWSPAPER = 'newspaper'; 598add1155SRico Sonntag private const MEDIA_TYPE_PAINTING = 'painting'; 608add1155SRico Sonntag private const MEDIA_TYPE_PHOTO = 'photo'; 618add1155SRico Sonntag private const MEDIA_TYPE_TOMBSTONE = 'tombstone'; 628add1155SRico Sonntag private const MEDIA_TYPE_VIDEO = 'video'; 638add1155SRico Sonntag private const MEDIA_TYPE_OTHER = 'other'; 648add1155SRico Sonntag private const MEDIA_TYPE_UNKNOWN = 'unknown'; 658add1155SRico Sonntag 668add1155SRico Sonntag /** 678add1155SRico Sonntag * List of GEDCOM media types. 688add1155SRico Sonntag * 698add1155SRico Sonntag * @var string[] 708add1155SRico Sonntag */ 718add1155SRico Sonntag private const MEDIA_TYPES = [ 728add1155SRico Sonntag self::MEDIA_TYPE_AUDIO, 738add1155SRico Sonntag self::MEDIA_TYPE_BOOK, 748add1155SRico Sonntag self::MEDIA_TYPE_CARD, 758add1155SRico Sonntag self::MEDIA_TYPE_CERTIFICATE, 768add1155SRico Sonntag self::MEDIA_TYPE_COAT, 778add1155SRico Sonntag self::MEDIA_TYPE_DOCUMENT, 788add1155SRico Sonntag self::MEDIA_TYPE_ELECTRONIC, 798add1155SRico Sonntag self::MEDIA_TYPE_FICHE, 808add1155SRico Sonntag self::MEDIA_TYPE_FILM, 818add1155SRico Sonntag self::MEDIA_TYPE_MAGAZINE, 828add1155SRico Sonntag self::MEDIA_TYPE_MANUSCRIPT, 838add1155SRico Sonntag self::MEDIA_TYPE_MAP, 848add1155SRico Sonntag self::MEDIA_TYPE_NEWSPAPER, 858add1155SRico Sonntag self::MEDIA_TYPE_PAINTING, 868add1155SRico Sonntag self::MEDIA_TYPE_PHOTO, 878add1155SRico Sonntag self::MEDIA_TYPE_TOMBSTONE, 888add1155SRico Sonntag self::MEDIA_TYPE_VIDEO, 898add1155SRico Sonntag self::MEDIA_TYPE_OTHER, 908add1155SRico Sonntag ]; 918add1155SRico Sonntag 928add1155SRico Sonntag /** 938add1155SRico Sonntag * Constructor. 948add1155SRico Sonntag * 958add1155SRico Sonntag * @param Tree $tree 968add1155SRico Sonntag */ 978add1155SRico Sonntag public function __construct(Tree $tree) 988add1155SRico Sonntag { 998add1155SRico Sonntag $this->tree = $tree; 1008add1155SRico Sonntag } 1018add1155SRico Sonntag 1028add1155SRico Sonntag /** 1038add1155SRico Sonntag * Returns the number of media records of the given type. 1048add1155SRico Sonntag * 1058add1155SRico Sonntag * @param string $type The media type to query 1068add1155SRico Sonntag * 1078add1155SRico Sonntag * @return int 1088add1155SRico Sonntag */ 1098add1155SRico Sonntag private function totalMediaTypeQuery(string $type): int 1108add1155SRico Sonntag { 111*3cfcc809SGreg Roach if ($type !== self::MEDIA_TYPE_ALL && $type !== self::MEDIA_TYPE_UNKNOWN && !in_array($type, self::MEDIA_TYPES, true)) { 1128add1155SRico Sonntag return 0; 1138add1155SRico Sonntag } 1148add1155SRico Sonntag 1158add1155SRico Sonntag $query = DB::table('media') 1168add1155SRico Sonntag ->where('m_file', '=', $this->tree->id()); 1178add1155SRico Sonntag 1188add1155SRico Sonntag if ($type !== self::MEDIA_TYPE_ALL) { 1198add1155SRico Sonntag if ($type === self::MEDIA_TYPE_UNKNOWN) { 1208add1155SRico Sonntag // There has to be a better way then this :( 1218add1155SRico Sonntag foreach (self::MEDIA_TYPES as $t) { 1228add1155SRico Sonntag // Use function to add brackets 1230b5fd0a6SGreg Roach $query->where(static function (Builder $query) use ($t): void { 1248add1155SRico Sonntag $query->where('m_gedcom', 'not like', '%3 TYPE ' . $t . '%') 1258add1155SRico Sonntag ->where('m_gedcom', 'not like', '%1 _TYPE ' . $t . '%'); 1268add1155SRico Sonntag }); 1278add1155SRico Sonntag } 1288add1155SRico Sonntag } else { 1298add1155SRico Sonntag // Use function to add brackets 1300b5fd0a6SGreg Roach $query->where(static function (Builder $query) use ($type): void { 1318add1155SRico Sonntag $query->where('m_gedcom', 'like', '%3 TYPE ' . $type . '%') 1328add1155SRico Sonntag ->orWhere('m_gedcom', 'like', '%1 _TYPE ' . $type . '%'); 1338add1155SRico Sonntag }); 1348add1155SRico Sonntag } 1358add1155SRico Sonntag } 1368add1155SRico Sonntag 1378add1155SRico Sonntag return $query->count(); 1388add1155SRico Sonntag } 1398add1155SRico Sonntag 1408add1155SRico Sonntag /** 1418add1155SRico Sonntag * @inheritDoc 1428add1155SRico Sonntag */ 1438add1155SRico Sonntag public function totalMedia(): string 1448add1155SRico Sonntag { 1458add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_ALL)); 1468add1155SRico Sonntag } 1478add1155SRico Sonntag 1488add1155SRico Sonntag /** 1498add1155SRico Sonntag * @inheritDoc 1508add1155SRico Sonntag */ 1518add1155SRico Sonntag public function totalMediaAudio(): string 1528add1155SRico Sonntag { 1538add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_AUDIO)); 1548add1155SRico Sonntag } 1558add1155SRico Sonntag 1568add1155SRico Sonntag /** 1578add1155SRico Sonntag * @inheritDoc 1588add1155SRico Sonntag */ 1598add1155SRico Sonntag public function totalMediaBook(): string 1608add1155SRico Sonntag { 1618add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_BOOK)); 1628add1155SRico Sonntag } 1638add1155SRico Sonntag 1648add1155SRico Sonntag /** 1658add1155SRico Sonntag * @inheritDoc 1668add1155SRico Sonntag */ 1678add1155SRico Sonntag public function totalMediaCard(): string 1688add1155SRico Sonntag { 1698add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_CARD)); 1708add1155SRico Sonntag } 1718add1155SRico Sonntag 1728add1155SRico Sonntag /** 1738add1155SRico Sonntag * @inheritDoc 1748add1155SRico Sonntag */ 1758add1155SRico Sonntag public function totalMediaCertificate(): string 1768add1155SRico Sonntag { 1778add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_CERTIFICATE)); 1788add1155SRico Sonntag } 1798add1155SRico Sonntag 1808add1155SRico Sonntag /** 1818add1155SRico Sonntag * @inheritDoc 1828add1155SRico Sonntag */ 1838add1155SRico Sonntag public function totalMediaCoatOfArms(): string 1848add1155SRico Sonntag { 1858add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_COAT)); 1868add1155SRico Sonntag } 1878add1155SRico Sonntag 1888add1155SRico Sonntag /** 1898add1155SRico Sonntag * @inheritDoc 1908add1155SRico Sonntag */ 1918add1155SRico Sonntag public function totalMediaDocument(): string 1928add1155SRico Sonntag { 1938add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_DOCUMENT)); 1948add1155SRico Sonntag } 1958add1155SRico Sonntag 1968add1155SRico Sonntag /** 1978add1155SRico Sonntag * @inheritDoc 1988add1155SRico Sonntag */ 1998add1155SRico Sonntag public function totalMediaElectronic(): string 2008add1155SRico Sonntag { 2018add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_ELECTRONIC)); 2028add1155SRico Sonntag } 2038add1155SRico Sonntag 2048add1155SRico Sonntag /** 2058add1155SRico Sonntag * @inheritDoc 2068add1155SRico Sonntag */ 2078add1155SRico Sonntag public function totalMediaFiche(): string 2088add1155SRico Sonntag { 2098add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_FICHE)); 2108add1155SRico Sonntag } 2118add1155SRico Sonntag 2128add1155SRico Sonntag /** 2138add1155SRico Sonntag * @inheritDoc 2148add1155SRico Sonntag */ 2158add1155SRico Sonntag public function totalMediaFilm(): string 2168add1155SRico Sonntag { 2178add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_FILM)); 2188add1155SRico Sonntag } 2198add1155SRico Sonntag 2208add1155SRico Sonntag /** 2218add1155SRico Sonntag * @inheritDoc 2228add1155SRico Sonntag */ 2238add1155SRico Sonntag public function totalMediaMagazine(): string 2248add1155SRico Sonntag { 2258add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_MAGAZINE)); 2268add1155SRico Sonntag } 2278add1155SRico Sonntag 2288add1155SRico Sonntag /** 2298add1155SRico Sonntag * @inheritDoc 2308add1155SRico Sonntag */ 2318add1155SRico Sonntag public function totalMediaManuscript(): string 2328add1155SRico Sonntag { 2338add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_MANUSCRIPT)); 2348add1155SRico Sonntag } 2358add1155SRico Sonntag 2368add1155SRico Sonntag /** 2378add1155SRico Sonntag * @inheritDoc 2388add1155SRico Sonntag */ 2398add1155SRico Sonntag public function totalMediaMap(): string 2408add1155SRico Sonntag { 2418add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_MAP)); 2428add1155SRico Sonntag } 2438add1155SRico Sonntag 2448add1155SRico Sonntag /** 2458add1155SRico Sonntag * @inheritDoc 2468add1155SRico Sonntag */ 2478add1155SRico Sonntag public function totalMediaNewspaper(): string 2488add1155SRico Sonntag { 2498add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_NEWSPAPER)); 2508add1155SRico Sonntag } 2518add1155SRico Sonntag 2528add1155SRico Sonntag /** 2538add1155SRico Sonntag * @inheritDoc 2548add1155SRico Sonntag */ 2558add1155SRico Sonntag public function totalMediaPainting(): string 2568add1155SRico Sonntag { 2578add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_PAINTING)); 2588add1155SRico Sonntag } 2598add1155SRico Sonntag 2608add1155SRico Sonntag /** 2618add1155SRico Sonntag * @inheritDoc 2628add1155SRico Sonntag */ 2638add1155SRico Sonntag public function totalMediaPhoto(): string 2648add1155SRico Sonntag { 2658add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_PHOTO)); 2668add1155SRico Sonntag } 2678add1155SRico Sonntag 2688add1155SRico Sonntag /** 2698add1155SRico Sonntag * @inheritDoc 2708add1155SRico Sonntag */ 2718add1155SRico Sonntag public function totalMediaTombstone(): string 2728add1155SRico Sonntag { 2738add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_TOMBSTONE)); 2748add1155SRico Sonntag } 2758add1155SRico Sonntag 2768add1155SRico Sonntag /** 2778add1155SRico Sonntag * @inheritDoc 2788add1155SRico Sonntag */ 2798add1155SRico Sonntag public function totalMediaVideo(): string 2808add1155SRico Sonntag { 2818add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_VIDEO)); 2828add1155SRico Sonntag } 2838add1155SRico Sonntag 2848add1155SRico Sonntag /** 2858add1155SRico Sonntag * @inheritDoc 2868add1155SRico Sonntag */ 2878add1155SRico Sonntag public function totalMediaOther(): string 2888add1155SRico Sonntag { 2898add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_OTHER)); 2908add1155SRico Sonntag } 2918add1155SRico Sonntag 2928add1155SRico Sonntag /** 2938add1155SRico Sonntag * @inheritDoc 2948add1155SRico Sonntag */ 2958add1155SRico Sonntag public function totalMediaUnknown(): string 2968add1155SRico Sonntag { 2978add1155SRico Sonntag return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_UNKNOWN)); 2988add1155SRico Sonntag } 2998add1155SRico Sonntag 3008add1155SRico Sonntag /** 3018add1155SRico Sonntag * Returns a sorted list of media types and their total counts. 3028add1155SRico Sonntag * 3038add1155SRico Sonntag * @param int $tot The total number of media files 3048add1155SRico Sonntag * 3058add1155SRico Sonntag * @return array 3068add1155SRico Sonntag */ 3078add1155SRico Sonntag private function getSortedMediaTypeList(int $tot): array 3088add1155SRico Sonntag { 3098add1155SRico Sonntag $media = []; 3108add1155SRico Sonntag $c = 0; 3118add1155SRico Sonntag $max = 0; 3128add1155SRico Sonntag 3138add1155SRico Sonntag foreach (self::MEDIA_TYPES as $type) { 3148add1155SRico Sonntag $count = $this->totalMediaTypeQuery($type); 3158add1155SRico Sonntag 3168add1155SRico Sonntag if ($count > 0) { 3178add1155SRico Sonntag $media[$type] = $count; 3188add1155SRico Sonntag 3198add1155SRico Sonntag if ($count > $max) { 3208add1155SRico Sonntag $max = $count; 3218add1155SRico Sonntag } 3228add1155SRico Sonntag 3238add1155SRico Sonntag $c += $count; 3248add1155SRico Sonntag } 3258add1155SRico Sonntag } 3268add1155SRico Sonntag 3278add1155SRico Sonntag $count = $this->totalMediaTypeQuery(self::MEDIA_TYPE_UNKNOWN); 3288add1155SRico Sonntag if ($count > 0) { 3298add1155SRico Sonntag $media[self::MEDIA_TYPE_UNKNOWN] = $tot - $c; 3308add1155SRico Sonntag if ($tot - $c > $max) { 3318add1155SRico Sonntag $max = $count; 3328add1155SRico Sonntag } 3338add1155SRico Sonntag } 3348add1155SRico Sonntag 3356ccdf4f0SGreg Roach if (count($media) > 10 && ($max / $tot) > 0.6) { 3368add1155SRico Sonntag arsort($media); 3376ccdf4f0SGreg Roach $media = array_slice($media, 0, 10); 3388add1155SRico Sonntag $c = $tot; 3398add1155SRico Sonntag 3408add1155SRico Sonntag foreach ($media as $cm) { 3418add1155SRico Sonntag $c -= $cm; 3428add1155SRico Sonntag } 3438add1155SRico Sonntag 3448add1155SRico Sonntag if (isset($media[self::MEDIA_TYPE_OTHER])) { 3458add1155SRico Sonntag $media[self::MEDIA_TYPE_OTHER] += $c; 3468add1155SRico Sonntag } else { 3478add1155SRico Sonntag $media[self::MEDIA_TYPE_OTHER] = $c; 3488add1155SRico Sonntag } 3498add1155SRico Sonntag } 3508add1155SRico Sonntag 3518add1155SRico Sonntag asort($media); 3528add1155SRico Sonntag 3538add1155SRico Sonntag return $media; 3548add1155SRico Sonntag } 3558add1155SRico Sonntag 3568add1155SRico Sonntag /** 3578add1155SRico Sonntag * @inheritDoc 3588add1155SRico Sonntag */ 35988de55fdSRico Sonntag public function chartMedia(string $color_from = null, string $color_to = null): string 3608add1155SRico Sonntag { 3618add1155SRico Sonntag $tot = $this->totalMediaTypeQuery(self::MEDIA_TYPE_ALL); 3628add1155SRico Sonntag $media = $this->getSortedMediaTypeList($tot); 3638add1155SRico Sonntag 36493ccd686SRico Sonntag return (new ChartMedia()) 36588de55fdSRico Sonntag ->chartMedia($media, $color_from, $color_to); 3668add1155SRico Sonntag } 3678add1155SRico Sonntag} 368