mambax7 / newbb

makepdf.php

<?php declare(strict_types=1);
/*
 You may not change or alter any portion of this comment or credits
 of supporting developers from this source code or any supporting source code
 which is considered copyrighted (c) material of the original comment or credit authors.

 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.
*/

/**
 * oledrion
 *
 * @copyright   {@link https://xoops.org/ XOOPS Project}
 * @license     {@link https://www.gnu.org/licenses/gpl-2.0.html GNU GPL 2.0 or later}
 * @author      phppp (D.J., infomax@gmail.com)
 */

use Xmf\Request;
use XoopsModules\Xlanguage\Utility as XlanguageUtility;
use XoopsModules\Newbb\{
    Forum,
    Helper,
    Post,
    PostHandler,
    TopicHandler,
    ForumHandler
};

$moduleDirName      = basename(__DIR__);
$moduleDirNameUpper = \mb_strtoupper($moduleDirName);

use tecnickcom\tcpdf;

The type tecnickcom\tcpdf was not found. Maybe you did not declare it correctly or list all dependencies?

// a complete rewrite by irmtfan to enhance: 1- RTL 2- Multilanguage (EMLH and Xlanguage)
error_reporting(0);
require_once __DIR__ . '/header.php';

$helper = Helper::getInstance();
$attach_id = Request::getString('attachid', '', 'GET');
$forum     = Request::getInt('forum', 0, 'GET');
$topic_id  = Request::getInt('topic_id', 0, 'GET');
$post_id   = Request::getInt('post_id', 0, 'GET');

if (is_file(XOOPS_ROOT_PATH . '/class/libraries/vendor/tecnickcom/tcpdf/tcpdf.php')) {
    require_once XOOPS_ROOT_PATH . '/class/libraries/vendor/tecnickcom/tcpdf/tcpdf.php';
} else {
    redirect_header($helper->url('viewtopic.php?topic_id=' . $topic_id), 3, \constant('CO_' . $moduleDirNameUpper . '_' . 'ERROR_NO_PDF'));
}

if (empty($post_id)) {
    exit(_MD_NEWBB_ERRORTOPIC);
}
///** @var PostHandler $postHandler */
//$postHandler = Helper::getInstance()->getHandler('Post');
/** @var Post $post */
$post = $postHandler->get($post_id);
if (!$approved = $post->getVar('approved')) {
    exit(_MD_NEWBB_NORIGHTTOVIEW);
}
$post_data = $postHandler->getPostForPDF($post);
//$post_edit = $post->displayPostEdit();  //reserve for future versions to display edit records
///** @var TopicHandler $topicHandler */
//$topicHandler = Helper::getInstance()->getHandler('Topic');
$forumtopic = $topicHandler->getByPost($post_id);
$topic_id   = $forumtopic->getVar('topic_id');
if (!$approved = $forumtopic->getVar('approved')) {
    exit(_MD_NEWBB_NORIGHTTOVIEW);
}
///** @var ForumHandler $forumHandler */
//$forumHandler    = Helper::getInstance()->getHandler('Forum');
$forum           = $forum ?: $forumtopic->getVar('forum_id');
/** @var Forum $viewtopic_forum */
$viewtopic_forum = $forumHandler->get($forum);
$parent_forums   = [];
$parent_forums   = $forumHandler->getParents($viewtopic_forum);
$pf_title        = '';
if ($parent_forums) {
    foreach ($parent_forums as $p_f) {
        $pf_title .= $p_f['forum_name'] . ' - ';
    }
}
if (!$forumHandler->getPermission($viewtopic_forum)) {
    exit(_MD_NEWBB_NORIGHTTOACCESS);
}
if (!$topicHandler->getPermission($viewtopic_forum, $forumtopic->getVar('topic_status'), 'view')) {
    exit(_MD_NEWBB_NORIGHTTOVIEW);
}
// irmtfan add pdf permission
if (!$topicHandler->getPermission($viewtopic_forum, $forumtopic->getVar('topic_status'), 'pdf')) {
    exit(_MD_NEWBB_NORIGHTTOPDF);
}
//$categoryHandler = \XoopsModules\Newbb\Helper::getInstance()->getHandler('Category');
$cat                                 = $viewtopic_forum->getVar('cat_id');
$viewtopic_cat                       = $categoryHandler->get($cat);
$GLOBALS['xoopsOption']['pdf_cache'] = 0;
$pdf_data['author']                  = $myts->undoHtmlSpecialChars((string)$post_data['author']);
$pdf_data['title']                   = $myts->undoHtmlSpecialChars((string)$post_data['subject']);
$content                             = '';
$content                             .= '<b>' . $pdf_data['title'] . '</b><br><br>';
$content                             .= _MD_NEWBB_AUTHORC . ' ' . $pdf_data['author'] . '<br>';
$content                             .= _MD_NEWBB_POSTEDON . ' ' . formatTimestamp($post_data['date']) . '<br><br><br>';
$content                             .= $myts->undoHtmlSpecialChars((string)$post_data['text']) . '<br>';
//$content .= $post_edit . '<br>'; //reserve for future versions to display edit records
$pdf_data['content']        = str_replace('[pagebreak]', '<br>', $content);
$pdf_data['topic_title']    = $forumtopic->getVar('topic_title');
$pdf_data['forum_title']    = $pf_title . $viewtopic_forum->getVar('forum_name');
$pdf_data['cat_title']      = $viewtopic_cat->getVar('cat_title');
$pdf_data['subject']        = _MD_NEWBB_PDF_SUBJECT . ': ' . $pdf_data['topic_title'];
$pdf_data['keywords']       = XOOPS_URL . ', ' . 'XOOPS Project, ' . $pdf_data['topic_title'];
$pdf_data['HeadFirstLine']  = $GLOBALS['xoopsConfig']['sitename'] . ' - ' . $GLOBALS['xoopsConfig']['slogan'];
$pdf_data['HeadSecondLine'] = _MD_NEWBB_FORUMHOME . ' - ' . $pdf_data['cat_title'] . ' - ' . $pdf_data['forum_title'] . ' - ' . $pdf_data['topic_title'];
// START irmtfan to implement EMLH by GIJ
if (function_exists('easiestml')) {
    $pdf_data = easiestml($pdf_data);
    // END irmtfan to implement EMLH by GIJ
    // START irmtfan to implement Xlanguage by phppp(DJ)
} elseif (class_exists('XlanguageUtility')) {
    $pdf_data = XlanguageUtility::cleanMultiLang($pdf_data);
}
// END irmtfan to implement Xlanguage by phppp(DJ)

$pdf = new TCPDF(PDF_PAGE_ORIENTATION, PDF_UNIT, PDF_PAGE_FORMAT, true, _CHARSET, false);

The constant PDF_PAGE_ORIENTATION was not found. Maybe you did not declare it correctly or list all dependencies?

The constant PDF_UNIT was not found. Maybe you did not declare it correctly or list all dependencies?

The constant PDF_PAGE_FORMAT was not found. Maybe you did not declare it correctly or list all dependencies?

// load $localLanguageOptions array with language specific definitions and apply
//if (is_file(XOOPS_ROOT_PATH . '/class/libraries/vendor/tecnickcom/tcpdf/config/lang/' . $GLOBALS['xoopsConfig']['language'] . '.php')) {
    //require_once XOOPS_ROOT_PATH . '/class/libraries/vendor/tecnickcom/tcpdf/config/lang/' . $GLOBALS['xoopsConfig']['language'] . '.php';
//} else {
    //require_once XOOPS_ROOT_PATH . '/class/libraries/vendor/tecnickcom/tcpdf/config/lang/english.php';
//}
// set some language dependent data:
$lg                   = [];
$lg['a_meta_charset'] = _CHARSET;
//$lg['a_meta_dir']      = _MD_NEWBB_PDF_META_DIR;
$lg['a_meta_language'] = _LANGCODE;
$lg['w_page']          = _MD_NEWBB_PDF_PAGE2;

// set some language-dependent strings (optional)
$pdf->setLanguageArray($lg);
//$pdf->setLanguageArray($localLanguageOptions);
// set some language-dependent strings (optional)
$pdf->setLanguageArray($lg);
//$pdf->setLanguageArray($localLanguageOptions);
// START irmtfan hack to add RTL-LTR local
// until _RTL added to core 2.6.0
if (!defined('_RTL')) {
    define('_RTL', false);
}
$pdf->setRTL(_RTL);
// END irmtfan hack to add RTL-LTR local

// set document information
$pdf->SetCreator(PDF_CREATOR);

The constant PDF_CREATOR was not found. Maybe you did not declare it correctly or list all dependencies?

$pdf->SetAuthor(PDF_AUTHOR);

The constant PDF_AUTHOR was not found. Maybe you did not declare it correctly or list all dependencies?

$pdf->SetTitle($pdf_data['forum_title'] . ' - ' . $pdf_data['subject']);
$pdf->SetSubject($pdf_data['subject']);
$pdf->SetKeywords($pdf_data['keywords']);

//$pdf->SetHeaderData('', '5', $pdf_data['HeadFirstLine'], $pdf_data['HeadSecondLine']);
$pdf->setHeaderData(PDF_HEADER_LOGO, PDF_HEADER_LOGO_WIDTH, $pdf_data['HeadFirstLine'], $pdf_data['HeadSecondLine'], [0, 64, 255], [0, 64, 128]);

The constant PDF_HEADER_LOGO was not found. Maybe you did not declare it correctly or list all dependencies?

The constant PDF_HEADER_LOGO_WIDTH was not found. Maybe you did not declare it correctly or list all dependencies?

//set margins
$pdf->SetMargins(PDF_MARGIN_LEFT, PDF_MARGIN_TOP, PDF_MARGIN_RIGHT);

The constant PDF_MARGIN_RIGHT was not found. Maybe you did not declare it correctly or list all dependencies?

The constant PDF_MARGIN_LEFT was not found. Maybe you did not declare it correctly or list all dependencies?

The constant PDF_MARGIN_TOP was not found. Maybe you did not declare it correctly or list all dependencies?

$pdf->setHeaderMargin(PDF_MARGIN_HEADER);

The constant PDF_MARGIN_HEADER was not found. Maybe you did not declare it correctly or list all dependencies?

$pdf->setFooterMargin(PDF_MARGIN_FOOTER);

The constant PDF_MARGIN_FOOTER was not found. Maybe you did not declare it correctly or list all dependencies?

//set auto page breaks
$pdf->SetAutoPageBreak(true, 25);
$pdf->setHeaderFont([PDF_FONT_NAME_MAIN, '', PDF_FONT_SIZE_MAIN]);

The constant PDF_FONT_NAME_MAIN was not found. Maybe you did not declare it correctly or list all dependencies?

The constant PDF_FONT_SIZE_MAIN was not found. Maybe you did not declare it correctly or list all dependencies?

$pdf->setFooterFont([PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA]);

The constant PDF_FONT_SIZE_DATA was not found. Maybe you did not declare it correctly or list all dependencies?

The constant PDF_FONT_NAME_DATA was not found. Maybe you did not declare it correctly or list all dependencies?

$pdf->setFooterData($tc = [0, 64, 0], $lc = [0, 64, 128]);
$pdf->Open();
$pdf->AddPage();

//$pdf->SetFont(PDF_FONT_NAME_MAIN, PDF_FONT_STYLE_MAIN, PDF_FONT_SIZE_MAIN);
$pdf->SetFont('dejavusans', '', 12);
$pdf->writeHTML($pdf_data['content'], true, 0);
$pdf->Output($pdf_data['topic_title'] . '_' . $post_id . '.pdf', 'I');