/typo3/sysext/statictemplates/media/scripts/plaintextLib.inc
PHP | 682 lines | 329 code | 73 blank | 280 comment | 45 complexity | 20757282f7dc832c3cea1515eb8d97e7 MD5 | raw file
Possible License(s): BSD-3-Clause, GPL-2.0, Unlicense, LGPL-2.1, Apache-2.0
- <?php
- /***************************************************************
- * Copyright notice
- *
- * (c) 1999-2009 Kasper Skaarhoj (kasperYYYY@typo3.com)
- * All rights reserved
- *
- * This script is part of the TYPO3 project. The TYPO3 project 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.
- *
- * The GNU General Public License can be found at
- * http://www.gnu.org/copyleft/gpl.html.
- * A copy is found in the textfile GPL.txt and important notices to the license
- * from the author is found in LICENSE.txt distributed with these scripts.
- *
- *
- * This script 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.
- *
- * This copyright notice MUST APPEAR in all copies of the script!
- ***************************************************************/
- /**
- * Generating plain text content of content elements for Direct Mails
- *
- * $Id: plaintextLib.inc 5947 2009-09-16 17:57:09Z ohader $
- * Revised for TYPO3 3.6 June/2003 by Kasper Skaarhoj
- *
- * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
- */
- /**
- * [CLASS/FUNCTION INDEX of SCRIPT]
- *
- *
- *
- * 123: class user_plaintext
- * 137: function main_plaintext($content,$conf)
- * 209: function getMenuSitemap()
- * 220: function getShortcut()
- * 231: function getHTML($str=array())
- * 241: function getHeader()
- * 251: function getImages()
- * 262: function parseBody($str)
- * 284: function renderUploads($str,$upload_path='uploads/media/')
- * 302: function renderHeader($str,$type=0)
- * 353: function pad($lines,$preLineChar,$len)
- * 369: function breakContent($str)
- * 385: function breakBulletlist($str)
- * 416: function breakTable($str)
- * 472: function addDiv($messure,$content,$divChar,$joinChar,$cols)
- * 488: function traverseTable($tableLines)
- * 515: function renderImages($str,$links,$caption,$upload_path='uploads/pics/')
- * 554: function getLink($ll)
- * 571: function breakLines($str,$implChar="\n",$charWidth=0)
- * 583: function getString($str)
- * 595: function userProcess($mConfKey,$passVar)
- * 613: function atag_to_http($content,$conf)
- * 632: function typolist($content,$conf)
- * 647: function typohead($content,$conf)
- * 666: function typocode($content,$conf)
- *
- * TOTAL FUNCTIONS: 24
- * (This index is automatically created/updated by the extension "extdeveval")
- *
- */
- /**
- * Alternative rendering of content elements for Plain Text emails. That means text-only output. No HTML at all. Used by the Direct Mail extension.
- * Normally the plain text output should appear with type=99.
- * To use this library you can include the static template "plugin.alt.plaintext"
- *
- * ## Insert DMailer Boundaries for all elements.
- * config.insertDmailerBoundaries = 1
- * includeLibs.plaintextLib = media/scripts/plaintextLib.inc
- *
- * ## Set up page/type number:
- * alt_plaintext >
- * alt_plaintext = PAGE
- * alt_plaintext.typeNum=99
- * alt_plaintext.config.disableAllHeaderCode = 1
- * alt_plaintext.10 = TEMPLATE
- * alt_plaintext.10 {
- * template = FILE
- * template.file = {$plugin.alt.plaintext.file.template}
- * marks.CONTENT < styles.content.get
- * marks.CONTENT.renderObj = < lib.alt_plaintext.renderObj
- * marks.DATE = TEXT
- * marks.DATE.data = date:U
- * marks.DATE.strftime = %e. %B %Y
- * }
- *
- * (And then also "lib.alt_plaintext.renderObj" is configured extensively - basically with the TypoScript options passed to this class. See the static template "plugin.alt.plaintext")
- *
- * @author Kasper Skaarhoj <kasperYYYY@typo3.com>
- * @package TYPO3
- * @subpackage tslib
- * @link http://typo3.org/doc.0.html?&tx_extrepmgm_pi1[extUid]=270&tx_extrepmgm_pi1[tocEl]=398&cHash=e3024de334
- */
- class user_plaintext {
- var $cObj;
- var $conf=array();
- var $charWidth=76;
- /**
- * Main function, called from TypoScript
- * A content object that renders "tt_content" records. See the comment to this class for TypoScript example of how to trigger it.
- * This detects the CType of the current content element and renders it accordingly. Only wellknown types are rendered.
- *
- * @param string Empty, ignore.
- * @param array TypoScript properties for this content object/function call
- * @return string Plain text content
- */
- function main_plaintext($content,$conf) {
- $this->conf = $conf;
- $this->siteUrl=$conf['siteUrl'];
- $lines = array();
- $CType= (string)$this->cObj->data['CType'];
- switch($CType) {
- case 'header':
- $lines[]=$this->getHeader();
- if ($this->cObj->data['subheader']) {
- $lines[]=$this->breakContent(strip_tags($this->cObj->data['subheader']));
- }
- break;
- case 'text':
- case 'textpic':
- $lines[]=$this->getHeader();
- if ($CType=='textpic' && !($this->cObj->data['imageorient']&24)) {
- $lines[]=$this->getImages();
- $lines[]='';
- }
- $lines[]=$this->breakContent(strip_tags($this->parseBody($this->cObj->data['bodytext'])));
- if ($CType=='textpic' && ($this->cObj->data['imageorient']&24)) {
- $lines[]='';
- $lines[]=$this->getImages();
- }
- break;
- case 'image':
- $lines[]=$this->getHeader();
- $lines[]=$this->getImages();
- break;
- case 'uploads':
- $lines[]=$this->getHeader();
- $lines[]=$this->renderUploads($this->cObj->data['media']);
- break;
- case 'menu':
- $lines[]=$this->getHeader();
- $lines[]=$this->getMenuSitemap();
- break;
- case 'shortcut':
- $lines[]=$this->getShortcut();
- break;
- case 'bullets':
- $lines[]=$this->getHeader();
- $lines[]=$this->breakBulletlist(strip_tags($this->parseBody($this->cObj->data['bodytext'])));
- break;
- case 'table':
- $lines[]=$this->getHeader();
- $lines[]=$this->breakTable(strip_tags($this->parseBody($this->cObj->data['bodytext'])));
- break;
- case 'html':
- $lines[]=$this->getHTML();
- break;
- default:
- $defaultOutput = $this->getString($this->conf['defaultOutput']);
- if ($defaultOutput) {
- $lines[]=str_replace('###CType###',$CType,$defaultOutput);
- }
- break;
- }
- $lines[]=''; // First break.
- $content = implode(chr(10),$lines);
- // User processing:
- $content=$this->userProcess('userProc',$content);
- return $content;
- }
- /**
- * Creates a menu/sitemap
- *
- * @return string Content
- */
- function getMenuSitemap() {
- $str = $this->cObj->cObjGetSingle($this->conf['menu'],$this->conf['menu.']);
- $str = $this->breakBulletlist(trim(strip_tags(preg_replace('/<br[ \/]*>/i',chr(10),$this->parseBody($str)))));
- return $str;
- }
- /**
- * Creates a shortcut ("Insert Records")
- *
- * @return string Content
- */
- function getShortcut() {
- $str = $this->cObj->cObjGetSingle($this->conf['shortcut'],$this->conf['shortcut.']);
- return $str;
- }
- /**
- * Creates an HTML element (stripping tags of course)
- *
- * @param string HTML content to process. If not passed along, the bodytext field is used.
- * @return string Content
- */
- function getHTML($str=array()) {
- return $this->breakContent(strip_tags(preg_replace('/<br[ \/]*>/i',chr(10),$this->parseBody(is_string($str)?$str:$this->cObj->data['bodytext']))));
- }
- /**
- * Creates a header (used for most elements)
- *
- * @return string Content
- * @see renderHeader()
- */
- function getHeader() {
- // links...
- return $this->renderHeader($this->cObj->data['header'],$this->cObj->data['header_layout']);
- }
- /**
- * Get images found in the "image" field of "tt_content"
- *
- * @return string Content
- */
- function getImages() {
- $images = $this->renderImages($this->cObj->data['image'],!$this->cObj->data['image_zoom']?$this->cObj->data['image_link']:'',$this->cObj->data['imagecaption']);
- return $images;
- }
- /**
- * Parsing the bodytext field content, removing typical entities and <br /> tags.
- *
- * @param string Field content from "bodytext"
- * @return string Processed content
- */
- function parseBody($str) {
- // First, regular parsing:
- $str = preg_replace('/<br[ \/]*>/i',' ',$str);
- $str = $this->cObj->stdWrap($str,$this->conf['bodytext.']['stdWrap.']);
- // Then all a-tags:
- $aConf = array();
- $aConf['parseFunc.']['tags.']['a']='USER';
- $aConf['parseFunc.']['tags.']['a.']['userFunc']='user_plaintext->atag_to_http';
- $aConf['parseFunc.']['tags.']['a.']['siteUrl'] = $this->siteUrl;
- $str = $this->cObj->stdWrap($str,$aConf);
- $str = str_replace(' ',' ',t3lib_div::htmlspecialchars_decode($str));
- return $str;
- }
- /**
- * Creates a list of links to uploaded files.
- *
- * @param string List of uploaded filenames from "uploads/media/" (or $upload_path)
- * @param string Alternative path value
- * @return string Content
- */
- function renderUploads($str,$upload_path='uploads/media/') {
- $files = explode(',',$str);
- reset($files);
- $lines=array();
- if ($this->conf['uploads.']['header']) {$lines[]=$this->getString($this->conf['uploads.']['header']);}
- while(list($k,$file)=each($files)) {
- $lines[]=$this->siteUrl.$upload_path.$file;
- }
- return implode(chr(10),$lines);
- }
- /**
- * Renders a content element header, observing the layout type giving different header formattings
- *
- * @param string The header string
- * @param integer The layout type of the header (in the content element)
- * @return string Content
- */
- function renderHeader($str,$type=0) {
- if ($str) {
- $hConf = $this->conf['header.'];
- $defaultType = t3lib_div::intInRange($hConf['defaultType'],1,5);
- $type=t3lib_div::intInRange($type,0,6);
- if (!$type) $type=$defaultType;
- if ($type!=6) { // not hidden
- $tConf = $hConf[$type.'.'];
- $lines=array();
- $blanks = t3lib_div::intInRange($tConf['preBlanks'],0,1000);
- if ($blanks) {
- $lines[]=str_pad('', $blanks-1, chr(10));
- }
- $lines=$this->pad($lines,$tConf['preLineChar'],$tConf['preLineLen']);
- $blanks = t3lib_div::intInRange($tConf['preLineBlanks'],0,1000);
- if ($blanks) {$lines[]=str_pad('', $blanks-1, chr(10));}
- if ($this->cObj->data['date']) {
- $lines[] = $this->getString($hConf['datePrefix']).date($hConf['date']?$hConf['date']:$GLOBALS['TYPO3_CONF_VARS']['SYS']['ddmmyy'],$this->cObj->data['date']);
- }
- $prefix='';
- $str=$this->getString($tConf['prefix']).$str;
- if ($tConf['autonumber']) $str=$this->cObj->parentRecordNumber.$str;
- if ($this->cObj->data['header_position']=='right') {$prefix=str_pad(' ',($this->charWidth-strlen($str)));}
- if ($this->cObj->data['header_position']=='center') {$prefix=str_pad(' ',floor(($this->charWidth-strlen($str))/2));}
- $lines[]=$this->cObj->stdWrap($prefix.$str,$tConf['stdWrap.']);
- if ($this->cObj->data['header_link']) {$lines[] = $this->getString($hConf['linkPrefix']).$this->getLink($this->cObj->data['header_link']);}
- $blanks = t3lib_div::intInRange($tConf['postLineBlanks'],0,1000);
- if ($blanks) {$lines[]=str_pad('', $blanks-1, chr(10));}
- $lines=$this->pad($lines,$tConf['postLineChar'],$tConf['postLineLen']);
- $blanks = t3lib_div::intInRange($tConf['postBlanks'],0,1000);
- if ($blanks) {$lines[]=str_pad('', $blanks-1, chr(10));}
- return implode(chr(10),$lines);
- }
- }
- }
- /**
- * Function used to repeat a char pattern in head lines (like if you want "********" above/below a header)
- *
- * @param array Array of existing lines to which the new char-pattern should be added
- * @param string The character pattern to repeat. Default is "-"
- * @param integer The length of the line. $preLineChar will be repeated to fill in this length.
- * @return array The input array with a new line added.
- * @see renderHeader()
- */
- function pad($lines,$preLineChar,$len) {
- $strPad = t3lib_div::intInRange($len,0,1000);
- $strPadChar = $preLineChar?$preLineChar:'-';
- if ($strPad) {
- $lines[]=str_pad('', $strPad, $strPadChar);
- }
- return $lines;
- }
- /**
- * Function used to wrap the bodytext field content (or image caption) into lines of a max length of
- *
- * @param string The content to break
- * @return string Processed value.
- * @see main_plaintext(), breakLines()
- */
- function breakContent($str) {
- $cParts = explode(chr(10),$str);
- reset($cParts);
- $lines=array();
- while(list(,$substrs)=each($cParts)) {
- $lines[]=$this->breakLines($substrs);
- }
- return implode(chr(10),$lines);
- }
- /**
- * Breaks content lines into a bullet list
- *
- * @param string Content string to make into a bullet list
- * @return string Processed value
- */
- function breakBulletlist($str) {
- $type = $this->cObj->data['layout'];
- $type=t3lib_div::intInRange($type,0,3);
- $tConf = $this->conf['bulletlist.'][$type.'.'];
- $cParts = explode(chr(10),$str);
- reset($cParts);
- $lines=array();
- $c=0;
- while(list(,$substrs)=each($cParts)) {
- $c++;
- $bullet = $tConf['bullet'] ? $this->getString($tConf['bullet']) : ' - ';
- $bLen=strlen($bullet);
- $bullet = substr(str_replace('#',$c,$bullet),0,$bLen);
- $secondRow = substr($tConf['secondRow']?$this->getString($tConf['secondRow']):str_pad('',strlen($bullet),' '),0,$bLen);
- $lines[]=$bullet.$this->breakLines($substrs,chr(10).$secondRow,$this->charWidth-$bLen);
- $blanks = t3lib_div::intInRange($tConf['blanks'],0,1000);
- if ($blanks) {$lines[]=str_pad('', $blanks-1, chr(10));}
- }
- return implode(chr(10),$lines);
- }
- /**
- * Formatting a table in plain text (based on the paradigm of lines being content rows and cells separated by "|")
- *
- * @param string Content string
- * @return string Processed value
- */
- function breakTable($str) {
- $cParts = explode(chr(10),$str);
- reset($cParts);
- $lines=array();
- $cols = intval($this->conf['cols']) ? intval($this->conf['cols']) : 0 ;
- $c=0;
- while(list(,$substrs)=each($cParts)) {
- $c++;
- if (trim($substrs)) {
- $lineParts=explode('|',$substrs);
- if (!$cols) $cols=count($lineParts);
- for ($a=0;$a<$cols;$a++) {
- $jdu = explode(chr(10),$this->breakLines($lineParts[$a],chr(10),ceil($this->charWidth/$cols)));
- $lines[$c][$a]=$jdu;
- }
- }
- }
- $messure = $this->traverseTable($lines);
- $divChar='-';
- $joinChar='+';
- $colChar='|';
- // Make table:
- $outLines = array();
- $outLines[]=$this->addDiv($messure,'',$divChar,$joinChar,$cols);
- reset($lines);
- while(list($k,$v)=each($lines)) {
- $top = intval($messure[1][$k]);
- for ($aa=0;$aa<$top;$aa++) {
- $tempArr=array();
- for ($bb=0;$bb<$cols;$bb++) {
- $tempArr[$bb]=str_pad($v[$bb][$aa],$messure[0][$bb],' ');
- }
- $outLines[]=$colChar.implode($colChar,$tempArr).$colChar;
- }
- $outLines[]=$this->addDiv($messure,'',$divChar,$joinChar,$cols);
- }
- return implode(chr(10),$outLines);
- }
- /**
- * Subfunction for breakTable(): Adds a divider line between table rows.
- *
- * @param array Some information about sizes
- * @param string Empty string.
- * @param string Character to use for the divider line, typically "-"
- * @param string Join character, typically "+"
- * @param integer Number of table columns
- * @return string Divider line for the table
- * @access private
- * @see breakTable()
- */
- function addDiv($messure,$content,$divChar,$joinChar,$cols) {
- $tempArr=array();
- for ($a=0;$a<$cols;$a++) {
- $tempArr[$a]=str_pad($content,$messure[0][$a],$divChar);
- }
- return $joinChar.implode($joinChar,$tempArr).$joinChar;
- }
- /**
- * Traverses the table lines/cells and creates arrays with statistics for line numbers and lengths
- *
- * @param array Array with [table rows] [table cells] [lines in cell]
- * @return array Statistics (max lines/lengths)
- * @access private
- * @see breakTable()
- */
- function traverseTable($tableLines) {
- $maxLen=array();
- $maxLines=array();
- reset($tableLines);
- while(list($k,$v)=each($tableLines)) {
- reset($v);
- while(list($kk,$vv)=each($v)) {
- reset($vv);
- while(list($lk,$lv)=each($vv)) {
- if (strlen($lv)>intval($maxLen[$kk])) $maxLen[$kk]=strlen($lv);
- }
- if (count($vv)>intval($maxLines[$k])) $maxLines[$k]=count($vv);
- }
- }
- return array($maxLen,$maxLines);
- }
- /**
- * Render block of images - which means creating lines with links to the images.
- *
- * @param string List of image filenames (from "image" field in tt_content records)
- * @param string Link value from the "image_link" field in tt_content records
- * @param string Caption text
- * @param string Alternative relative path for the files listed in $str
- * @return string Content
- * @see getImages()
- */
- function renderImages($str,$links,$caption,$upload_path='uploads/pics/') {
- $images = explode(',',$str);
- $linksArr = explode(',',$links);
- reset($images);
- $lines=array();
- if ($this->conf['images.']['header']) {$lines[]=$this->getString($this->conf['images.']['header']);}
- while(list($k,$file)=each($images)) {
- $lines[]=$this->siteUrl.$upload_path.$file;
- if ($links && count($linksArr)>1) {
- if (isset($linksArr[$k])) {
- $ll=$linksArr[$k];
- } else {
- $ll=$linksArr[0];
- }
- $theLink = $this->getLink($ll);
- if ($theLink) {$lines[]=$this->getString($this->conf['images.']['linkPrefix']).$theLink;}
- }
- }
- if ($links && count($linksArr)==1) {
- $theLink = $this->getLink($links);
- if ($theLink) {$lines[]=$this->getString($this->conf['images.']['linkPrefix']).$theLink;}
- }
- if ($caption) {
- $lines[]='';
- $cHeader = trim($this->getString($this->conf['images.']['captionHeader']));
- if ($cHeader) $lines[]=$cHeader;
- $lines[]=$this->breakContent($caption);
- }
- return implode(chr(10),$lines);
- }
- /**
- * Returns a typolink URL based on input.
- *
- * @param string Parameter to typolink
- * @return string The URL returned from $this->cObj->getTypoLink_URL(); - possibly it prefixed with the URL of the site if not present already
- */
- function getLink($ll) {
- $theLink=$this->cObj->getTypoLink_URL($ll);
- if (substr($theLink,0,4)!='http') {
- $theLink=$this->siteUrl.$theLink;
- }
- return $theLink;
- }
- /**
- * Breaking lines into fixed length lines, using t3lib_div::breakLinesForEmail()
- *
- * @param string The string to break
- * @param string Line break character
- * @param integer Length of lines, default is $this->charWidth
- * @return string Processed string
- * @see t3lib_div::breakLinesForEmail()
- */
- function breakLines($str,$implChar="\n",$charWidth=0) {
- return t3lib_div::breakLinesForEmail($str,$implChar,$charWidth?$charWidth:$this->charWidth);
- }
- /**
- * Explodes a string with "|" and if the second part is found it will return this, otherwise the first part.
- * Used for many TypoScript properties used in this class since they need preceeding whitespace to be preserved.
- *
- * @param string Input string
- * @return string Output string
- * @access private
- */
- function getString($str) {
- $parts = explode('|',$str);
- return strcmp($parts[1],'')?$parts[1]:$parts[0];
- }
- /**
- * Calls a user function for processing of data
- *
- * @param string TypoScript property name, pointing to the definition of the user function to call (from the TypoScript array internally in this class). This array is passed to the user function. Notice that "parentObj" property is a reference to this class ($this)
- * @param mixed Variable to process
- * @return mixed The processed $passVar as returned by the function call
- */
- function userProcess($mConfKey,$passVar) {
- if ($this->conf[$mConfKey]) {
- $funcConf = $this->conf[$mConfKey.'.'];
- $funcConf['parentObj'] = $this;
- $passVar = $GLOBALS['TSFE']->cObj->callUserFunction($this->conf[$mConfKey], $funcConf, $passVar);
- }
- return $passVar;
- }
- /**
- * Function used by TypoScript "parseFunc" to process links in the bodytext.
- * Extracts the link and shows it in plain text in a parathesis next to the link text. If link was relative the site URL was prepended.
- *
- * @param string Empty, ignore.
- * @param array TypoScript parameters
- * @return string Processed output.
- * @see parseBody()
- */
- function atag_to_http($content,$conf) {
- $this->conf = $conf;
- $this->siteUrl=$conf['siteUrl'];
- $theLink = trim($this->cObj->parameters['href']);
- if (strtolower(substr($theLink,0,7))=='mailto:') {
- $theLink=substr($theLink,7);
- } elseif (substr($theLink,0,4)!='http') {
- $theLink=$this->siteUrl.$theLink;
- }
- return $this->cObj->getCurrentVal().' (Link: '.$theLink.' )';
- }
- /**
- * User function (called from TypoScript) for generating a bullet list (used in parsefunc)
- *
- * @param string Empty, ignore.
- * @param array TypoScript parameters
- * @return string Processed output.
- */
- function typolist($content,$conf) {
- $this->conf = $this->cObj->mergeTSRef($conf,'bulletlist');
- $this->siteUrl=$conf['siteUrl'];
- $str = trim($this->cObj->getCurrentVal());
- $this->cObj->data['layout'] = $this->cObj->parameters['type'];
- return $this->breakBulletlist($str);
- }
- /**
- * User function (called from TypoScript) for generating a typo header tag (used in parsefunc)
- *
- * @param string Empty, ignore.
- * @param array TypoScript parameters
- * @return string Processed output.
- */
- function typohead($content,$conf) {
- $this->conf = $this->cObj->mergeTSRef($conf,'header');
- $this->siteUrl=$conf['siteUrl'];
- $str = trim($this->cObj->getCurrentVal());
- $this->cObj->data['header_layout'] = $this->cObj->parameters['type'];
- $this->cObj->data['header_position'] = $this->cObj->parameters['align'];
- $this->cObj->data['header']=$str;
- return $this->getHeader();
- }
- /**
- * User function (called from TypoScript) for generating a code listing (used in parsefunc)
- *
- * @param string Empty, ignore.
- * @param array TypoScript parameters
- * @return string Processed output.
- */
- function typocode($content,$conf) {
- // Nothing is really done here...
- $this->conf = $conf;
- $this->siteUrl=$conf['siteUrl'];
- return $this->cObj->getCurrentVal();
- }
- }
- if (defined('TYPO3_MODE') && $TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['media/scripts/plaintextLib.inc']) {
- include_once($TYPO3_CONF_VARS[TYPO3_MODE]['XCLASS']['media/scripts/plaintextLib.inc']);
- }
- ?>