xref: /webtrees/app/Statistics/Repository/MediaRepository.php (revision 71378461661e7642e52abe7d41c9cfffb3e5369b)
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
28*71378461SGreg Roachuse function array_slice;
29*71378461SGreg 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    {
1118add1155SRico Sonntag        if (($type !== self::MEDIA_TYPE_ALL)
1128add1155SRico Sonntag            && ($type !== self::MEDIA_TYPE_UNKNOWN)
1136ccdf4f0SGreg Roach            && !in_array($type, self::MEDIA_TYPES, true)
1148add1155SRico Sonntag        ) {
1158add1155SRico Sonntag            return 0;
1168add1155SRico Sonntag        }
1178add1155SRico Sonntag
1188add1155SRico Sonntag        $query = DB::table('media')
1198add1155SRico Sonntag            ->where('m_file', '=', $this->tree->id());
1208add1155SRico Sonntag
1218add1155SRico Sonntag        if ($type !== self::MEDIA_TYPE_ALL) {
1228add1155SRico Sonntag            if ($type === self::MEDIA_TYPE_UNKNOWN) {
1238add1155SRico Sonntag                // There has to be a better way then this :(
1248add1155SRico Sonntag                foreach (self::MEDIA_TYPES as $t) {
1258add1155SRico Sonntag                    // Use function to add brackets
1260b5fd0a6SGreg Roach                    $query->where(static function (Builder $query) use ($t): void {
1278add1155SRico Sonntag                        $query->where('m_gedcom', 'not like', '%3 TYPE ' . $t . '%')
1288add1155SRico Sonntag                            ->where('m_gedcom', 'not like', '%1 _TYPE ' . $t . '%');
1298add1155SRico Sonntag                    });
1308add1155SRico Sonntag                }
1318add1155SRico Sonntag            } else {
1328add1155SRico Sonntag                // Use function to add brackets
1330b5fd0a6SGreg Roach                $query->where(static function (Builder $query) use ($type): void {
1348add1155SRico Sonntag                    $query->where('m_gedcom', 'like', '%3 TYPE ' . $type . '%')
1358add1155SRico Sonntag                        ->orWhere('m_gedcom', 'like', '%1 _TYPE ' . $type . '%');
1368add1155SRico Sonntag                });
1378add1155SRico Sonntag            }
1388add1155SRico Sonntag        }
1398add1155SRico Sonntag
1408add1155SRico Sonntag        return $query->count();
1418add1155SRico Sonntag    }
1428add1155SRico Sonntag
1438add1155SRico Sonntag    /**
1448add1155SRico Sonntag     * @inheritDoc
1458add1155SRico Sonntag     */
1468add1155SRico Sonntag    public function totalMedia(): string
1478add1155SRico Sonntag    {
1488add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_ALL));
1498add1155SRico Sonntag    }
1508add1155SRico Sonntag
1518add1155SRico Sonntag    /**
1528add1155SRico Sonntag     * @inheritDoc
1538add1155SRico Sonntag     */
1548add1155SRico Sonntag    public function totalMediaAudio(): string
1558add1155SRico Sonntag    {
1568add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_AUDIO));
1578add1155SRico Sonntag    }
1588add1155SRico Sonntag
1598add1155SRico Sonntag    /**
1608add1155SRico Sonntag     * @inheritDoc
1618add1155SRico Sonntag     */
1628add1155SRico Sonntag    public function totalMediaBook(): string
1638add1155SRico Sonntag    {
1648add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_BOOK));
1658add1155SRico Sonntag    }
1668add1155SRico Sonntag
1678add1155SRico Sonntag    /**
1688add1155SRico Sonntag     * @inheritDoc
1698add1155SRico Sonntag     */
1708add1155SRico Sonntag    public function totalMediaCard(): string
1718add1155SRico Sonntag    {
1728add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_CARD));
1738add1155SRico Sonntag    }
1748add1155SRico Sonntag
1758add1155SRico Sonntag    /**
1768add1155SRico Sonntag     * @inheritDoc
1778add1155SRico Sonntag     */
1788add1155SRico Sonntag    public function totalMediaCertificate(): string
1798add1155SRico Sonntag    {
1808add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_CERTIFICATE));
1818add1155SRico Sonntag    }
1828add1155SRico Sonntag
1838add1155SRico Sonntag    /**
1848add1155SRico Sonntag     * @inheritDoc
1858add1155SRico Sonntag     */
1868add1155SRico Sonntag    public function totalMediaCoatOfArms(): string
1878add1155SRico Sonntag    {
1888add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_COAT));
1898add1155SRico Sonntag    }
1908add1155SRico Sonntag
1918add1155SRico Sonntag    /**
1928add1155SRico Sonntag     * @inheritDoc
1938add1155SRico Sonntag     */
1948add1155SRico Sonntag    public function totalMediaDocument(): string
1958add1155SRico Sonntag    {
1968add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_DOCUMENT));
1978add1155SRico Sonntag    }
1988add1155SRico Sonntag
1998add1155SRico Sonntag    /**
2008add1155SRico Sonntag     * @inheritDoc
2018add1155SRico Sonntag     */
2028add1155SRico Sonntag    public function totalMediaElectronic(): string
2038add1155SRico Sonntag    {
2048add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_ELECTRONIC));
2058add1155SRico Sonntag    }
2068add1155SRico Sonntag
2078add1155SRico Sonntag    /**
2088add1155SRico Sonntag     * @inheritDoc
2098add1155SRico Sonntag     */
2108add1155SRico Sonntag    public function totalMediaFiche(): string
2118add1155SRico Sonntag    {
2128add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_FICHE));
2138add1155SRico Sonntag    }
2148add1155SRico Sonntag
2158add1155SRico Sonntag    /**
2168add1155SRico Sonntag     * @inheritDoc
2178add1155SRico Sonntag     */
2188add1155SRico Sonntag    public function totalMediaFilm(): string
2198add1155SRico Sonntag    {
2208add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_FILM));
2218add1155SRico Sonntag    }
2228add1155SRico Sonntag
2238add1155SRico Sonntag    /**
2248add1155SRico Sonntag     * @inheritDoc
2258add1155SRico Sonntag     */
2268add1155SRico Sonntag    public function totalMediaMagazine(): string
2278add1155SRico Sonntag    {
2288add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_MAGAZINE));
2298add1155SRico Sonntag    }
2308add1155SRico Sonntag
2318add1155SRico Sonntag    /**
2328add1155SRico Sonntag     * @inheritDoc
2338add1155SRico Sonntag     */
2348add1155SRico Sonntag    public function totalMediaManuscript(): string
2358add1155SRico Sonntag    {
2368add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_MANUSCRIPT));
2378add1155SRico Sonntag    }
2388add1155SRico Sonntag
2398add1155SRico Sonntag    /**
2408add1155SRico Sonntag     * @inheritDoc
2418add1155SRico Sonntag     */
2428add1155SRico Sonntag    public function totalMediaMap(): string
2438add1155SRico Sonntag    {
2448add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_MAP));
2458add1155SRico Sonntag    }
2468add1155SRico Sonntag
2478add1155SRico Sonntag    /**
2488add1155SRico Sonntag     * @inheritDoc
2498add1155SRico Sonntag     */
2508add1155SRico Sonntag    public function totalMediaNewspaper(): string
2518add1155SRico Sonntag    {
2528add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_NEWSPAPER));
2538add1155SRico Sonntag    }
2548add1155SRico Sonntag
2558add1155SRico Sonntag    /**
2568add1155SRico Sonntag     * @inheritDoc
2578add1155SRico Sonntag     */
2588add1155SRico Sonntag    public function totalMediaPainting(): string
2598add1155SRico Sonntag    {
2608add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_PAINTING));
2618add1155SRico Sonntag    }
2628add1155SRico Sonntag
2638add1155SRico Sonntag    /**
2648add1155SRico Sonntag     * @inheritDoc
2658add1155SRico Sonntag     */
2668add1155SRico Sonntag    public function totalMediaPhoto(): string
2678add1155SRico Sonntag    {
2688add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_PHOTO));
2698add1155SRico Sonntag    }
2708add1155SRico Sonntag
2718add1155SRico Sonntag    /**
2728add1155SRico Sonntag     * @inheritDoc
2738add1155SRico Sonntag     */
2748add1155SRico Sonntag    public function totalMediaTombstone(): string
2758add1155SRico Sonntag    {
2768add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_TOMBSTONE));
2778add1155SRico Sonntag    }
2788add1155SRico Sonntag
2798add1155SRico Sonntag    /**
2808add1155SRico Sonntag     * @inheritDoc
2818add1155SRico Sonntag     */
2828add1155SRico Sonntag    public function totalMediaVideo(): string
2838add1155SRico Sonntag    {
2848add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_VIDEO));
2858add1155SRico Sonntag    }
2868add1155SRico Sonntag
2878add1155SRico Sonntag    /**
2888add1155SRico Sonntag     * @inheritDoc
2898add1155SRico Sonntag     */
2908add1155SRico Sonntag    public function totalMediaOther(): string
2918add1155SRico Sonntag    {
2928add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_OTHER));
2938add1155SRico Sonntag    }
2948add1155SRico Sonntag
2958add1155SRico Sonntag    /**
2968add1155SRico Sonntag     * @inheritDoc
2978add1155SRico Sonntag     */
2988add1155SRico Sonntag    public function totalMediaUnknown(): string
2998add1155SRico Sonntag    {
3008add1155SRico Sonntag        return I18N::number($this->totalMediaTypeQuery(self::MEDIA_TYPE_UNKNOWN));
3018add1155SRico Sonntag    }
3028add1155SRico Sonntag
3038add1155SRico Sonntag    /**
3048add1155SRico Sonntag     * Returns a sorted list of media types and their total counts.
3058add1155SRico Sonntag     *
3068add1155SRico Sonntag     * @param int $tot The total number of media files
3078add1155SRico Sonntag     *
3088add1155SRico Sonntag     * @return array
3098add1155SRico Sonntag     */
3108add1155SRico Sonntag    private function getSortedMediaTypeList(int $tot): array
3118add1155SRico Sonntag    {
3128add1155SRico Sonntag        $media = [];
3138add1155SRico Sonntag        $c     = 0;
3148add1155SRico Sonntag        $max   = 0;
3158add1155SRico Sonntag
3168add1155SRico Sonntag        foreach (self::MEDIA_TYPES as $type) {
3178add1155SRico Sonntag            $count = $this->totalMediaTypeQuery($type);
3188add1155SRico Sonntag
3198add1155SRico Sonntag            if ($count > 0) {
3208add1155SRico Sonntag                $media[$type] = $count;
3218add1155SRico Sonntag
3228add1155SRico Sonntag                if ($count > $max) {
3238add1155SRico Sonntag                    $max = $count;
3248add1155SRico Sonntag                }
3258add1155SRico Sonntag
3268add1155SRico Sonntag                $c += $count;
3278add1155SRico Sonntag            }
3288add1155SRico Sonntag        }
3298add1155SRico Sonntag
3308add1155SRico Sonntag        $count = $this->totalMediaTypeQuery(self::MEDIA_TYPE_UNKNOWN);
3318add1155SRico Sonntag        if ($count > 0) {
3328add1155SRico Sonntag            $media[self::MEDIA_TYPE_UNKNOWN] = $tot - $c;
3338add1155SRico Sonntag            if ($tot - $c > $max) {
3348add1155SRico Sonntag                $max = $count;
3358add1155SRico Sonntag            }
3368add1155SRico Sonntag        }
3378add1155SRico Sonntag
3386ccdf4f0SGreg Roach        if (count($media) > 10 && ($max / $tot) > 0.6) {
3398add1155SRico Sonntag            arsort($media);
3406ccdf4f0SGreg Roach            $media = array_slice($media, 0, 10);
3418add1155SRico Sonntag            $c     = $tot;
3428add1155SRico Sonntag
3438add1155SRico Sonntag            foreach ($media as $cm) {
3448add1155SRico Sonntag                $c -= $cm;
3458add1155SRico Sonntag            }
3468add1155SRico Sonntag
3478add1155SRico Sonntag            if (isset($media[self::MEDIA_TYPE_OTHER])) {
3488add1155SRico Sonntag                $media[self::MEDIA_TYPE_OTHER] += $c;
3498add1155SRico Sonntag            } else {
3508add1155SRico Sonntag                $media[self::MEDIA_TYPE_OTHER] = $c;
3518add1155SRico Sonntag            }
3528add1155SRico Sonntag        }
3538add1155SRico Sonntag
3548add1155SRico Sonntag        asort($media);
3558add1155SRico Sonntag
3568add1155SRico Sonntag        return $media;
3578add1155SRico Sonntag    }
3588add1155SRico Sonntag
3598add1155SRico Sonntag    /**
3608add1155SRico Sonntag     * @inheritDoc
3618add1155SRico Sonntag     */
36288de55fdSRico Sonntag    public function chartMedia(string $color_from = null, string $color_to = null): string
3638add1155SRico Sonntag    {
3648add1155SRico Sonntag        $tot   = $this->totalMediaTypeQuery(self::MEDIA_TYPE_ALL);
3658add1155SRico Sonntag        $media = $this->getSortedMediaTypeList($tot);
3668add1155SRico Sonntag
36793ccd686SRico Sonntag        return (new ChartMedia())
36888de55fdSRico Sonntag            ->chartMedia($media, $color_from, $color_to);
3698add1155SRico Sonntag    }
3708add1155SRico Sonntag}
371