Provide Page Titles (#46)

That way it is possible to alter the TYPO3 page title when showing a
date or event.

Relates: #10640

Classes/Frontend/MetaInformation/DateMetaInformationService.php

@@ -25,6 +25,7 @@ namespace Wrm\Events\Frontend\MetaInformation;
 
 use TYPO3\CMS\Core\MetaTag\MetaTagManagerRegistry;
 use Wrm\Events\Domain\Model\Date;
+use Wrm\Events\Frontend\PageTitleProvider\DateTitleProviderInterface;
 
 /**
  * TYPO3 has many different APIs to set meta information like: Page Title, Meta Tags, OpenGraph Tags, etc.
@@ -38,16 +39,25 @@ final class DateMetaInformationService implements DateMetaInformationInterface
      */
     private $metaTagManagerRegistry;
 
+    /**
+     * @var DateTitleProviderInterface
+     */
+    private $titleProvider;
+
     public function __construct(
-        MetaTagManagerRegistry $metaTagManagerRegistry
+        MetaTagManagerRegistry $metaTagManagerRegistry,
+        DateTitleProviderInterface $titleProvider
     ) {
         $this->metaTagManagerRegistry = $metaTagManagerRegistry;
+        $this->titleProvider = $titleProvider;
     }
 
     public function setDate(Date $date): void
     {
         $this->setDescription($date);
         $this->setKeywords($date);
+
+        $this->titleProvider->setDate($date);
     }
 
     private function setDescription(Date $date): void

Classes/Frontend/MetaInformation/EventMetaInformationService.php

@@ -25,6 +25,7 @@ namespace Wrm\Events\Frontend\MetaInformation;
 
 use TYPO3\CMS\Core\MetaTag\MetaTagManagerRegistry;
 use Wrm\Events\Domain\Model\Event;
+use Wrm\Events\Frontend\PageTitleProvider\EventTitleProviderInterface;
 
 /**
  * TYPO3 has many different APIs to set meta information like: Page Title, Meta Tags, OpenGraph Tags, etc.
@@ -38,16 +39,25 @@ final class EventMetaInformationService implements EventMetaInformationInterface
      */
     private $metaTagManagerRegistry;
 
+    /**
+     * @var EventTitleProviderInterface
+     */
+    private $titleProvider;
+
     public function __construct(
-        MetaTagManagerRegistry $metaTagManagerRegistry
+        MetaTagManagerRegistry $metaTagManagerRegistry,
+        EventTitleProviderInterface $titleProvider
     ) {
         $this->metaTagManagerRegistry = $metaTagManagerRegistry;
+        $this->titleProvider = $titleProvider;
     }
 
     public function setEvent(Event $event): void
     {
         $this->setDescription($event);
         $this->setKeywords($event);
+
+        $this->titleProvider->setEvent($event);
     }
 
     private function setDescription(Event $event): void

Classes/Frontend/PageTitleProvider/DateTitleProvider.php

@@ -0,0 +1,51 @@
+<?php
+
+declare(strict_types=1);
+
+/*
+ * Copyright (C) 2023 Daniel Siepmann <coding@daniel-siepmann.de>
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+ * 02110-1301, USA.
+ */
+
+namespace Wrm\Events\Frontend\PageTitleProvider;
+
+use Wrm\Events\Domain\Model\Date;
+
+final class DateTitleProvider implements DateTitleProviderInterface
+{
+    /**
+     * @var null|Date
+     */
+    private $date = null;
+
+    public function setDate(Date $date): void
+    {
+        $this->date = $date;
+    }
+
+    public function getTitle(): string
+    {
+        if ($this->date === null) {
+            return '';
+        }
+
+        return implode(' ', [
+            $this->date->getEvent()->getTitle(),
+            $this->date->getStart()->format('d.m.Y H:i'),
+        ]);
+    }
+}

Classes/Frontend/PageTitleProvider/DateTitleProviderInterface.php

@@ -0,0 +1,33 @@
+<?php
+
+declare(strict_types=1);
+
+/*
+ * Copyright (C) 2023 Daniel Siepmann <coding@daniel-siepmann.de>
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+ * 02110-1301, USA.
+ */
+
+namespace Wrm\Events\Frontend\PageTitleProvider;
+
+use TYPO3\CMS\Core\PageTitle\PageTitleProviderInterface;
+use TYPO3\CMS\Core\SingletonInterface;
+use Wrm\Events\Domain\Model\Date;
+
+interface DateTitleProviderInterface extends PageTitleProviderInterface, SingletonInterface
+{
+    public function setDate(Date $date): void;
+}

Classes/Frontend/PageTitleProvider/EventTitleProvider.php

@@ -0,0 +1,48 @@
+<?php
+
+declare(strict_types=1);
+
+/*
+ * Copyright (C) 2023 Daniel Siepmann <coding@daniel-siepmann.de>
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+ * 02110-1301, USA.
+ */
+
+namespace Wrm\Events\Frontend\PageTitleProvider;
+
+use Wrm\Events\Domain\Model\Event;
+
+final class EventTitleProvider implements EventTitleProviderInterface
+{
+    /**
+     * @var null|Event
+     */
+    private $event = null;
+
+    public function setEvent(Event $event): void
+    {
+        $this->event = $event;
+    }
+
+    public function getTitle(): string
+    {
+        if ($this->event === null) {
+            return '';
+        }
+
+        return $this->event->getTitle();
+    }
+}

Classes/Frontend/PageTitleProvider/EventTitleProviderInterface.php

@@ -0,0 +1,33 @@
+<?php
+
+declare(strict_types=1);
+
+/*
+ * Copyright (C) 2023 Daniel Siepmann <coding@daniel-siepmann.de>
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+ * 02110-1301, USA.
+ */
+
+namespace Wrm\Events\Frontend\PageTitleProvider;
+
+use TYPO3\CMS\Core\PageTitle\PageTitleProviderInterface;
+use TYPO3\CMS\Core\SingletonInterface;
+use Wrm\Events\Domain\Model\Event;
+
+interface EventTitleProviderInterface extends PageTitleProviderInterface, SingletonInterface
+{
+    public function setEvent(Event $event): void;
+}

Documentation/Changelog/3.9.0.rst

@@ -18,6 +18,8 @@ Backport of 4.0.0 features:
 * Import keywords for events from destination.one.
   That way keywords are available for usage in meta tags.
 
+* Add page title provider. That way it is possible to alter the TYPO3 page title when showing a date or event.
+
 Fixes
 -----
 

Documentation/Features/PageTitle.rst

@@ -0,0 +1,15 @@
+.. index:: single: page title
+.. _pageTitle:
+
+Page Title
+==========
+
+The extension comes with default implementations for PageTitleProvider.
+
+The default implementation can be exchanged by leveraging TYPO3 Dependency Injection.
+
+Further resources:
+
+* https://docs.typo3.org/m/typo3/reference-coreapi/12.4/en-us/ApiOverview/Seo/PageTitleApi.html
+
+* https://docs.typo3.org/m/typo3/reference-coreapi/12.4/en-us/ApiOverview/DependencyInjection/Index.html

Tests/Functional/Frontend/DatesTest.php

@@ -200,7 +200,9 @@ class DatesTest extends AbstractFunctionalTestCase
         self::assertStringContainsString('Event 2', $html);
     }
 
-    #[Test]
+    /**
+     * @test
+     */
     public function addsMetaTags(): void
     {
         $this->importPHPDataSet(__DIR__ . '/DatesTestFixtures/DateMetaTags.php');
@@ -216,4 +218,22 @@ class DatesTest extends AbstractFunctionalTestCase
         self::assertStringContainsString('<meta name="description" content="Teaser of Event" />', $html);
         self::assertStringContainsString('<meta name="keywords" content="Gewölbe, Goethe, Horst Damm, Kästner, Theater" />', $html);
     }
+
+    /**
+     * @test
+     */
+    public function altersPageTitle(): void
+    {
+        $this->importPHPDataSet(__DIR__ . '/DatesTestFixtures/DatePageTitle.php');
+
+        $request = new InternalRequest();
+        $request = $request->withPageId(1);
+        $request = $request->withQueryParameter('tx_events_dateshow[date]', '1');
+        $response = $this->executeFrontendRequest($request);
+
+        self::assertSame(200, $response->getStatusCode());
+        $html = (string)$response->getBody();
+
+        self::assertStringContainsString('<title>Title of Event 15.02.2023 00:00</title>', $html);
+    }
 }

Tests/Functional/Frontend/DatesTestFixtures/DatePageTitle.php

@@ -0,0 +1,32 @@
+<?php
+
+declare(strict_types=1);
+
+return  [
+    'tt_content' => [
+        0 => [
+            'uid' => '1',
+            'pid' => '1',
+            'CType' => 'list',
+            'list_type' => 'events_dateshow',
+            'header' => 'Singleview',
+        ],
+    ],
+    'tx_events_domain_model_event' => [
+        0 => [
+            'uid' => '1',
+            'pid' => '2',
+            'title' => 'Title of Event',
+            'hidden' => '0',
+        ],
+    ],
+    'tx_events_domain_model_date' => [
+        0 => [
+            'uid' => '1',
+            'pid' => '2',
+            'event' => '1',
+            'start' => '1676419200',
+            'end' => '1676484000',
+        ],
+    ],
+];

Tests/Functional/Frontend/EventsTest.php

@@ -59,4 +59,22 @@ class EventsTest extends AbstractFunctionalTestCase
         self::assertStringContainsString('<meta name="description" content="Teaser of Event" />', $html);
         self::assertStringContainsString('<meta name="keywords" content="Gewölbe, Goethe, Horst Damm, Kästner, Theater" />', $html);
     }
+
+    /**
+     * @test
+     */
+    public function altersPageTitle(): void
+    {
+        $this->importPHPDataSet(__DIR__ . '/EventsTestFixtures/EventPageTitle.php');
+
+        $request = new InternalRequest();
+        $request = $request->withPageId(1);
+        $request = $request->withQueryParameter('tx_events_eventshow[event]', '1');
+        $response = $this->executeFrontendRequest($request);
+
+        self::assertSame(200, $response->getStatusCode());
+        $html = (string)$response->getBody();
+
+        self::assertStringContainsString('<title>Title of Event</title>', $html);
+    }
 }

Tests/Functional/Frontend/EventsTestFixtures/EventPageTitle.php

@@ -0,0 +1,23 @@
+<?php
+
+declare(strict_types=1);
+
+return  [
+    'tt_content' => [
+        0 => [
+            'uid' => '1',
+            'pid' => '1',
+            'CType' => 'list',
+            'list_type' => 'events_eventshow',
+            'header' => 'Singleview',
+        ],
+    ],
+    'tx_events_domain_model_event' => [
+        0 => [
+            'uid' => '1',
+            'pid' => '2',
+            'title' => 'Title of Event',
+            'hidden' => '0',
+        ],
+    ],
+];

Tests/Functional/Frontend/Fixtures/TypoScript/Rendering.typoscript

@@ -38,3 +38,16 @@ plugin.tx_events {
         start = 1660158000
     }
 }
+
+config {
+    pageTitleProviders {
+        date {
+            provider = Wrm\Events\Frontend\PageTitleProvider\DateTitleProvider
+            before = record
+        }
+        event {
+            provider = Wrm\Events\Frontend\PageTitleProvider\EventTitleProvider
+            before = record
+        }
+    }
+}