* 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
return true;
}
+/**
+ * util_check_url() - determines if given URL is valid.
+ *
+ * Currently, test is very basic, only the protocol is
+ * checked, allowed values are: http, https, ftp.
+ *
+ * @param string The URL
+ * @return boolean true if valid, false if not valid.
+ */
+function util_check_url($url) {
+ return (preg_match('/^(http|https|ftp):\/\//', $url) > 0);
+}
+
/**
* util_send_message() - Send email
* This function should be used in place of the PHP mail() function
global $sys_bcc_all_email_address,$sys_sendmail_path;
if (!$to) {
- $to='noreply@'.$GLOBALS['sys_default_domain'];
+ $to='noreply@'.forge_get_config('web_host');
}
if (!$from) {
- $from='noreply@'.$GLOBALS['sys_default_domain'];
+ $from='noreply@'.forge_get_config('web_host');
}
$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);
+}
+
+/**
+ * Constructs the forge's URL prefix out of $GLOBALS['sys_urlprefix']
+ *
+ * @return string
+ */
function normalized_urlprefix () {
$prefix = $GLOBALS['sys_urlprefix'] ;
$prefix = ereg_replace ("^/", "", $prefix) ;
return $prefix ;
}
+/**
+ * Construct full URL from a relative path
+ *
+ * @param string $path
+ * @return string URL
+ */
function util_make_url ($path) {
if ($GLOBALS['sys_use_ssl'])
$url = "https://" ;
else
$url = "http://" ;
- $url .= $GLOBALS['sys_default_domain'] ;
- $url .= normalized_urlprefix () ;
- $path = ereg_replace ("^/", "", $path) ;
- $url .= $path ;
+ $url .= forge_get_config('web_host') ;
+ $url .= util_make_uri ($path) ;
return $url ;
}
+/**
+ * Construct proper (relative) URI (prepending prefix)
+ *
+ * @param string $path
+ * @return string URI
+ */
+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)) {
}
}
+/**
+ * Create an HTML link to a user's profile page
+ *
+ * @param string $username
+ * @param int $user_id
+ * @param string $text
+ * @return string
+ */
function util_make_link_u ($username, $user_id,$text) {
return '<a href="' . util_make_url_u ($username, $user_id) . '">' . $text . '</a>' ;
}
+/**
+ * Create URL for user's profile page
+ *
+ * @param string $username
+ * @param int $user_id
+ * @return string URL
+ */
function util_make_url_u ($username, $user_id) {
if (isset ($GLOBALS['sys_noforcetype']) && $GLOBALS['sys_noforcetype']) {
return util_make_url ("/developer/?user_id=$user_id");
}
}
+/**
+ * Create a HTML link to a project's page
+ * @param string $groupame
+ * @param int $group_id
+ * @param string $text
+ * @return string
+ */
function util_make_link_g ($groupame, $group_id,$text) {
return '<a href="' . util_make_url_g ($groupame, $group_id) . '">' . $text . '</a>' ;
}
+/**
+ * Create URL for a project's page
+ *
+ * @param string $groupame
+ * @param int $group_id
+ * @return string
+ */
function util_make_url_g ($groupame, $group_id) {
if (isset ($GLOBALS['sys_noforcetype']) && $GLOBALS['sys_noforcetype']) {
return util_make_url ("/project/?group_id=$group_id");
}
}
+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"