xref: /webtrees/app/Report/ReportHtmlTextbox.php (revision c1010eda29c0909ed4d5d463f32d32bfefdd4dfe)
1a25f0a04SGreg Roach<?php
2a25f0a04SGreg Roach/**
3a25f0a04SGreg Roach * webtrees: online genealogy
41062a142SGreg Roach * Copyright (C) 2018 webtrees development team
5a25f0a04SGreg Roach * This program is free software: you can redistribute it and/or modify
6a25f0a04SGreg Roach * it under the terms of the GNU General Public License as published by
7a25f0a04SGreg Roach * the Free Software Foundation, either version 3 of the License, or
8a25f0a04SGreg Roach * (at your option) any later version.
9a25f0a04SGreg Roach * This program is distributed in the hope that it will be useful,
10a25f0a04SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of
11a25f0a04SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12a25f0a04SGreg Roach * GNU General Public License for more details.
13a25f0a04SGreg Roach * You should have received a copy of the GNU General Public License
14a25f0a04SGreg Roach * along with this program. If not, see <http://www.gnu.org/licenses/>.
15a25f0a04SGreg Roach */
1676692c8bSGreg Roachnamespace Fisharebest\Webtrees\Report;
17a25f0a04SGreg Roach
18a25f0a04SGreg Roach/**
19a25f0a04SGreg Roach * Class ReportHtmlTextbox
20a25f0a04SGreg Roach */
21*c1010edaSGreg Roachclass ReportHtmlTextbox extends ReportBaseTextbox
22*c1010edaSGreg Roach{
23a25f0a04SGreg Roach    /**
2476692c8bSGreg Roach     * Render the elements.
2576692c8bSGreg Roach     *
26a25f0a04SGreg Roach     * @param ReportHtml $renderer
27a25f0a04SGreg Roach     */
28*c1010edaSGreg Roach    public function render($renderer)
29*c1010edaSGreg Roach    {
30a25f0a04SGreg Roach        // checkFootnote
3113abd6f3SGreg Roach        $newelements      = [];
3213abd6f3SGreg Roach        $lastelement      = [];
3313abd6f3SGreg Roach        $footnote_element = [];
34a25f0a04SGreg Roach        // Element counter
35a25f0a04SGreg Roach        $cE = count($this->elements);
36a25f0a04SGreg Roach        //-- collapse duplicate elements
37a25f0a04SGreg Roach        for ($i = 0; $i < $cE; $i++) {
38a25f0a04SGreg Roach            $element = $this->elements[$i];
39a25f0a04SGreg Roach            if (is_object($element)) {
40a25f0a04SGreg Roach                if ($element instanceof ReportBaseText) {
41a25f0a04SGreg Roach                    if (!empty($footnote_element)) {
42a25f0a04SGreg Roach                        ksort($footnote_element);
43a25f0a04SGreg Roach                        foreach ($footnote_element as $links) {
44a25f0a04SGreg Roach                            $newelements[] = $links;
45a25f0a04SGreg Roach                        }
4613abd6f3SGreg Roach                        $footnote_element = [];
47a25f0a04SGreg Roach                    }
48a25f0a04SGreg Roach                    if (empty($lastelement)) {
49a25f0a04SGreg Roach                        $lastelement = $element;
50a25f0a04SGreg Roach                    } else {
51a25f0a04SGreg Roach                        // Checking if the Text has the same style
52a25f0a04SGreg Roach                        if ($element->getStyleName() == $lastelement->getStyleName()) {
537a6ee1acSGreg Roach                            $lastelement->addText(str_replace("\n", '<br>', $element->getValue()));
54a25f0a04SGreg Roach                        } elseif (!empty($lastelement)) {
55a25f0a04SGreg Roach                            $newelements[] = $lastelement;
56a25f0a04SGreg Roach                            $lastelement   = $element;
57a25f0a04SGreg Roach                        }
58a25f0a04SGreg Roach                    }
59a25f0a04SGreg Roach                } // Collect the Footnote links
60a25f0a04SGreg Roach                elseif ($element instanceof ReportBaseFootnote) {
61a25f0a04SGreg Roach                    // Check if the Footnote has been set with it’s link number
62a25f0a04SGreg Roach                    $renderer->checkFootnote($element);
63a25f0a04SGreg Roach                    // Save first the last element if any
64a25f0a04SGreg Roach                    if (!empty($lastelement)) {
65a25f0a04SGreg Roach                        $newelements[] = $lastelement;
6613abd6f3SGreg Roach                        $lastelement   = [];
67a25f0a04SGreg Roach                    }
68a25f0a04SGreg Roach                    // Save the Footnote with it’s link number as key for sorting later
69a25f0a04SGreg Roach                    $footnote_element[$element->num] = $element;
70a25f0a04SGreg Roach                } //-- do not keep empty footnotes
717a6ee1acSGreg Roach                elseif (!($element instanceof ReportBaseFootnote) || trim($element->getValue()) != '') {
72a25f0a04SGreg Roach                    if (!empty($footnote_element)) {
73a25f0a04SGreg Roach                        ksort($footnote_element);
74a25f0a04SGreg Roach                        foreach ($footnote_element as $links) {
75a25f0a04SGreg Roach                            $newelements[] = $links;
76a25f0a04SGreg Roach                        }
7713abd6f3SGreg Roach                        $footnote_element = [];
78a25f0a04SGreg Roach                    }
79a25f0a04SGreg Roach                    if (!empty($lastelement)) {
80a25f0a04SGreg Roach                        $newelements[] = $lastelement;
8113abd6f3SGreg Roach                        $lastelement   = [];
82a25f0a04SGreg Roach                    }
83a25f0a04SGreg Roach                    $newelements[] = $element;
84a25f0a04SGreg Roach                }
85a25f0a04SGreg Roach            } else {
86a25f0a04SGreg Roach                if (!empty($lastelement)) {
87a25f0a04SGreg Roach                    $newelements[] = $lastelement;
8813abd6f3SGreg Roach                    $lastelement   = [];
89a25f0a04SGreg Roach                }
90a25f0a04SGreg Roach                if (!empty($footnote_element)) {
91a25f0a04SGreg Roach                    ksort($footnote_element);
92a25f0a04SGreg Roach                    foreach ($footnote_element as $links) {
93a25f0a04SGreg Roach                        $newelements[] = $links;
94a25f0a04SGreg Roach                    }
9513abd6f3SGreg Roach                    $footnote_element = [];
96a25f0a04SGreg Roach                }
97a25f0a04SGreg Roach                $newelements[] = $element;
98a25f0a04SGreg Roach            }
99a25f0a04SGreg Roach        }
100a25f0a04SGreg Roach        if (!empty($lastelement)) {
101a25f0a04SGreg Roach            $newelements[] = $lastelement;
102a25f0a04SGreg Roach        }
103a25f0a04SGreg Roach        if (!empty($footnote_element)) {
104a25f0a04SGreg Roach            ksort($footnote_element);
105a25f0a04SGreg Roach            foreach ($footnote_element as $links) {
106a25f0a04SGreg Roach                $newelements[] = $links;
107a25f0a04SGreg Roach            }
108a25f0a04SGreg Roach        }
109a25f0a04SGreg Roach        $this->elements = $newelements;
110a25f0a04SGreg Roach        unset($footnote_element, $lastelement, $links, $newelements);
111a25f0a04SGreg Roach
112a25f0a04SGreg Roach        $cP = 0; // Class Padding
113a25f0a04SGreg Roach
114a25f0a04SGreg Roach        // Used with line breaks and cell height calculation within this box only
115a25f0a04SGreg Roach        $renderer->largestFontHeight = 0;
116a25f0a04SGreg Roach
117a25f0a04SGreg Roach        // Current position
1187a6ee1acSGreg Roach        if ($this->left == '.') {
1197820e4d7SGreg Roach            $cX = $renderer->getX();
120a25f0a04SGreg Roach        } else {
121a25f0a04SGreg Roach            $cX = $this->left;
1227820e4d7SGreg Roach            $renderer->setX($cX);
123a25f0a04SGreg Roach        }
124a25f0a04SGreg Roach        // Current position (top)
1257a6ee1acSGreg Roach        if ($this->top == '.') {
1263844edd4SGreg Roach            $this->top = $renderer->getY();
127a25f0a04SGreg Roach        } else {
1287820e4d7SGreg Roach            $renderer->setY($this->top);
129a25f0a04SGreg Roach        }
130a25f0a04SGreg Roach
131a25f0a04SGreg Roach        // Check the width if set to page wide OR set by xml to larger then page wide
132a25f0a04SGreg Roach        if ($this->width == 0 || $this->width > $renderer->getRemainingWidth()) {
133a25f0a04SGreg Roach            $this->width = $renderer->getRemainingWidth();
134a25f0a04SGreg Roach        }
135a25f0a04SGreg Roach        // Setup the CellPadding
136a25f0a04SGreg Roach        if ($this->padding) {
137a25f0a04SGreg Roach            $cP = $renderer->cPadding;
138a25f0a04SGreg Roach        }
139a25f0a04SGreg Roach
140a25f0a04SGreg Roach        // For padding, we have to use less wrap width
141a25f0a04SGreg Roach        $cW = $this->width - ($cP * 2);
142a25f0a04SGreg Roach
143a25f0a04SGreg Roach        //-- calculate the text box height
144a25f0a04SGreg Roach        // Number of lines, will be converted to height
145a25f0a04SGreg Roach        $cHT = 0;
146a25f0a04SGreg Roach        // Element height (exept text)
147a25f0a04SGreg Roach        $eH = 0;
148a25f0a04SGreg Roach        // Footnote height (in points)
149a25f0a04SGreg Roach        $fH = 0;
150a25f0a04SGreg Roach        $w  = 0;
151a25f0a04SGreg Roach        //-- $lw is an array
152a25f0a04SGreg Roach        // 0 => last line width
153a25f0a04SGreg Roach        // 1 => 1 if text was wrapped, 0 if text did not wrap
154a25f0a04SGreg Roach        // 2 => number of LF
15513abd6f3SGreg Roach        $lw = [];
156a25f0a04SGreg Roach        // Element counter
157a25f0a04SGreg Roach        $cE = count($this->elements);
158a25f0a04SGreg Roach        for ($i = 0; $i < $cE; $i++) {
159a25f0a04SGreg Roach            if (is_object($this->elements[$i])) {
160a25f0a04SGreg Roach                $ew = $this->elements[$i]->setWrapWidth($cW - $w - 2, $cW);
161a25f0a04SGreg Roach                if ($ew == $cW) {
162a25f0a04SGreg Roach                    $w = 0;
163a25f0a04SGreg Roach                }
164a25f0a04SGreg Roach                $lw = $this->elements[$i]->getWidth($renderer);
165a25f0a04SGreg Roach                // Text is already gets the # LF
166a25f0a04SGreg Roach                $cHT += $lw[2];
167a25f0a04SGreg Roach                if ($lw[1] == 1) {
168a25f0a04SGreg Roach                    $w = $lw[0];
169a25f0a04SGreg Roach                } elseif ($lw[1] == 2) {
170a25f0a04SGreg Roach                    $w = 0;
171a25f0a04SGreg Roach                } else {
172a25f0a04SGreg Roach                    $w += $lw[0];
173a25f0a04SGreg Roach                }
174a25f0a04SGreg Roach                if ($w > $cW) {
175a25f0a04SGreg Roach                    $w = $lw[0];
176a25f0a04SGreg Roach                }
177a25f0a04SGreg Roach                // For anything else but text (images), get the height
178a25f0a04SGreg Roach                $eH += $this->elements[$i]->getHeight($renderer);
179a25f0a04SGreg Roach            } else {
180a25f0a04SGreg Roach                $fH += abs($renderer->getFootnotesHeight($cW));
181a25f0a04SGreg Roach            }
182a25f0a04SGreg Roach        }
183a25f0a04SGreg Roach        // Add up what’s the final height
184a25f0a04SGreg Roach        $cH = $this->height;
185a25f0a04SGreg Roach        // If any element exist
186a25f0a04SGreg Roach        if ($cE > 0) {
187a25f0a04SGreg Roach            // Check if this is text or some other element, like images
188a25f0a04SGreg Roach            if ($eH == 0) {
189a25f0a04SGreg Roach                // Number of LF but at least one line
190a25f0a04SGreg Roach                $cHT = ($cHT + 1) * $renderer->cellHeightRatio;
191a25f0a04SGreg Roach                // Calculate the cell hight with the largest font size used
192a25f0a04SGreg Roach                $cHT = $cHT * $renderer->largestFontHeight;
193a25f0a04SGreg Roach                if ($cH < $cHT) {
194a25f0a04SGreg Roach                    $cH = $cHT;
195a25f0a04SGreg Roach                }
196a25f0a04SGreg Roach            } // This is any other element
197a25f0a04SGreg Roach            else {
198a25f0a04SGreg Roach                if ($cH < $eH) {
199a25f0a04SGreg Roach                    $cH = $eH;
200a25f0a04SGreg Roach                }
201a25f0a04SGreg Roach                // Add Footnote height to the rest of the height
202a25f0a04SGreg Roach                $cH += $fH;
203a25f0a04SGreg Roach            }
204a25f0a04SGreg Roach        }
205a25f0a04SGreg Roach
206a25f0a04SGreg Roach        unset($lw, $cHT, $fH, $w);
207a25f0a04SGreg Roach
208a25f0a04SGreg Roach        // Finaly, check the last cells height
209a25f0a04SGreg Roach        if ($cH < $renderer->lastCellHeight) {
210a25f0a04SGreg Roach            $cH = $renderer->lastCellHeight;
211a25f0a04SGreg Roach        }
212a25f0a04SGreg Roach        // Update max Y incase of a pagebreak
213a25f0a04SGreg Roach        // We don't want to over write any images or other stuff
214a25f0a04SGreg Roach        $renderer->addMaxY($this->top + $cH);
215a25f0a04SGreg Roach
216a25f0a04SGreg Roach        // Start to print HTML
2177a6ee1acSGreg Roach        echo '<div style="position:absolute;top:', $this->top, 'pt;';
218a25f0a04SGreg Roach        // LTR (left) or RTL (right)
2197a6ee1acSGreg Roach        echo $renderer->alignRTL, ':', $cX, 'pt;';
220a25f0a04SGreg Roach        // Background color
221a25f0a04SGreg Roach        if ($this->fill) {
222a25f0a04SGreg Roach            if (!empty($this->bgcolor)) {
2237a6ee1acSGreg Roach                echo ' background-color:', $this->bgcolor, ';';
224a25f0a04SGreg Roach            }
225a25f0a04SGreg Roach        }
226a25f0a04SGreg Roach        // Print padding only when it’s set
227a25f0a04SGreg Roach        if ($this->padding) {
228a25f0a04SGreg Roach            // Use Cell around padding to support RTL also
2297a6ee1acSGreg Roach            echo 'padding:', $cP, 'pt;';
230a25f0a04SGreg Roach        }
231a25f0a04SGreg Roach        // Border setup
232a25f0a04SGreg Roach        if ($this->border) {
2337a6ee1acSGreg Roach            echo ' border:solid black 1pt;';
2347a6ee1acSGreg Roach            echo 'width:', ($this->width - 1 - ($cP * 2)), 'pt;height:', $cH - 1, 'pt;';
235a25f0a04SGreg Roach        } else {
2367a6ee1acSGreg Roach            echo 'width:', ($this->width - ($cP * 2)), 'pt;height:', $cH, 'pt;';
237a25f0a04SGreg Roach        }
2387a6ee1acSGreg Roach        echo '">';
239a25f0a04SGreg Roach
240a25f0a04SGreg Roach        // Do a little "margin" trick before print
241a25f0a04SGreg Roach        // to get the correct current position => "."
2427820e4d7SGreg Roach        $cXT = $renderer->getX();
2437820e4d7SGreg Roach        $cYT = $renderer->getY();
2447820e4d7SGreg Roach        $renderer->setXy(0, 0);
245a25f0a04SGreg Roach
246a25f0a04SGreg Roach        // Print the text elements
247a25f0a04SGreg Roach        foreach ($this->elements as $element) {
248a25f0a04SGreg Roach            if (is_object($element)) {
249a25f0a04SGreg Roach                $element->render($renderer, $cX, false);
2507a6ee1acSGreg Roach            } elseif (is_string($element) && $element == 'footnotetexts') {
2517820e4d7SGreg Roach                $renderer->footnotes();
2527a6ee1acSGreg Roach            } elseif (is_string($element) && $element == 'addpage') {
2537820e4d7SGreg Roach                $renderer->addPage();
254a25f0a04SGreg Roach            }
255a25f0a04SGreg Roach        }
256a25f0a04SGreg Roach        echo "</div>\n";
257a25f0a04SGreg Roach
258a25f0a04SGreg Roach        // Reset "margins"
2597820e4d7SGreg Roach        $renderer->setXy($cXT, $cYT);
260a25f0a04SGreg Roach        // This will be mostly used to trick the multiple images last height
261a25f0a04SGreg Roach        if ($this->reseth) {
262a25f0a04SGreg Roach            $cH = 0;
263a25f0a04SGreg Roach        }
264a25f0a04SGreg Roach        // New line and some clean up
265a25f0a04SGreg Roach        if (!$this->newline) {
2667820e4d7SGreg Roach            $renderer->setXy($cX + $this->width, $this->top);
267a25f0a04SGreg Roach            $renderer->lastCellHeight = $cH;
268a25f0a04SGreg Roach        } else {
2697820e4d7SGreg Roach            $renderer->setXy(0, $this->top + $cH + ($cP * 2));
270a25f0a04SGreg Roach            $renderer->lastCellHeight = 0;
271a25f0a04SGreg Roach        }
272a25f0a04SGreg Roach    }
273a25f0a04SGreg Roach}
274