1a25f0a04SGreg Roach<?php 2dd04c183SGreg Roachnamespace Fisharebest\Webtrees; 3a25f0a04SGreg Roach 4a25f0a04SGreg Roach/** 5a25f0a04SGreg Roach * webtrees: online genealogy 6a25f0a04SGreg Roach * Copyright (C) 2015 webtrees development team 7a25f0a04SGreg Roach * This program is free software: you can redistribute it and/or modify 8a25f0a04SGreg Roach * it under the terms of the GNU General Public License as published by 9a25f0a04SGreg Roach * the Free Software Foundation, either version 3 of the License, or 10a25f0a04SGreg Roach * (at your option) any later version. 11a25f0a04SGreg Roach * This program is distributed in the hope that it will be useful, 12a25f0a04SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 13a25f0a04SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14a25f0a04SGreg Roach * GNU General Public License for more details. 15a25f0a04SGreg Roach * You should have received a copy of the GNU General Public License 16a25f0a04SGreg Roach * along with this program. If not, see <http://www.gnu.org/licenses/>. 17a25f0a04SGreg Roach */ 18a25f0a04SGreg Roach 19a25f0a04SGreg Roach/** 20a25f0a04SGreg Roach * Class ReportPdfFootnote 21a25f0a04SGreg Roach */ 22a25f0a04SGreg Roachclass ReportPdfFootnote extends ReportBaseFootnote { 23a25f0a04SGreg Roach /** 24a25f0a04SGreg Roach * PDF Footnotes number renderer 25a25f0a04SGreg Roach * 26a25f0a04SGreg Roach * @param PDF $renderer 27a25f0a04SGreg Roach * 28a25f0a04SGreg Roach * @return void 29a25f0a04SGreg Roach */ 30*ffd703eaSGreg Roach public function render($renderer) { 31a25f0a04SGreg Roach $renderer->setCurrentStyle("footnotenum"); 32a25f0a04SGreg Roach $renderer->Write($renderer->getCurrentStyleHeight(), $this->numText, $this->addlink); //source link numbers after name 33a25f0a04SGreg Roach } 34a25f0a04SGreg Roach 35a25f0a04SGreg Roach /** 36a25f0a04SGreg Roach * Write the Footnote text 37a25f0a04SGreg Roach * Uses style name "footnote" by default 38a25f0a04SGreg Roach * 39a25f0a04SGreg Roach * @param PDF $pdf 40a25f0a04SGreg Roach * 41a25f0a04SGreg Roach * @return void 42a25f0a04SGreg Roach */ 43*ffd703eaSGreg Roach public function renderFootnote($pdf) { 44a25f0a04SGreg Roach if ($pdf->getCurrentStyle() != $this->styleName) { 45a25f0a04SGreg Roach $pdf->setCurrentStyle($this->styleName); 46a25f0a04SGreg Roach } 47a25f0a04SGreg Roach $temptext = str_replace("#PAGENUM#", $pdf->PageNo(), $this->text); 48a25f0a04SGreg Roach // Set the link to this y/page position 49a25f0a04SGreg Roach $pdf->SetLink($this->addlink, -1, -1); 50a25f0a04SGreg Roach // Print first the source number 51a25f0a04SGreg Roach // working 52a25f0a04SGreg Roach if ($pdf->getRTL()) { 53a25f0a04SGreg Roach $pdf->writeHTML("<span> ." . $this->num . "</span>", false, false, false, false, ""); 54a25f0a04SGreg Roach } else { 55a25f0a04SGreg Roach $temptext = "<span>" . $this->num . ". </span>" . $temptext; 56a25f0a04SGreg Roach } 57a25f0a04SGreg Roach // underline «title» part of Source item 58a25f0a04SGreg Roach $temptext = str_replace(array('«', '»'), array('<u>', '</u>'), $temptext); 59a25f0a04SGreg Roach $pdf->writeHTML($temptext, true, false, true, false, ''); 60a25f0a04SGreg Roach } 61a25f0a04SGreg Roach 62a25f0a04SGreg Roach /** 63a25f0a04SGreg Roach * Returns the height in points of the Footnote element 64a25f0a04SGreg Roach * 65a25f0a04SGreg Roach * @param PDF $renderer 66a25f0a04SGreg Roach * 67a25f0a04SGreg Roach * @return float $h 68a25f0a04SGreg Roach */ 69*ffd703eaSGreg Roach public function getFootnoteHeight($renderer) { 70a25f0a04SGreg Roach return 0; 71a25f0a04SGreg Roach } 72a25f0a04SGreg Roach 73a25f0a04SGreg Roach /** 74a25f0a04SGreg Roach * Splits the text into lines to fit into a giving cell 75a25f0a04SGreg Roach * and returns the last lines width 76a25f0a04SGreg Roach * 77a25f0a04SGreg Roach * @param PDF $pdf 78a25f0a04SGreg Roach * 79a25f0a04SGreg Roach * @return array 80a25f0a04SGreg Roach */ 81*ffd703eaSGreg Roach public function getWidth($pdf) { 82a25f0a04SGreg Roach // Setup the style name, a font must be selected to calculate the width 83a25f0a04SGreg Roach $pdf->setCurrentStyle("footnotenum"); 84a25f0a04SGreg Roach 85a25f0a04SGreg Roach // Check for the largest font size in the box 86a25f0a04SGreg Roach $fsize = $pdf->getCurrentStyleHeight(); 87a25f0a04SGreg Roach if ($fsize > $pdf->largestFontHeight) { 88a25f0a04SGreg Roach $pdf->largestFontHeight = $fsize; 89a25f0a04SGreg Roach } 90a25f0a04SGreg Roach 91a25f0a04SGreg Roach // Returns the Object if already numbered else false 92a25f0a04SGreg Roach if (empty($this->num)) { 93a25f0a04SGreg Roach $pdf->checkFootnote($this); 94a25f0a04SGreg Roach } 95a25f0a04SGreg Roach 96a25f0a04SGreg Roach // Get the line width 97a25f0a04SGreg Roach $lw = ceil($pdf->GetStringWidth($this->numText)); 98a25f0a04SGreg Roach // Line Feed counter - Number of lines in the text 99a25f0a04SGreg Roach $lfct = substr_count($this->numText, "\n") + 1; 100a25f0a04SGreg Roach // If there is still remaining wrap width... 101a25f0a04SGreg Roach if ($this->wrapWidthRemaining > 0) { 102a25f0a04SGreg Roach // Check with line counter too! 103a25f0a04SGreg Roach // but floor the $wrapWidthRemaining first to keep it bugfree! 104a25f0a04SGreg Roach $wrapWidthRemaining = (int) ($this->wrapWidthRemaining); 105a25f0a04SGreg Roach if (($lw >= $wrapWidthRemaining) or ($lfct > 1)) { 106a25f0a04SGreg Roach $newtext = ""; 107a25f0a04SGreg Roach $lines = explode("\n", $this->numText); 108a25f0a04SGreg Roach // Go throught the text line by line 109a25f0a04SGreg Roach foreach ($lines as $line) { 110a25f0a04SGreg Roach // Line width in points 111a25f0a04SGreg Roach $lw = ceil($pdf->GetStringWidth($line)); 112a25f0a04SGreg Roach // If the line has to be wraped 113a25f0a04SGreg Roach if ($lw >= $wrapWidthRemaining) { 114a25f0a04SGreg Roach $words = explode(" ", $line); 115a25f0a04SGreg Roach $addspace = count($words); 116a25f0a04SGreg Roach $lw = 0; 117a25f0a04SGreg Roach foreach ($words as $word) { 118a25f0a04SGreg Roach $addspace--; 119a25f0a04SGreg Roach $lw += ceil($pdf->GetStringWidth($word . " ")); 120a25f0a04SGreg Roach if ($lw < $wrapWidthRemaining) { 121a25f0a04SGreg Roach $newtext .= $word; 122a25f0a04SGreg Roach if ($addspace != 0) { 123a25f0a04SGreg Roach $newtext .= " "; 124a25f0a04SGreg Roach } 125a25f0a04SGreg Roach } else { 126a25f0a04SGreg Roach $lw = $pdf->GetStringWidth($word . " "); 127a25f0a04SGreg Roach $newtext .= "\n$word"; 128a25f0a04SGreg Roach if ($addspace != 0) { 129a25f0a04SGreg Roach $newtext .= " "; 130a25f0a04SGreg Roach } 131a25f0a04SGreg Roach // Reset the wrap width to the cell width 132a25f0a04SGreg Roach $wrapWidthRemaining = $this->wrapWidthCell; 133a25f0a04SGreg Roach } 134a25f0a04SGreg Roach } 135a25f0a04SGreg Roach } else { 136a25f0a04SGreg Roach $newtext .= $line; 137a25f0a04SGreg Roach } 138a25f0a04SGreg Roach // Check the Line Feed counter 139a25f0a04SGreg Roach if ($lfct > 1) { 140a25f0a04SGreg Roach // Add a new line feed as long as it’s not the last line 141a25f0a04SGreg Roach $newtext .= "\n"; 142a25f0a04SGreg Roach // Reset the line width 143a25f0a04SGreg Roach $lw = 0; 144a25f0a04SGreg Roach // Reset the wrap width to the cell width 145a25f0a04SGreg Roach $wrapWidthRemaining = $this->wrapWidthCell; 146a25f0a04SGreg Roach } 147a25f0a04SGreg Roach $lfct--; 148a25f0a04SGreg Roach } 149a25f0a04SGreg Roach $this->numText = $newtext; 150a25f0a04SGreg Roach $lfct = substr_count($this->numText, "\n"); 151a25f0a04SGreg Roach 152a25f0a04SGreg Roach return array($lw, 1, $lfct); 153a25f0a04SGreg Roach } 154a25f0a04SGreg Roach } 155a25f0a04SGreg Roach $l = 0; 156a25f0a04SGreg Roach $lfct = substr_count($this->numText, "\n"); 157a25f0a04SGreg Roach if ($lfct > 0) { 158a25f0a04SGreg Roach $l = 2; 159a25f0a04SGreg Roach } 160a25f0a04SGreg Roach 161a25f0a04SGreg Roach return array($lw, $l, $lfct); 162a25f0a04SGreg Roach } 163a25f0a04SGreg Roach} 164