* USA
*/
+/**
+ * is_utf8($string) - utf-8 detection
+ *
+ * From http://www.php.net/manual/en/function.mb-detect-encoding.php#85294
+ */
+function is_utf8($str) {
+ $c=0; $b=0;
+ $bits=0;
+ $len=strlen($str);
+ for($i=0; $i<$len; $i++){
+ $c=ord($str[$i]);
+ if($c > 128){
+ if(($c >= 254)) return false;
+ elseif($c >= 252) $bits=6;
+ elseif($c >= 248) $bits=5;
+ elseif($c >= 240) $bits=4;
+ elseif($c >= 224) $bits=3;
+ elseif($c >= 192) $bits=2;
+ else return false;
+ if(($i+$bits) > $len) return false;
+ while($bits > 1){
+ $i++;
+ $b=ord($str[$i]);
+ if($b < 128 || $b > 191) return false;
+ $bits--;
+ }
+ }
+ }
+ return true;
+}
+
/**
* removeCRLF() - remove any Carriage Return-Line Feed from a string.
* That function is useful to remove the possibility of a CRLF Injection when sending mail
$sys_sendmail_path="/usr/sbin/sendmail";
}
- exec ("/bin/echo ". util_prep_string_for_sendmail($body2) .
- " | ".$sys_sendmail_path." -f'$from' -t -i > /dev/null 2>&1 &");
- // WARNING : popen commented code probably brought some trouble, we will use the pipe method as we were before
- /*if (!$handle = popen($sys_sendmail_path." -f'$from' -t -i", "w")) {
- echo "<p>Error: cannot run '$sys_sendmail_path' - mail not sent</p>\n";
- } else {
- fwrite($handle, util_prep_string_for_sendmail($body2));
- pclose($handle);
- }*/
+ $handle = popen($sys_sendmail_path." -f'$from' -t -i", 'w');
+ fwrite ($handle, $body2);
+ pclose($handle);
}
/**
*/
function util_is_valid_filename ($file) {
//bad char test
- $invalidchars = eregi_replace("[-A-Z0-9+_\.]","",$file);
+ $invalidchars = eregi_replace("[-A-Z0-9+_\. ]","",$file);
if (!empty($invalidchars)) {
return false;
return false;
}
+ ob_start () ;
while (!feof($handle)) {
- $buffer = fread($handle, $chunksize);
- echo $buffer;
- ob_flush() ;
- flush () ;
- if ($returnBytes) {
- $byteCounter += strlen($buffer);
- }
+ $buffer = fread($handle, $chunksize);
+ echo $buffer;
+ ob_flush() ;
+ flush () ;
+ if ($returnBytes) {
+ $byteCounter += strlen($buffer);
+ }
}
+ ob_end_flush () ;
$status = fclose($handle);
if ($returnBytes && $status) {
return $byteCounter; // return num. bytes delivered like readfile() does.
return !preg_match('/[^\\/]/',$dir);
}
+/**
+ * util_strip_accents() - Remove accents from given text.
+ * @param string Text
+ * @return string
+ */
+function util_strip_accents($text) {
+ $find = utf8_decode($text);
+ $find = strtr($find,
+ utf8_decode('àáâãäçèéêëìíîïñòóôõöùúûüýÿÀÁÂÃÄÇÈÉÊËÌÍÎÏÑÒÓÔÕÖÙÚÛÜÝ'),
+ 'aaaaaceeeeiiiinooooouuuuyyAAAAACEEEEIIIINOOOOOUUUUY');
+ return utf8_encode($find);
+}
+
function normalized_urlprefix () {
$prefix = $GLOBALS['sys_urlprefix'] ;
$prefix = ereg_replace ("^/", "", $prefix) ;
$url = "http://" ;
$url .= $GLOBALS['sys_default_domain'] ;
- $url .= normalized_urlprefix () ;
- $path = ereg_replace ("^/", "", $path) ;
- $url .= $path ;
+ $url .= util_make_uri ($path) ;
return $url ;
}
+function util_make_uri ($path) {
+ $path = ereg_replace ("^/", "", $path) ;
+ $uri = normalized_urlprefix () ;
+ $uri .= $path ;
+ return $uri ;
+}
+
function util_make_link ($path, $text, $extra_params=false, $absolute=false) {
$ep = '' ;
if (is_array($extra_params)) {
}
}
+function check_email_available($group, $email, &$response) {
+ // Check if a mailing list with same name already exists
+ $mlFactory = new MailingListFactory($group);
+ if (!$mlFactory || !is_object($mlFactory) || $mlFactory->isError()) {
+ $response .= $mlFactory->getErrorMessage();
+ return false;
+ }
+ $mlArray =& $mlFactory->getMailingLists();
+ if ($mlFactory->isError()) {
+ $response .= $mlFactory->getErrorMessage();
+ return false;
+ }
+ for ($j = 0; $j < count($mlArray); $j++) {
+ $currentList =& $mlArray[$j];
+ if ($email == $currentList->getName()) {
+ $response .= _('Error: a mailing list with the same email address already exists.');
+ return false;
+ }
+ }
+
+ // Check if a forum with same name already exists
+ $ff = new ForumFactory($group);
+ if (!$ff || !is_object($ff) || $ff->isError()) {
+ $response .= $ff->getErrorMessage();
+ return false;
+ }
+ $farr =& $ff->getForums();
+ $prefix = $group->getUnixName() . '-';
+ for ($j = 0; $j < count($farr); $j++) {
+ if (is_object($farr[$j])) {
+ if ($email == $prefix . $farr[$j]->getName()) {
+ $response .= _('Error: a forum with the same email address already exists.');
+ return false;
+ }
+ }
+ }
+
+ // Email is available
+ return true;
+}
+
// Local Variables:
// mode: php
// c-file-style: "bsd"