send($query,30);
$value = $response->value();
if (!$response->faultCode()) {
$data = XML_RPC_Decode($value);
$found = $data;
}
} // xml_rpc
return $found;
} // session_exists
/**
* extend_session
* just updates the expire time of the specified session this
* is used by the the play script after a song finishes
*/
function extend_session($sid) {
$new_time = time() + Config::get('session_length');
if ($_COOKIE['amp_longsess'] == '1') { $new_time = time() + 86400*364; }
$sql = "UPDATE `session` SET `expire`='$new_time' WHERE `id`='$sid'";
$db_results = Dba::query($sql);
} // extend_session
/*!
@function scrub_in()
@discussion Run on inputs, stuff that might get stuck in our db
*/
function scrub_in($str) {
if (!is_array($str)) {
return stripslashes( htmlspecialchars( strip_tags($str) ) );
}
else {
$ret = array();
foreach($str as $string) $ret[] = scrub_in($string);
return $ret;
}
} // scrub_in
/*!
@function set_memory_limit
@discussion this function attempts to change the
php memory limit using init_set but it will
never reduce it
*/
function set_memory_limit($new_limit) {
/* Check their PHP Vars to make sure we're cool here */
// Up the memory
$current_memory = ini_get('memory_limit');
$current_memory = substr($current_memory,0,strlen($current_memory)-1);
if ($current_memory < $new_limit) {
$php_memory = $new_limit . "M";
ini_set (memory_limit, "$php_memory");
unset($php_memory);
}
} // set_memory_limit
/**
* get_global_popular
* this function gets the current globally popular items
* from the object_count table, depending on type passed
* @package Web Interface
* @catagory Get
*/
function get_global_popular($type) {
$stats = new Stats();
$count = Config::get('popular_threshold');
$web_path = Config::get('web_path');
/* Pull the top */
$results = $stats->get_top($count,$type);
foreach ($results as $r) {
/* If Songs */
if ( $type == 'song' ) {
$song = new Song($r['object_id']);
$song->format();
$text = "$song->f_artist_full - $song->title";
/* Add to array */
$song->link = "id\" title=\"". scrub_out($text) ."\">" .
scrub_out(truncate_with_ellipsis($text, Config::get('ellipse_threshold_title')+3)) . " (" . $r['count'] . ")";
$items[] = $song;
} // if it's a song
/* If Artist */
elseif ( $type == 'artist' ) {
$artist = new Artist($r['object_id']);
$artist->format();
$artist->link = "full_name) ."\">" .
truncate_with_ellipsis($artist->full_name, Config::get('ellipse_threshold_artist')+3) . " (" . $r['count'] . ")";
$items[] = $artist;
} // if type isn't artist
/* If Album */
elseif ( $type == 'album' ) {
$album = new Album($r['object_id']);
$album->format();
$album->link = "name) ."\">" .
scrub_out(truncate_with_ellipsis($album->name,Config::get('ellipse_threshold_album')+3)) . " (" . $r['count'] . ")";
$items[] = $album;
} // else not album
elseif ($type == 'genre') {
$genre = new Genre($r['object_id']);
$genre->format();
$genre->link = "name) . "\">" .
scrub_out(truncate_with_ellipsis($genre->name,Config::get('ellipse_threshold_title')+3)) . " (" . $r['count'] . ")";
$items[] = $genre;
} // end if genre
} // end foreach
return $items;
} // get_global_popular
/**
* generate_password
* This generates a random password, of the specified
* length
*/
function generate_password($length) {
$vowels = 'aAeEuUyY12345';
$consonants = 'bBdDgGhHjJmMnNpPqQrRsStTvVwWxXzZ6789';
$password = '';
$alt = time() % 2;
for ($i = 0; $i < $length; $i++) {
if ($alt == 1) {
$password .= $consonants[(rand(0,strlen($consonants)-1))];
$alt = 0;
} else {
$password .= $vowels[(rand(0,strlen($vowels)-1))];
$alt = 1;
}
}
return $password;
} // generate_password
/**
* scrub_out
* This function is used to escape user data that is getting redisplayed
* onto the page, it htmlentities the mojo
*/
function scrub_out($str) {
//This feature has been DEPRECATED as of PHP 5.3.0
if(version_compare(PHP_VERSION, '5.3.0', '<=') AND get_magic_quotes_gpc()) {
$str = stripslashes($str);
}
$str = htmlentities($str,ENT_QUOTES,Config::get('site_charset'));
return $str;
} // scrub_out
/**
* revert_string
* This returns a scrubed string to it's most normal state
* Uhh yea better way to do this please?
*/
function revert_string($string) {
$string = unhtmlentities($string,ENT_QUOTES,conf('site_charset'));
return $string;
} // revert_string
/**
* make_bool
* This takes a value and returns what I consider to be the correct boolean value
* This is used instead of settype alone because settype considers 0 and "false" to
* be true
* @package General
*/
function make_bool($string) {
if (strcasecmp($string,'false') == 0) {
return '0';
}
if ($string == '0') {
return '0';
}
if (strlen($string) < 1) {
return '0';
}
return settype($string,"bool");
} // make_bool
/**
* get_languages
* This function does a dir of ./locale and pulls the names of the
* different languages installed, this means that all you have to do
* is drop one in and it will show up on the context menu. It returns
* in the form of an array of names
*/
function get_languages() {
/* Open the locale directory */
$handle = @opendir(Config::get('prefix') . '/locale');
if (!is_resource($handle)) {
debug_event('language','Error unable to open locale directory','1');
}
$results = array();
/* Prepend English */
$results['en_US'] = 'English (US)';
while ($file = readdir($handle)) {
$full_file = Config::get('prefix') . '/locale/' . $file;
/* Check to see if it's a directory */
if (is_dir($full_file) AND substr($file,0,1) != '.' AND $file != 'base') {
switch($file) {
case 'af_ZA'; $name = 'Afrikaans'; break; /* Afrikaans */
case 'ca_ES'; $name = 'Català'; break; /* Catalan */
case 'cs_CZ'; $name = 'Česky'; break; /* Czech */
case 'da_DK'; $name = 'Dansk'; break; /* Danish */
case 'de_DE'; $name = 'Deutsch'; break; /* German */
case 'en_US'; $name = 'English (US)'; break; /* English */
case 'en_GB'; $name = 'English (UK)'; break; /* English */
case 'es_ES'; $name = 'Español'; break; /* Spanish */
case 'es_MX'; $name = 'Español (MX)'; break; /* Spanish */
case 'es_AR'; $name = 'Español (AR)'; break; /* Spanish */
case 'et_EE'; $name = 'Eesti'; break; /* Estonian */
case 'eu_ES'; $name = 'Euskara'; break; /* Basque */
case 'fr_FR'; $name = 'Français'; break; /* French */
case 'ga_IE'; $name = 'Gaeilge'; break; /* Irish */
case 'el_GR'; $name = 'Greek'; break; /* Greek */
case 'is_IS'; $name = 'Icelandic'; break; /* Icelandic */
case 'it_IT'; $name = 'Italiano'; break; /* Italian */
case 'lv_LV'; $name = 'Latviešu'; break; /* Latvian */
case 'lt_LT'; $name = 'Lietuvių'; break; /* Lithuanian */
case 'hu_HU'; $name = 'Magyar'; break; /* Hungarian */
case 'nl_NL'; $name = 'Nederlands'; break; /* Dutch */
case 'no_NO'; $name = 'Norsk bokmål'; break; /* Norwegian */
case 'pl_PL'; $name = 'Polski'; break; /* Polish */
case 'pt_BR'; $name = 'Português Brasileiro'; break; /* Portuguese */
case 'pt_PT'; $name = 'Português'; break; /* Portuguese */
case 'ro_RO'; $name = 'Română'; break; /* Romanian */
case 'sk_SK'; $name = 'Slovenčina'; break; /* Slovak */
case 'sl_SI'; $name = 'Slovenščina'; break; /* Slovenian */
case 'sr_CS'; $name = 'Srpski'; break; /* Serbian */
case 'fi_FI'; $name = 'Suomi'; break; /* Finnish */
case 'sv_SE'; $name = 'Svenska'; break; /* Swedish */
case 'uk_UA'; $name = 'Українська'; break; /* Ukrainian */
case 'vi_VN'; $name = 'Tiếng Việt'; break; /* Vietnamese */
case 'tr_TR'; $name = 'Türkçe'; break; /* Turkish */
case 'bg_BG'; $name = 'Български'; break; /* Bulgarian */
case 'ru_RU'; $name = 'Русский'; break; /* Russian */
case 'zh_CN'; $name = '简体中文'; break; /* Chinese */
case 'zn_TW'; $name = '繁體中文'; break; /* Chinese */
case 'ko_KR'; $name = '한국말'; break; /* Korean */
case 'ja_JP'; $name = '日本語'; break; /* Japanese */
case 'nb_NO'; $name = 'Norsk'; break; /* Norwegian */
/* These languages are right to left. */
case 'ar_SA'; $name = 'العربية'; break; /* Arabic */
case 'he_IL'; $name = 'עברית'; break; /* Hebrew */
case 'fa_IR'; $name = 'فارسي'; break; /* Farsi */
default: $name = _('Unknown'); break;
} // end switch
$results[$file] = $name;
}
} // end while
return $results;
} // get_languages
/**
* is_rtl
* This checks whether to be a rtl language.
*/
function is_rtl($locale) {
return in_array($locale, array("he_IL", "fa_IR", "ar_SA"));
}
/**
* format_time
* This formats seconds into minutes:seconds
* //FIXME This should be removed, no reason for it!
*/
function format_time($seconds) {
return sprintf ("%d:%02d", $seconds/60, $seconds % 60);
} //format_time
/**
* translate_pattern_code
* This just contains a key'd array which it checks against to give you the 'tag' name
* that said pattern code corrasponds to, it returns false if nothing is found
*/
function translate_pattern_code($code) {
$code_array = array('%A'=>'album',
'%a'=>'artist',
'%c'=>'comment',
'%g'=>'genre',
'%T'=>'track',
'%t'=>'title',
'%y'=>'year',
'%o'=>'zz_other');
if (isset($code_array[$code])) {
return $code_array[$code];
}
return false;
} // translate_pattern_code
/**
* print_boolean
* This function takes a boolean value and then print out a friendly
* text message, usefull if you have a 0/1 that you need to turn into
* a "Off" "On"
*/
function print_boolean($value) {
if ($value) {
$string = '' . _('On') . '';
}
else {
$string = '' . _('Off') . '';
}
return $string;
} // print_boolean
/**
* invert_boolean
* This returns the opposite of what you've got
*/
function invert_boolean($value) {
if (make_bool($value)) {
return '0';
}
else {
return '1';
}
} // invert_boolean
/**
* unhtmlentities
* This is required to make thing work.. but holycrap is it ugly
*/
function unhtmlentities ($string) {
$trans_tbl = get_html_translation_table (HTML_ENTITIES);
$trans_tbl = array_flip ($trans_tbl);
$ret = strtr ($string, $trans_tbl);
return preg_replace('/&#(\d+);/me', "chr('\\1')",$ret);
} // unhtmlentities
/**
* __autoload
* This function automatically loads any missing
* classes as they are called so that we don't have to have
* a million include statements, and load more then we need
*/
function __autoload($class) {
// Lowercase the class
$class = strtolower($class);
$file = Config::get('prefix') . "/lib/class/$class.class.php";
// See if it exists
if (is_readable($file)) {
require_once $file;
if (is_callable($class . '::_auto_init')) {
call_user_func(array($class, '_auto_init'));
}
}
// Else log this as a fatal error
else {
debug_event('__autoload', "'$class' not found!",'1');
}
} // __autoload
/**
* win_checkdnsrr
* This is a windows emulation of the normal PHP functions
* not sure how I feel about the exec in here, but it's escaped
* this most likely won't work on a lot of systems
*/
function win_checkdnsrr($host, $type='MX') {
if (strtoupper(substr(PHP_OS, 0, 3)) != 'WIN') { return; }
if (empty($host)) { return; }
$types=array('A', 'MX', 'NS', 'SOA', 'PTR', 'CNAME', 'AAAA', 'A6', 'SRV', 'NAPTR', 'TXT', 'ANY');
if (!in_array($type,$types)) {
user_error("checkdnsrr() Type '$type' not supported", E_USER_WARNING);
return;
}
@exec('nslookup -type='.$type.' '.escapeshellcmd($host), $output);
foreach($output as $line){
if (preg_match('/^'.$host.'/',$line)) { return true; }
}
} // win_checkdnsrr
// See if the function exists, and return as needed
if (!function_exists('checkdnsrr')) {
function checkdnsrr($host, $type='MX') {
return win_checkdnsrr($host, $type);
}
}
/**
* win_getmxrr
* This emulates the normal PHP function for getting MX records
* most likely won't work on systems due to use of exec
*/
function win_getmxrr($hostname, &$mxhosts, &$mxweight=false) {
if (strtoupper(substr(PHP_OS, 0, 3)) != 'WIN') return;
if (!is_array ($mxhosts) ) $mxhosts = array();
if (empty($hostname)) return;
$exec='nslookup -type=MX '.escapeshellarg($hostname);
@exec($exec, $output);
if (empty($output)) return;
$i=-1;
foreach ($output as $line) {
$i++;
if (preg_match("/^$hostname\tMX preference = ([0-9]+), mail exchanger = (.+)$/i", $line, $parts)) {
$mxweight[$i] = trim($parts[1]);
$mxhosts[$i] = trim($parts[2]);
}
if (preg_match('/responsible mail addr = (.+)$/i', $line, $parts)) {
$mxweight[$i] = $i;
$mxhosts[$i] = trim($parts[1]);
}
}
return ($i!=-1);
} // win_getmxrr
// If no getmxrr return
if (!function_exists('getmxrr')) {
function getmxrr($hostname, &$mxhosts, &$mxweight=false) {
return win_getmxrr($hostname, $mxhosts, $mxweight);
}
}
/**
* debug_print
* print_r with tag
*/
function debug_print($var) {
echo "";
print_r($var);
echo "";
}
?>