VCL
[ class tree: VCL ] [ index: VCL ] [ all elements ]

Source for file rtl.inc.php

Documentation is available at rtl.inc.php

  1. <?php
  2. /**
  3. *  This file is part of the VCL for PHP project
  4. *
  5. *  Copyright (c) 2004-2007 qadram software <support@qadram.com>
  6. *
  7. *  Checkout AUTHORS file for more information on the developers
  8. *
  9. *  This library is free software; you can redistribute it and/or
  10. *  modify it under the terms of the GNU Lesser General Public
  11. *  License as published by the Free Software Foundation; either
  12. *  version 2.1 of the License, or (at your option) any later version.
  13. *
  14. *  This library is distributed in the hope that it will be useful,
  15. *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  16. *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17. *  Lesser General Public License for more details.
  18. *
  19. *  You should have received a copy of the GNU Lesser General Public
  20. *  License along with this library; if not, write to the Free Software
  21. *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
  22. *  USA
  23. *
  24. */
  25.  
  26. /**
  27. * Converts text to html
  28. @param string $text 
  29. @return string 
  30. */
  31. function textToHtml$text )
  32. {
  33.     return nl2brhtmlentities$text ) );
  34. }
  35.  
  36. /**
  37. * Converts html to text
  38. @param string $text 
  39. @return string 
  40. */
  41. function htmlToText$text )
  42. {
  43.     return html_entity_decodestr_replace'<br />'"\r\n"$text ) );
  44. }
  45.  
  46. /**
  47. * Redirects the browser to a project file
  48. @param string $file File to redirect to
  49. */
  50. function redirect$file )
  51. {
  52.     $host $_SERVER'HTTP_HOST' ];
  53.     $uri rtrimdirname$_SERVER'PHP_SELF' )'/\\' );
  54.     header'Location: http://' $host $uri '/' $file );
  55.     exit();
  56. }
  57.  
  58. /**
  59. * Check if an object is not null
  60. @param object $var Object to check
  61. @return boolean 
  62. */
  63. function assigned($var)
  64. {
  65.     return($var!=null);
  66. }
  67.  
  68. /**
  69. * Silent exception
  70. */
  71. class EAbort extends Exception
  72. {
  73. }
  74.  
  75. /**
  76. * Throws a silent exception
  77. */
  78. function Abort()
  79. {
  80.     throw new EAbort();
  81. }
  82.  
  83. /**
  84. * Extracts the javascript code from an html document
  85. @param string $html HTML document to extract the javascript from
  86. @return array 
  87. */
  88. function extractjscript($html)
  89. {
  90.     $result="";
  91.     $pattern='@<script[^>]*?>.*?</script>@si';
  92.     $scripts=preg_match_all($pattern$html$out);
  93.     $onlyhtml=preg_replace($pattern,'',$html);
  94.  
  95.     reset($out[0]);
  96.     while(list($key$script)=each($out[0]))
  97.     {
  98.         $script=str_replace("<script language=\"Javascript\">","",$script);
  99.         $script=str_replace("<script language=\"JavaScript\">","",$script);
  100.         $script=str_replace('<script type="text/javascript">',"",$script);
  101.         $script=str_replace('<script type="text/javascript" language="JavaScript">',"",$script);
  102.         $script=str_replace("</script>","",$script);
  103.         $result.=trim($script);
  104.     }
  105.     return(array($result,$onlyhtml));
  106. }
  107.  
  108. /**
  109. * DBCS friendly unserialize, it modifies the length of all strings with the correct size
  110. @param string $sObject String to unserialize
  111. @return mixed 
  112. */
  113. function __unserialize($sObject)
  114. {
  115.     $__ret =preg_replace('!s:(\d+):"(.*?)";!e'"'s:'.strlen('$2').':\"$2\";'"$sObject );
  116.  
  117.     return unserialize($__ret);
  118. }
  119.  
  120. /**
  121. * Unserializes and if it gets an error, uses __unserialize
  122. @param string $input String to unserialize
  123. @return mixed 
  124. */
  125. function safeunserialize($input)
  126. {
  127.     $result=unserialize($input);
  128.     if ($result===false)
  129.     {
  130.         $result=__unserialize($input);
  131.     }
  132.     return($result);
  133. }
  134.  
  135. ?>

Documentation generated on Tue, 27 Mar 2007 13:35:21 +0200 by phpDocumentor 1.3.1