dolibarr-fork/test/phpunit/test.php

#!/usr/bin/env php
<?php
/**
 * \file scripts/company/sync_contacts_dolibarr2ldap.php
 * \ingroup ldap company
 * \brief Script to update all contacts from Dolibarr into a LDAP database
 */

include "../../htdocs/master.inc.php";
include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';

$langs->setDefaultLang('fr');
$langs->loadLangs(array('main', 'companies'));

$s = '<b>aa</b> & &amp; a=%10';
print $s."\n";
//print dol_htmlentitiesbr($s)."\n";
//print dol_escape_htmltag(dol_string_onlythesehtmltags(dol_htmlentitiesbr($s), 1, 0, 0, 0, array('br', 'b', 'font', 'hr', 'span')), 1, -1, '', 0, 1);
print dolPrintHTMLForAttributeUrl('<b>aa</b> & &amp; a=%10');
print "\n";
$s = 'aa & &amp; a=%10';
print $s."\n";
//print dol_htmlentitiesbr($s)."\n";
//print dol_escape_htmltag(dol_string_onlythesehtmltags(dol_htmlentitiesbr($s), 1, 0, 0, 0, array('br', 'b', 'font', 'hr', 'span')), 1, -1, '', 0, 1);
print dolPrintHTMLForAttributeUrl('aa & &amp; a=%10');
print "\n";


print $langs->tr("Preview");
print "\n";
print $langs->trans("Preview");
print "\n";

print ">>> dol_escape_htmltag(< > bb<b>bold ç &) - should not happen</b>\n";
print dol_escape_htmltag("< > bb<b>bold</b> ç &", 1);
print "\n";
print ">>> dol_escape_htmltag(&lt; &gt; bb<b>bold ç &)</b>\n";
print dol_escape_htmltag("&lt; &gt; bb<b>bold</b> ç &", 1);
print "\n";
print '>>> dol_escape_htmltag(&lt;script&gt;alert("azerty")&lt;/script&gt;)'."\n";
print dol_escape_htmltag('&lt;script&gt;alert("azerty")&lt;/script&gt;', 1);
print "\n";

print "\n";

// dol_escape_htmltag(dol_htmlwithnojs(dol_string_onlythesehtmltags(dol_htmlentitiesbr($s), 1, 1, 1, array())), 1, 1, 'common', 0, 1);
print ">>> dolPrintHTML(< > bb<b>bold</b> ç &) - should not happen\n";
print dolPrintHTML("< > bb<b>bold</b> ç &");
print "\n";
print ">>> dolPrintHTML(&lt; &gt; bb<b>bold</b> ç &)\n";
print dolPrintHTML("&lt; &gt; bb<b>bold</b> ç &");
print "\n";
print '>>> dolPrintHTML(&lt;script&gt;alert("azerty")&lt;/script&gt;)'."\n";
print dolPrintHTML('&lt;script&gt;alert("azerty")&lt;/script&gt;');
print "\n";

print "\n";

// dol_escape_htmltag(dol_string_onlythesehtmltags(dol_htmlentitiesbr($s), 1, 0, 0, 0, array('br', 'b', 'font', 'hr', 'span')), 1, -1, '', 0, 1);
print ">>> dolPrintHTMLForAttribute(< > bb<b>bold</b> ç & )\n";
print dolPrintHTMLForAttribute("< > bb<b>bold</b> ç &");
print "\n";
print ">>> dolPrintHTMLForAttribute(&lt; &gt; bb<b>bold</b> ç &)\n";
print dolPrintHTMLForAttribute("&lt; &gt; bb<b>bold</b> ç &");
print "\n";
print '>>> dolPrintHTMLForAttribute(&lt;script&gt;alert("azerty")&lt;/script&gt;)'."\n";
print dolPrintHTMLForAttribute('&lt;script&gt;alert("azerty")&lt;/script&gt;');
print "\n";