content/classes/Pages/class.ilPCParagraph.php

Go to the documentation of this file.

<?php
/*
        +-----------------------------------------------------------------------------+
        | ILIAS open source                                                           |
        +-----------------------------------------------------------------------------+
        | Copyright (c) 1998-2001 ILIAS open source, University of Cologne            |
        |                                                                             |
        | This program 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.                      |
        |                                                                             |
        | 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.  See the               |
        | GNU General Public License for more details.                                |
        |                                                                             |
        | You should have received a copy of the GNU General Public License           |
        | along with this program; if not, write to the Free Software                 |
        | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA. |
        +-----------------------------------------------------------------------------+
*/

require_once("content/classes/Pages/class.ilPageContent.php");
require_once("./content/classes/Pages/class.ilWysiwygUtil.php");

class ilPCParagraph extends ilPageContent
{
        var $dom;
        var $par_node;                  // node of Paragraph element

        function ilPCParagraph(&$a_dom)
        {
                parent::ilPageContent();
                $this->setType("par");

                $this->dom =& $a_dom;
        }

        function setNode(&$a_node)
        {
                parent::setNode($a_node);               // this is the PageContent node
                $this->par_node =& $a_node->first_child();              //... and this the Paragraph node
        }


        function createAtNode (&$node) {
                $this->node =& $this->dom->create_element("PageContent");
                $this->par_node =& $this->dom->create_element("Paragraph");
                $this->par_node =& $this->node->append_child($this->par_node);
                $this->par_node->set_attribute("Language", "");
                $node->append_child ($this->node);
        }
        
        
        function create(&$a_pg_obj, $a_hier_id)
        {               
                $this->node =& $this->dom->create_element("PageContent");
                $a_pg_obj->insertContent($this, $a_hier_id, IL_INSERT_AFTER);
                $this->par_node =& $this->dom->create_element("Paragraph");
                $this->par_node =& $this->node->append_child($this->par_node);
                $this->par_node->set_attribute("Language", "");
        }


        function setText($a_text)
        {
                // DOMXML_LOAD_PARSING, DOMXML_LOAD_VALIDATING, DOMXML_LOAD_RECOVERING
                $temp_dom = @domxml_open_mem("<Paragraph>".$a_text."</Paragraph>",
                        DOMXML_LOAD_PARSING, $error);

                //$this->text = $a_text;
                // remove all childs
                if(empty($error))
                {
                        // delete children of paragraph node
                        $children = $this->par_node->child_nodes();
                        for($i=0; $i<count($children); $i++)
                        {
                                $this->par_node->remove_child($children[$i]);
                        }


                        // copy new content children in paragraph node
                        $xpc = xpath_new_context($temp_dom);
                        $path = "//Paragraph";
                        $res =& xpath_eval($xpc, $path);
                        if (count($res->nodeset) == 1)
                        {
                                $new_par_node =& $res->nodeset[0];
                                $new_childs = $new_par_node->child_nodes();
                                for($i=0; $i<count($new_childs); $i++)
                                {
                                        $cloned_child =& $new_childs[$i]->clone_node(true);
                                        $this->par_node->append_child($cloned_child);
                                }
                        }
//echo "<br>thedump:".htmlentities($this->dom->dump_node($this->par_node)).":";
                        return true;
                }
                else
                {
                        return $error;
                }
        }

        function getText($a_short_mode = false)
        {
                if (is_object($this->par_node))
                {
                        $content = "";
                        $childs = $this->par_node->child_nodes();
                        for($i=0; $i<count($childs); $i++)
                        {
                                $content .= $this->dom->dump_node($childs[$i]);
                        }
                        //return $this->par_node->get_content();
                        return $content;
                }
                else
                {
                        return "";
                }
        }

        function setCharacteristic($a_char)
        {
                if (!empty($a_char))
                {
                        $this->par_node->set_attribute("Characteristic", $a_char);
                }
                else
                {
                        if ($this->par_node->has_attribute("Characteristic"))
                        {
                                $this->par_node->remove_attribute("Characteristic");
                        }
                }
        }

        function getCharacteristic()
        {
                return $this->par_node->get_attribute("Characteristic");
        }


        function setSubCharacteristic($a_char)
        {
                if (!empty($a_char))
                {
                        $this->par_node->set_attribute("SubCharacteristic", $a_char);
                }
                else
                {
                        if ($this->par_node->has_attribute("SubCharacteristic"))
                        {
                                $this->par_node->remove_attribute("SubCharacteristic");
                        }
                }
        }

        function getAutoIndent()
        {
                return $this->par_node->get_attribute("AutoIndent");
        }
        
        function setAutoIndent($a_char)
        {
                if (!empty($a_char))
                {
                        $this->par_node->set_attribute("AutoIndent", $a_char);
                }
                else
                {
                        if ($this->par_node->has_attribute("AutoIndent"))
                        {
                                $this->par_node->remove_attribute("AutoIndent");
                        }
                }
        }

        function getSubCharacteristic()
        {
                return $this->par_node->get_attribute("SubCharacteristic");
        }

        function setDownloadTitle($a_char)
        {
                if (!empty($a_char))
                {
                        $this->par_node->set_attribute("DownloadTitle", $a_char);
                }
                else
                {
                        if ($this->par_node->has_attribute("DownloadTitle"))
                        {
                                $this->par_node->remove_attribute("DownloadTitle");
                        }
                }
        }

        function getDownloadTitle()
        {
                return $this->par_node->get_attribute("DownloadTitle");
        }
        
        function setShowLineNumbers($a_char)
        {
                $a_char = empty($a_char)?"n":$a_char;
                
                $this->par_node->set_attribute("ShowLineNumbers", $a_char);
        }

        function getShowLineNumbers()
        {
                return $this->par_node->get_attribute("ShowLineNumbers");
        }
        
        function setLanguage($a_lang)
        {
                $this->par_node->set_attribute("Language", $a_lang);
        }

        function getLanguage()
        {
                return $this->par_node->get_attribute("Language");
        }

        function input2xml($a_text, $a_wysiwyg = 0)
        {
                $a_text = stripslashes($a_text);

                // note: the order of the processing steps is crucial
                // and should be the same as in xml2output() in REVERSE order!
                $a_text = trim($a_text);

//echo "<br>first:".htmlentities($a_text);

                if ($a_wysiwyg == 1)
                {
                        //$a_text = str_replace("&","&amp;",$a_text);
                        //$a_text = str_replace("<","&lt;",$a_text);
                        //$a_text = str_replace(">","&gt;",$a_text);

                        $wysiwygUtil = new ilWysiwygUtil();
                        $a_text = $wysiwygUtil->convertFromPost($a_text);
                        //$a_text = addslashes($a_text);
                }

//echo "<br>between:".htmlentities($a_text);

                // mask html
                $a_text = str_replace("&","&amp;",$a_text);
                $a_text = str_replace("<","&lt;",$a_text);
                $a_text = str_replace(">","&gt;",$a_text);

//echo "<br>second:".htmlentities($a_text);

                // mask curly brackets
/*
echo htmlentities($a_text);
                $a_text = str_replace("{", "&#123;", $a_text);
                $a_text = str_replace("}", "&#125;", $a_text);
echo htmlentities($a_text);*/
                // linefeed to br
                $a_text = str_replace(chr(13).chr(10),"<br />",$a_text);
                $a_text = str_replace(chr(13),"<br />", $a_text);
                $a_text = str_replace(chr(10),"<br />", $a_text);

                // bb code to xml
                $a_text = eregi_replace("\[com\]","<Comment Language=\"".$this->getLanguage()."\">",$a_text);
                $a_text = eregi_replace("\[\/com\]","</Comment>",$a_text);
                $a_text = eregi_replace("\[emp\]","<Emph>",$a_text);
                $a_text = eregi_replace("\[\/emp\]","</Emph>",$a_text);
                $a_text = eregi_replace("\[str\]","<Strong>",$a_text);
                $a_text = eregi_replace("\[\/str\]","</Strong>",$a_text);
                $a_text = eregi_replace("\[fn\]","<Footnote>",$a_text);
                $a_text = eregi_replace("\[\/fn\]","</Footnote>",$a_text);
                $a_text = eregi_replace("\[quot\]","<Quotation Language=\"".$this->getLanguage()."\">",$a_text);
                $a_text = eregi_replace("\[\/quot\]","</Quotation>",$a_text);
                $a_text = eregi_replace("\[code\]","<Code>",$a_text);
                $a_text = eregi_replace("\[\/code\]","</Code>",$a_text);

                // internal links
                //$any = "[^\]]*";      // this doesn't work :-(
                $ws= "[ \t\r\f\v\n]*";

                while (eregi("\[(iln$ws((inst$ws=$ws([\"0-9])*)?$ws".
                        "((page|chap|term|media|lm|dbk|glo|frm|exc|tst|svy|webr)$ws=$ws([\"0-9])*)$ws".
                        "(target$ws=$ws(\"(New|FAQ|Media)\"))?$ws))\]", $a_text, $found))
                {
                        $attribs = ilUtil::attribsToArray($found[2]);
                        $inst_str = $attribs["inst"];
                        // pages
                        if (isset($attribs["page"]))
                        {
                                if (!empty($found[10]))
                                {
                                        $tframestr = " TargetFrame=\"".$found[10]."\" ";
                                }
                                else
                                {
                                        $tframestr = "";
                                }
                                $a_text = eregi_replace("\[".$found[1]."\]",
                                        "<IntLink Target=\"il_".$inst_str."_pg_".$attribs[page]."\" Type=\"PageObject\"".$tframestr.">", $a_text);
                        }
                        // chapters
                        else if (isset($attribs["chap"]))
                        {
                                if (!empty($found[10]))
                                {
                                        $tframestr = " TargetFrame=\"".$found[10]."\" ";
                                }
                                else
                                {
                                        $tframestr = "";
                                }
                                $a_text = eregi_replace("\[".$found[1]."\]",
                                        "<IntLink Target=\"il_".$inst_str."_st_".$attribs[chap]."\" Type=\"StructureObject\"".$tframestr.">", $a_text);
                        }
                        // glossary terms
                        else if (isset($attribs["term"]))
                        {
                                switch ($found[10])
                                {
                                        case "New":
                                                $tframestr = " TargetFrame=\"New\" ";
                                                break;

                                        default:
                                                $tframestr = " TargetFrame=\"Glossary\" ";
                                                break;
                                }
                                $a_text = eregi_replace("\[".$found[1]."\]",
                                        "<IntLink Target=\"il_".$inst_str."_git_".$attribs[term]."\" Type=\"GlossaryItem\" $tframestr>", $a_text);
                        }
                        // media object
                        else if (isset($attribs["media"]))
                        {
                                if (!empty($found[10]))
                                {
                                        $tframestr = " TargetFrame=\"".$found[10]."\" ";
                                        $a_text = eregi_replace("\[".$found[1]."\]",
                                                "<IntLink Target=\"il_".$inst_str."_mob_".$attribs[media]."\" Type=\"MediaObject\"".$tframestr.">", $a_text);
                                }
                                else
                                {
                                        $a_text = eregi_replace("\[".$found[1]."\]",
                                                "<IntLink Target=\"il_".$inst_str."_mob_".$attribs[media]."\" Type=\"MediaObject\"/>", $a_text);
                                }
                        }
                        // repository items (id is ref_id (will be used internally but will
                        // be replaced by object id for export purposes)
                        else if (isset($attribs["lm"]) || isset($attribs["dbk"]) || isset($attribs["glo"])
                                         || isset($attribs["frm"]) || isset($attribs["exc"]) || isset($attribs["tst"])
                                         || isset($attribs["svy"]) || isset($attribs["obj"]) || isset($attribs['webr']))
                        {
                                $obj_id = (isset($attribs["lm"])) ? $attribs["lm"] : $obj_id;
                                $obj_id = (isset($attribs["dbk"])) ? $attribs["dbk"] : $obj_id;
                                $obj_id = (isset($attribs["glo"])) ? $attribs["glo"] : $obj_id;
                                $obj_id = (isset($attribs["frm"])) ? $attribs["frm"] : $obj_id;
                                $obj_id = (isset($attribs["exc"])) ? $attribs["exc"] : $obj_id;
                                $obj_id = (isset($attribs["tst"])) ? $attribs["tst"] : $obj_id;
                                $obj_id = (isset($attribs["svy"])) ? $attribs["svy"] : $obj_id;
                                $obj_id = (isset($attribs["obj"])) ? $attribs["obj"] : $obj_id;
                                $obj_id = (isset($attribs["webr"])) ? $attribs["webr"] : $obj_id;

                                $a_text = eregi_replace("\[".$found[1]."\]",
                                        "<IntLink Target=\"il_".$inst_str."_obj_".$obj_id."\" Type=\"RepositoryItem\">", $a_text);
                        }                       
                        else
                        {
                                $a_text = eregi_replace("\[".$found[1]."\]", "[error: iln".$found[1]."]",$a_text);
                        }
                }
                while (eregi("\[(iln$ws((inst$ws=$ws([\"0-9])*)?".$ws."media$ws=$ws([\"0-9])*)$ws)/\]", $a_text, $found))
                {
                        $attribs = ilUtil::attribsToArray($found[2]);
                        $inst_str = $attribs["inst"];
                        $a_text = eregi_replace("\[".$found[1]."/\]",
                                "<IntLink Target=\"il_".$inst_str."_mob_".$attribs[media]."\" Type=\"MediaObject\"/>", $a_text);
                }
                $a_text = eregi_replace("\[\/iln\]","</IntLink>",$a_text);

                // external link
                $ws= "[ \t\r\f\v\n]*";

                //while (eregi("\[(xln$ws(url$ws=$ws([\"0-9])*)$ws)\]", $a_text, $found))
                while (eregi("\[(xln$ws(url$ws=$ws\"([^\"])*\")$ws)\]", $a_text, $found))
                {
//echo "found2:".addslashes($found[2])."<br>"; flush();;
                        $attribs = ilUtil::attribsToArray($found[2]);
//echo "url:".$attribs["url"]."<br>";
                        //$found[1] = str_replace("?", "\?", $found[1]);
                        if (isset($attribs["url"]))
                        {
//echo "3";
                                $a_text = str_replace("[".$found[1]."]", "<ExtLink Href=\"".$attribs["url"]."\">", $a_text);
                        }
                        else
                        {
                                $a_text = str_replace("[".$found[1]."]", "[error: xln".$found[1]."]",$a_text);
                        }
                }
                $a_text = eregi_replace("\[\/xln\]","</ExtLink>",$a_text);
                /*$blob = ereg_replace("<NR><NR>","<P>",$blob);
                $blob = ereg_replace("<NR>"," ",$blob);*/
//echo htmlentities($a_text);
                //$a_text = nl2br($a_text);
                //$a_text = addslashes($a_text);
                return $a_text;
        }

        function xml2output($a_text)
        {
                // note: the order of the processing steps is crucial
                // and should be the same as in input2xml() in REVERSE order!

                // xml to bb code
                $any = "[^>]*";
                $a_text = eregi_replace("<Comment[^>]*>","[com]",$a_text);
                $a_text = eregi_replace("</Comment>","[/com]",$a_text);
                $a_text = eregi_replace("<Emph>","[emp]",$a_text);
                $a_text = eregi_replace("</Emph>","[/emp]",$a_text);
                $a_text = eregi_replace("<Strong>","[str]",$a_text);
                $a_text = eregi_replace("</Strong>","[/str]",$a_text);
                $a_text = eregi_replace("<Footnote[^>]*>","[fn]",$a_text);
                $a_text = eregi_replace("</Footnote>","[/fn]",$a_text);
                $a_text = eregi_replace("<Quotation[^>]*>","[quot]",$a_text);
                $a_text = eregi_replace("</Quotation>","[/quot]",$a_text);
                $a_text = eregi_replace("<Code[^>]*>","[code]",$a_text);
                $a_text = eregi_replace("</Code>","[/code]",$a_text);

                // internal links
                while (eregi("<IntLink($any)>", $a_text, $found))
                {
                        $found[0];
                        $attribs = ilUtil::attribsToArray($found[1]);
                        $target = explode("_", $attribs["Target"]);
                        $target_id = $target[count($target) - 1];
                        $inst_str = (!is_int(strpos($attribs["Target"], "__")))
                                ? $inst_str = "inst=\"".$target[1]."\" "
                                : $inst_str = "";
                        switch($attribs["Type"])
                        {
                                case "PageObject":
                                        $tframestr = (!empty($attribs["TargetFrame"]))
                                                ? " target=\"".$attribs["TargetFrame"]."\" "
                                                : "";
                                        $a_text = eregi_replace("<IntLink".$found[1].">","[iln ".$inst_str."page=\"".$target_id."\"$tframestr]",$a_text);
                                        break;

                                case "StructureObject":
                                        $tframestr = (!empty($attribs["TargetFrame"]))
                                                ? " target=\"".$attribs["TargetFrame"]."\" "
                                                : "";
                                        $a_text = eregi_replace("<IntLink".$found[1].">","[iln ".$inst_str."chap=\"".$target_id."\"$tframestr]",$a_text);
                                        break;

                                case "GlossaryItem":
                                        $tframestr = (empty($attribs["TargetFrame"]) || $attribs["TargetFrame"] == "Glossary")
                                                ? ""
                                                : " target=\"".$attribs["TargetFrame"]."\" ";
                                        $a_text = eregi_replace("<IntLink".$found[1].">","[iln ".$inst_str."term=\"".$target_id."\"".$tframestr."]",$a_text);
                                        break;

                                case "MediaObject":
                                        if (empty($attribs["TargetFrame"]))
                                        {
                                                $a_text = eregi_replace("<IntLink".$found[1].">","[iln ".$inst_str."media=\"".$target_id."\"/]",$a_text);
                                        }
                                        else
                                        {
                                                $a_text = eregi_replace("<IntLink".$found[1].">","[iln media=\"".$target_id."\"".
                                                        " target=\"".$attribs["TargetFrame"]."\"]",$a_text);
                                        }
                                        break;

                                case "RepositoryItem":
                                        if ($inst_str == "")
                                        {
                                                $target_type = ilObject::_lookupType($target_id, true);
                                        }
                                        else
                                        {
                                                $target_type = "obj";
                                        }
                                        $a_text = eregi_replace("<IntLink".$found[1].">","[iln ".$inst_str."$target_type=\"".$target_id."\"".$tframestr."]",$a_text);
                                        break;

                                default:
                                        $a_text = eregi_replace("<IntLink".$found[1].">","[iln]",$a_text);
                                        break;
                        }
                }
                $a_text = eregi_replace("</IntLink>","[/iln]",$a_text);

                // external links
                while (eregi("<ExtLink($any)>", $a_text, $found))
                {
                        $found[0];
                        $attribs = ilUtil::attribsToArray($found[1]);
                        //$found[1] = str_replace("?", "\?", $found[1]);
                        $a_text = str_replace("<ExtLink".$found[1].">","[xln url=\"".$attribs["Href"]."\"]",$a_text);
                }
                $a_text = eregi_replace("</ExtLink>","[/xln]",$a_text);


                // br to linefeed
                $a_text = str_replace("<br />", "\n", $a_text);
                $a_text = str_replace("<br/>", "\n", $a_text);

                // prevent curly brackets from being swallowed up by template engine
                $a_text = str_replace("{", "&#123;", $a_text);
                $a_text = str_replace("}", "&#125;", $a_text);

                // unmask html
                $a_text = str_replace("&lt;", "<", $a_text);
                $a_text = str_replace("&gt;", ">",$a_text);

                // this is needed to allow html like <tag attribute="value">... in paragraphs
                $a_text = str_replace("&quot;", "\"", $a_text);

                // make ampersands in (enabled) html attributes work
                // e.g. <a href="foo.php?n=4&t=5">hhh</a>
                $a_text = str_replace("&amp;", "&", $a_text);

                // make &gt; and $lt; work to allow (disabled) html descriptions
                $a_text = str_replace("&lt;", "&amp;lt;", $a_text);
                $a_text = str_replace("&gt;", "&amp;gt;", $a_text);

                return $a_text;
                //return str_replace("<br />", chr(13).chr(10), $a_text);
        }

        function getType()
        {
                return ($this->getCharacteristic() == "Code")?"src":parent::getType();
        }

}
?>