1<?php 2 3/** 4 * webtrees: online genealogy 5 * Copyright (C) 2023 webtrees development team 6 * This program is free software: you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License as published by 8 * the Free Software Foundation, either version 3 of the License, or 9 * (at your option) any later version. 10 * This program is distributed in the hope that it will be useful, 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of 12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 * GNU General Public License for more details. 14 * You should have received a copy of the GNU General Public License 15 * along with this program. If not, see <https://www.gnu.org/licenses/>. 16 */ 17 18declare(strict_types=1); 19 20namespace Fisharebest\Webtrees\Module; 21 22use Fisharebest\Webtrees\Auth; 23use Fisharebest\Webtrees\Contracts\UserInterface; 24use Fisharebest\Webtrees\Report\HtmlRenderer; 25use Fisharebest\Webtrees\Report\PdfRenderer; 26use Fisharebest\Webtrees\Report\ReportParserGenerate; 27use Fisharebest\Webtrees\Report\ReportParserSetup; 28use Fisharebest\Webtrees\Services\UserService; 29use Fisharebest\Webtrees\TestCase; 30 31use function ob_get_clean; 32use function ob_start; 33 34/** 35 * Test harness for the class AhnentafelReportModule 36 */ 37class AhnentafelReportModuleTest extends TestCase 38{ 39 protected static bool $uses_database = true; 40 41 /** 42 * @covers \Fisharebest\Webtrees\Module\ModuleReportTrait 43 * @covers \Fisharebest\Webtrees\Module\PedigreeReportModule 44 * @covers \Fisharebest\Webtrees\Report\AbstractRenderer 45 * @covers \Fisharebest\Webtrees\Report\HtmlRenderer 46 * @covers \Fisharebest\Webtrees\Report\PdfRenderer 47 * @covers \Fisharebest\Webtrees\Report\ReportBaseCell 48 * @covers \Fisharebest\Webtrees\Report\ReportBaseElement 49 * @covers \Fisharebest\Webtrees\Report\ReportBaseFootnote 50 * @covers \Fisharebest\Webtrees\Report\ReportBaseImage 51 * @covers \Fisharebest\Webtrees\Report\ReportBaseLine 52 * @covers \Fisharebest\Webtrees\Report\ReportBaseText 53 * @covers \Fisharebest\Webtrees\Report\ReportBaseTextbox 54 * @covers \Fisharebest\Webtrees\Report\ReportExpressionLanguageProvider 55 * @covers \Fisharebest\Webtrees\Report\ReportHtmlCell 56 * @covers \Fisharebest\Webtrees\Report\ReportHtmlFootnote 57 * @covers \Fisharebest\Webtrees\Report\ReportHtmlImage 58 * @covers \Fisharebest\Webtrees\Report\ReportHtmlLine 59 * @covers \Fisharebest\Webtrees\Report\ReportHtmlText 60 * @covers \Fisharebest\Webtrees\Report\ReportHtmlTextbox 61 * @covers \Fisharebest\Webtrees\Report\ReportParserBase 62 * @covers \Fisharebest\Webtrees\Report\ReportParserGenerate 63 * @covers \Fisharebest\Webtrees\Report\ReportParserSetup 64 * @covers \Fisharebest\Webtrees\Report\ReportPdfCell 65 * @covers \Fisharebest\Webtrees\Report\ReportPdfFootnote 66 * @covers \Fisharebest\Webtrees\Report\ReportPdfImage 67 * @covers \Fisharebest\Webtrees\Report\ReportPdfLine 68 * @covers \Fisharebest\Webtrees\Report\ReportPdfText 69 * @covers \Fisharebest\Webtrees\Report\ReportPdfTextBox 70 * @covers \Fisharebest\Webtrees\Report\TcpdfWrapper 71 */ 72 public function testReportRunsWithoutError(): void 73 { 74 $user = (new UserService())->create('user', 'User', 'user@example.com', 'secret'); 75 $user->setPreference(UserInterface::PREF_IS_ADMINISTRATOR, '1'); 76 Auth::login($user); 77 78 $tree = $this->importTree('demo.ged'); 79 $module = new AhnentafelReportModule(); 80 $module->setName('ahnentafel_report'); 81 82 $xml = 'resources/' . $module->xmlFilename(); 83 $vars = [ 84 'pid' => ['id' => 'X1030'], 85 'maxgen' => ['id' => '3'], 86 'sources' => ['id' => 'on'], 87 'pageSize' => ['id' => 'A4'], 88 'notes' => ['id' => 'on'], 89 'occu' => ['id' => 'on'], 90 'resi' => ['id' => 'on'], 91 'children' => ['id' => 'on'], 92 ]; 93 94 $report = new ReportParserSetup($xml); 95 self::assertNotEmpty($report->reportProperties()); 96 97 ob_start(); 98 new ReportParserGenerate($xml, new HtmlRenderer(), $vars, $tree); 99 $html = ob_get_clean(); 100 self::assertStringStartsWith('<', $html); 101 self::assertStringEndsWith('>', $html); 102 103 ob_start(); 104 new ReportParserGenerate($xml, new PdfRenderer(), $vars, $tree); 105 $pdf = ob_get_clean(); 106 107 self::assertStringStartsWith('%PDF', $pdf); 108 self::assertStringEndsWith("%%EOF\n", $pdf); 109 } 110} 111