"; $ccac = 0; #Process subdirs... $dir_Mp3ACCOsub = $GLOBbasedir."/Mp3acco/$name_composer/$idMp3/$subdiracco/"; #print "sooo2: $dir_Mp3ACCOsub"; $dh = opendir("$dir_Mp3ACCOsub"); while ($file = readdir($dh)) { if (strlen($file) > 2) { $file_array = explode(".",$file); #print "eccoci: $subdiracco - $file
"; $Mp3Mp3accoTMP[$subdiracco][$ccac]['sortname'] = strtolower(preg_replace("/_/", "", $file_array[0])); $Mp3Mp3accoTMP[$subdiracco][$ccac]['file'] = $file_array[0]; $Mp3Mp3accoIDs[$ccmp3accos] = $idMp3; #Takes ID of this file... $ccac ++; $ccmp3accos ++; } } closedir($dh); if (sizeof($Mp3Mp3accoTMP)) { sort($Mp3Mp3accoTMP[$subdiracco]); } } $swt ++; } } */ } elseif ($subdirs == 2) { #Regular offers... $ccmp3accos = 0; foreach ($Mp3Mp3acco as $single) { $swt = 0; $ccac = 0; foreach ($single as $file) { if (strlen($file) > 2 and $swt) { #print "dentro: $file
"; $Mp3Mp3accoTMP[$subdiracco][$ccac]['sortname'] = strtolower(preg_replace("/_/", "", $file)); $Mp3Mp3accoTMP[$subdiracco][$ccac]['file'] = $file; $Mp3Mp3accoIDs[$ccmp3accos] = $idMp3; #Takes ID of this file... $ccac ++; $ccmp3accos ++; } $swt ++; } if (sizeof($Mp3Mp3accoTMP)) { sort($Mp3Mp3accoTMP[$subdiracco]); } } } } return array($Mp3Mp3acco, $Mp3Mp3accoTMP, $Mp3Mp3accoIDs); } #Functions to convert URL in order to pass them inside URL vars... function encodeurl($url) { $url = str_replace("=", "@@@", $url); $url = str_replace("&", "___", $url); $url = str_replace("?", "---", $url); return $url; } function decodeurl($url) { $url = str_replace("@@@", "=", $url); $url = str_replace("___", "&", $url); $url = str_replace("---", "?", $url); return $url; } function makesitemurl($productidNEWPP) { if ($productidNEWPP) { $URLNEWPP = checkexs($productidNEWPP)."/".$productidNEWPP.".html"; $URLNEWPP = aggiustaurl($URLNEWPP); return $URLNEWPP; } else { return NULL; } } function fixspaces($text) { $text = str_replace(" ", "_", $text); return $text; } function settitlehereSEO($title, $faketitle) { global $newcat6; if ($title == "Sonata Op.27 No.2") { $titlehereSEO = "Moonlight ".$title; } else { //Here we make sure the $title doens't include the $faketitle already ! 9/7/21, 10:40 AM... $faketitleHere = str_replace(", ", "", $faketitle); if (stripos($title, $faketitleHere) !== false) { $titlehereSEO = $title; } else { $titlehereSEO = $title.$faketitle; } } return $titlehereSEO; } function cleanyoutubeid($youtubeid) { $youtubeid = eregi_replaceFF("(^.+\?v=)(.+)(&.+$)", "\\2", $youtubeid); $youtubeid = eregi_replaceFF("(^.+\?v=)(.+)", "\\2", $youtubeid); $youtubeid = str_replace("https://youtu.be/", "", $youtubeid); $youtubeid = str_replace("http://youtu.be/", "", $youtubeid); $youtubeid = preg_replace("/youtu.be\//", "", $youtubeid); $youtubeid = trim($youtubeid); return $youtubeid; } function parseyoutubeapi($youtubeURL, $programcalled = 0) { global $YTcurrent, $YTtitle, $YTdescription, $YTdonedescription, $YTauthor, $YTduration, $YTminuti, $YTsecondi, $basedir, $MEMBERid, $newcat6, $is_robot, $s_id; #Interpreta input, se singolo code o URL completo... /* if (eregiFF ("youtube.com", $youtubeURL)) { #Se URL completo... $youtubeURL = eregi_replaceFF("^.+\?v=", "", $youtubeURL); $youtubeURL = trim($youtubeURL); } */ $youtubeURL = cleanyoutubeid($youtubeURL); //Since 3/4/21, 8:41 AM we check $s_id and !$is_robot if not called by the backend... if ($programcalled or ($s_id and !$is_robot)) { /* ///This is old system dismissed on 5-14-2015 because we need to use new API... $filename = 'http://gdata.youtube.com/feeds/api/videos/'.$youtubeURL; if (! ($xmlparser = xml_parser_create()) ) { die ("Cannot create parser"); } xml_set_element_handler($xmlparser, "start_tag", "end_tag"); xml_set_character_data_handler($xmlparser, "tag_contents"); ///start parse... if (!($fp = fopen($filename, "r"))) { $error = 1; } while ($data = fread($fp, 4096)){ $data=eregi_replaceFF(">"."[[:space:]]+"."<","><",$data); $data = str_replace("\n", " - ", $data); if (!xml_parse($xmlparser, $data, feof($fp))) { $reason = xml_error_string(xml_get_error_code($xmlparser)); $reason .= xml_get_current_line_number($xmlparser); //die($reason); $error = 1; } } xml_parser_free($xmlparser); */ ///New API since 5-14-2015, it uses this key: AIzaSyCOUEvj2baGBZD2vg5VU5qqliFqlztZRBE ///Which is the one for the YouTube VSM API application created inside the Google ///Developer Console: https://console.developers.google.com //https://www.googleapis.com/youtube/v3/videos?id=dEK6s9i1_5g&key=AIzaSyCOUEvj2baGBZD2vg5VU5qqliFqlztZRBE&part=snippet,contentDetails,statistics,status $url = "https://www.googleapis.com/youtube/v3/videos?id=".$youtubeURL."&key=AIzaSyCOUEvj2baGBZD2vg5VU5qqliFqlztZRBE&part=snippet,contentDetails,statistics,status"; $output = file_get_contents($url); //If quota reached, tries with the other APIs 3/5/21, 8:47 AM... if (strpos($output, "quotaExceeded") !== false) { $url = "https://www.googleapis.com/youtube/v3/videos?id=".$youtubeURL."&key=AIzaSyBvhgX3ouMqzi9gTw86K_DuSiKIPOZCqAc&part=snippet,contentDetails,statistics,status"; $output = file_get_contents($url); if (strpos($output, "quotaExceeded") !== false) { $url = "https://www.googleapis.com/youtube/v3/videos?id=".$youtubeURL."&key=wF15VeDXXK3Ov9NvXK8h96EmeV02cKI&part=snippet,contentDetails,statistics,status"; $output = file_get_contents($url); } } if ($output and $output !== false) { $jsonobj = json_decode($output); if ($jsonobj->items[0]->snippet->title) { #Se ok, procede con il resto... //Stores data... $YTtitle = $jsonobj->items[0]->snippet->title; $YTdescription = $jsonobj->items[0]->snippet->description; $YTauthor = $jsonobj->items[0]->snippet->channelTitle; $YTduration = $jsonobj->items[0]->contentDetails->duration; //Work duration... $YTduration = str_replace("PT", "", $YTduration); //If includes H... if (strpos($YTduration, "H") !== false) { list ($YThour, $restchunck) = explode("H", $YTduration); list ($YTminuti, $YTsecondi) = explode("M", $restchunck); $YTsecondi = str_replace("S", "", $YTsecondi); } else {//Just minutes and seconds... list ($YTminuti, $YTsecondi) = explode("M", $YTduration); $YTsecondi = str_replace("S", "", $YTsecondi); } return TRUE; } else { //If it is called serverside (backend), we return true if the quota limit is exceeded... if ($programcalled) { if (strpos($output, "quotaExceeded") !== false) { return TRUE; } else { return FALSE; } } else { return FALSE; } } } else { return FALSE; } } else { return FALSE; } } #Funzione per calcolare tempo passato (usato da home page, forums. etc) function tempofrase($tempoTR) { #Controlla subito se il tempo passato continee una pipe per definizione alternativa #stampaggio tempo (rev. 4-17-09)... list ($tempoTR, $alternative, $ondate) = explode("|", $tempoTR); #Controlla se e' meno di 48 ore, in tal caso #da una indicazione tipo "3 ore fa", "yesterday at 3:40", etc... global $globaltempo; $tempodiff = $globaltempo-$tempoTR; ##Ora calcola se questa data e' oggi (1), ieri (2) o piu' di 48 ore (3)... #Prende giorno di oggi... $giornooggi = zonedate("j", $globaltempo); $meseoggi = zonedate("n", $globaltempo); $annooggi = zonedate("Y", $globaltempo); $giornoelement = zonedate("j", $tempoTR); $meseelement = zonedate("n", $tempoTR); $annoelement = zonedate("Y", $tempoTR); if ($giornooggi == $giornoelement and $meseoggi == $meseelement and $annooggi == $annoelement) { #Oggi... $posizione = 1; } elseif ($giornoelement == $giornooggi-1 and $meseoggi == $meseelement and $annooggi == $annoelement) { #Ieri... $posizione = 2; } else { #Ogni altra data... $posizione = 3; } if ($posizione < 3) { #Se meno di 48 ore... #Controlla se meno di 3 ore... if ($tempodiff < 5400) { #se meno di 90 minuti... $minutipassati = round($tempodiff/60); if ($minutipassati == 0) { $workdateTR = $tempodiff." seconds"; } else { $workdateTR = $minutipassati." minute"; } if ($minutipassati > 1) { $workdateTR .= "s"; } $workdateTR .= " ago"; } elseif ($tempodiff < 10800) { #se meno di 3 ore... $workhourTR = round($tempodiff/3600); $workdateTR = $workhourTR." hour"; if ($workhourTR > 1) { $workdateTR .= "s"; } $workdateTR .= " ago"; } elseif ($posizione == 1) { #se oggi... $workdateTR = "today @ ".zonedate("g:ia", $tempoTR); } else { #Se ieri... $workdateTR = "yesterday @ ".zonedate("g:ia", $tempoTR); } } else { #Se piu' di 48 ore... if ($alternative) { $workdateTR = zonedate($alternative, $tempoTR); if ($ondate) { $workdateTR = "on ".$workdateTR; } } else { $workdateTR = zonedate("M j, Y", $tempoTR); } } #Last check 'now'... if ($workdateTR == "0 seconds ago") { $workdateTR = "now"; } return $workdateTR; } #Funzione per il time zone... (3-14-08) function zonedate($layout, $time) { global $MEMBERtimezone, $MEMBERdaylight; $countryzone = $MEMBERtimezone; $daylightsaving = $MEMBERdaylight; if (!$countryzone) { $countryzone = 0; #Default, GMT } if (!$daylightsaving) { $daylightsaving = 'auto'; } if($daylightsaving == "auto") { $daylight_saving = date('I'); if ($daylight_saving) { $zone=3600*($countryzone+1); } else { $zone=3600*($countryzone); } } elseif($daylightsaving == "on") { $zone=3600*($countryzone+1); } elseif($daylightsaving == "off") { $zone=3600*($countryzone); } if(!$time) { $time = time(); } $date = gmdate($layout, $time + $zone); return $date; } #Function to clean title at the minimum removing (New Edition) and other standard stuff... #THis is used by YouTube video tab... function minimumtitle($text) { $text = ereg_replaceFF("\(.+\)", "", $text); $text = trim($text); return $text; } function prende_nomeSHARED($composer) { global $scores_dev, $composerarrayindexrev, $GLOBComposertable; $full_composeroring = $composer; $composerSQLH = escapeMySQL($composer); $queryHERE = "SELECT ID FROM $GLOBComposertable WHERE name = '$composerSQLH'"; #$queryHERErr = mysql_real_escape_stringFF($queryHERE); #$queryQW = "INSERT INTO testing2 (message, tempo) VALUES ('$queryHERErr', 1)"; #$resultQW = mysql_queryFF($queryQW); $resultHERE = mysql_queryFF($queryHERE); $nitemsHERE = mysql_num_rowsFF($resultHERE); if ($nitemsHERE) { $name_composer = mysql_resultFF($resultHERE, 0, 'ID'); } #Sicurezza: se il $full_composer e' vuoto, lo riempie con l' input originale... if (!$name_composer) { $name_composer = $full_composeroring; } return $name_composer; } #Funzione per cancellare directory e suo contenuto... function rmdir_r ( $dir, $DeleteMe = TRUE ) { if ( ! $dh = @opendir ( $dir ) ) return; while ( false !== ( $obj = readdir ( $dh ) ) ) { if ( $obj == '.' || $obj == '..') continue; if ( ! @unlink ( $dir . '/' . $obj ) ) rmdir_r ( $dir . '/' . $obj, true ); } closedir ( $dh ); if ( $DeleteMe ) { @rmdir ( $dir ); } } ###Crypt-Dcrypt functions.. function encrypt($text, $salt) { //This below doesn\'t work anymore on PHP 7! //return trim(base64_encode(mcrypt_encrypt(MCRYPT_RIJNDAEL_256, $salt, $text, MCRYPT_MODE_ECB, mcrypt_create_iv(mcrypt_get_iv_size(MCRYPT_RIJNDAEL_256, MCRYPT_MODE_ECB), MCRYPT_RAND)))); return EncryptDecrypt($text, true, $salt); } function decrypt($text, $salt) { //This below doesn\'t work anymore on PHP 7! //return trim(mcrypt_decrypt(MCRYPT_RIJNDAEL_256, $salt, base64_decode($text), MCRYPT_MODE_ECB, mcrypt_create_iv(mcrypt_get_iv_size(MCRYPT_RIJNDAEL_256, MCRYPT_MODE_ECB), MCRYPT_RAND))); return EncryptDecrypt($text, false, $salt); } // function EncryptDecrypt($oldText, $encryptIt=true, $password="topo", $encryptType=""){ // $ciphers = openssl_get_cipher_methods(); // $foundEncType = false; // for($pointer=0; $pointer
';
offerrequest($type);
print '
';
}
function offerrequest($type, $forceid = '') {
global $offerrequestflag, $id, $requestdone, $cleanURL, $GLOBcleanSCRIPT, $product_type_id, $interactiveicon;
if ($type == "scorch" and $interactiveicon) {
$type = "interactive";
}
$origforceid = $forceid;
if (!$forceid) {
$forceid = $id;
}
if ($requestdone == $forceid) {
print ')/i", "$1$2$4$5", $text);
// $text = preg_replace("/(\)/i", "$1$2$4$5", $text);
// return $text;
// }
function hyperlink($text) {
// Remove mailto: if present
$text = str_replace("mailto:", "", $text);
// 1. Link URLs with protocol (http, https, ftp, etc.)
$text = preg_replace_callback(
'/(?"\']+[^\s<>"\'\.,;:!?\)\]])/i',
function ($matches) {
$url = $matches[1];
return '' . $url . '';
},
$text
);
// 2. Link www. URLs only if NOT preceded by ://
$text = preg_replace_callback(
'/(?])\b(www\.[^\s<>"\']+[^\s<>"\'\.,;:!?\)\]])/i',
function ($matches) {
$url = $matches[1];
return '' . $url . '';
},
$text
);
// 3. Link email addresses ONLY outside ... tags
// Split by ...
$parts = preg_split('/(]*>.*?<\/a>)/is', $text, -1, PREG_SPLIT_DELIM_CAPTURE);
foreach ($parts as $i => $part) {
// Only process parts that are NOT links
if ($i % 2 == 0) {
$parts[$i] = preg_replace(
'/\b([a-zA-Z0-9._%+-]+@[a-zA-Z0-9.-]+\.[a-zA-Z]{2,})\b/',
'$1',
$part
);
}
}
$text = implode('', $parts);
// 4. Remove target="_blank" for local VSM links (https and http)
$text = preg_replace(
'/(";
#Checks if thisis already inside purchases_details for this purchase...
$query = "SELECT ticket FROM purchases_details WHERE ticket = '$cbreceipt' AND session_id = '$s_id' AND product_id = '$single'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if (!$nitems) { #If not, inserts...
$query = "INSERT INTO purchases_details (ticket, session_id, product_id, tempo, quantity) VALUES ('$cbreceipt', '$s_id', '$single', $tempo, $quantity)";
$result = mysql_queryFF($query);
}
}
}
}
#Other function similar to hyperlink but tackle other versions...
function hyperlink2($text, $nofollow = 0) {
if ($nofollow) {
$nofollowcode = ' rel="nofollow noopener"';//Noopener added 1-19-2018...
}
else {
$nofollowcode = ' rel="noopener"';//Noopener added 1-19-2018...
}
$text = preg_replace('/(((f|ht){1}tp:\/\/)[-a-zA-Z0-9@:%_\+.~#?&\/\/=]+)/',
'$1', $text);
$text = preg_replace('/(((f|ht){1}tps:\/\/)[-a-zA-Z0-9@:%_\+.~#?&\/\/=]+)/',
'$1', $text);
$text = preg_replace('/([[:space:]()[{}])(www.[-a-zA-Z0-9@:%_\+.~#?&\/\/=]+)/',
'$1$2', $text);
if (strpos($text, "http") === false) {//Just for emails, check added 9/18/23, 10:05 AM...
$text = preg_replace('/([_\.0-9a-z-]+@([0-9a-z][0-9a-z-]+\.)+[a-z]{2,3})/',
'$1', $text);
}
/*
$text = eregi_replace('(((f|ht){1}tp://)[-a-zA-Z0-9@:%_\+.~#?&//=]+)',
'\\1', $text);
$text = eregi_replace('(((f|ht){1}tps://)[-a-zA-Z0-9@:%_\+.~#?&//=]+)',
'\\1', $text);
$text = eregi_replace('([[:space:]()[{}])(www.[-a-zA-Z0-9@:%_\+.~#?&//=]+)',
'\\1\\2', $text);
$text = eregi_replace('([_\.0-9a-z-]+@([0-9a-z][0-9a-z-]+\.)+[a-z]{2,3})',
'\\1', $text);
*/
return $text;
}
#Function to return item price...
function takeitemprice($id) {
global $GLOBscorestable;
$query = "SELECT price FROM $GLOBscorestable WHERE id = '$id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) { #Is offer...
$price = mysql_resultFF($result,0, 'price');
}
return $price;
}
function printMBBANNER($memburl, $option = 0) {
global $MEMBERSHIP_PRICEorig, $MemorialDay2023;
$output = ' {
$output .= '/images/icons/TopBannerOnly-AppleInApp.jpg';
}
elseif ($MEMBERSHIP_PRICEorig == 19.99 or $MemorialDay2023) {
$output .= '/images/icons/TopBannerPremium_19_99.jpg';
}
else {
//$output .= '/images/icons/TopBannerOnly3.jpg';
$output .= '/images/icons/TopBannerPremium_37_75.jpg';
}
$output .= ')
';
return $output;
}
#Function to get product_source_id of specific item...
function get_product_source_id($id) {
global $GLOBscorestable;
$query = "SELECT product_source_id FROM $GLOBscorestable WHERE id = '$id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) { #Is offer...
$product_source_id = mysql_resultFF($result,0, 'product_source_id');
}
return $product_source_id;
}
#Function to get product_type_id of specific item...
function get_product_type_id($id) {
global $GLOBscorestable;
$query = "SELECT product_type_id FROM $GLOBscorestable WHERE id = '$id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) { #Is offer...
$product_type_id = mysql_resultFF($result,0, 'product_type_id');
}
return $product_type_id;
}
#function to return item title only (2-23-2011)...
function return_id_title($id) {
global $GLOBscorestable;
$query = "SELECT title FROM $GLOBscorestable WHERE id = '$id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) { #Is offer...
$title = mysql_resultFF($result,0, 'title');
$title = str_replace("|", "", $title);
return $title;
}
else {
return '';
}
}
#Function to return IE version...
function ieversion() {
eregFF('MSIE ([0-9]\.[0-9])',$_SERVER['HTTP_USER_AGENT'],$reg);
if(!isset($reg[1])) {
return -1;
} else {
return floatval($reg[1]);
}
}
#Function to return data of a specific composer (from composer name - full name)
function get_composer_info($fullname) {
global $GLOBComposertable;
$fullname = mysql_real_escape_stringFF($fullname);
$query = "SELECT * FROM $GLOBComposertable WHERE name = '$fullname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_fetch_assocFF($result);
}
else {
return array();
}
}
#Function to return composer id of a specific composer (from composer name - full name)
function get_composer_id($fullname, $mustbelive = 0) {
global $GLOBComposertable;
$fullname = mysql_real_escape_stringFF($fullname);
$query = "SELECT id FROM virtualsheetmusic_optimizations.".$GLOBComposertable."_OPTIMIZED WHERE name = '$fullname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
elseif (!$mustbelive) {
//Tries to take it from Composer table (fixing 5-1-2014)...
$query = "SELECT id FROM virtualsheetmusic.Composer WHERE name = '$fullname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
//Tries to take it from Composer3 table (fixing 1-22-2019)...
$query = "SELECT id FROM virtualsheetmusic.Composer3 WHERE name = '$fullname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
return '';
}
}
}
}
#Function to return composer id of a specific composer (from composer name - abrv. name)
function get_composer_id_abr($abrname) {
global $GLOBComposertable;
$abrname = mysql_real_escape_stringFF($abrname);
$query = "SELECT id FROM $GLOBComposertable WHERE abbreviated_name = '$abrname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
//Tries to take it from Composer table (fixing 5-1-2014)...
$query = "SELECT id FROM Composer WHERE abbreviated_name = '$abrname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
//Tries to take it from Composer3 table (fixing 1-22-2019)...
$query = "SELECT id FROM Composer3 WHERE abbreviated_name = '$abrname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
return '';
}
}
}
}
#Function to emulate $composerarray[$composer_id] old global composer system (rev. 4-18-2011)
function em_composerarray($composer_id, $fromopttable = 0) {
global $GLOBComposertable, $scores_dev3, $composerarray;
if ($scores_dev3) {
if ($fromopttable) {//If we want to get this from the optimized table (2-13-2017)
$query = "SELECT name, ID FROM virtualsheetmusic_optimizations.".$GLOBComposertable."_OPTIMIZED WHERE ID = '$composer_id'";
}
else {//Regular composers table...
$query = "SELECT name, ID FROM $GLOBComposertable WHERE ID = '$composer_id'";
}
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
//If ID is different by $composer_id, returns "errorid:ID" so that we can make
//301 redirect to correct composer URL (6-4-2013)...
$idhere = mysql_resultFF($result,0, 'ID');
if ($idhere != $composer_id) {
return "errorid:".$idhere;
}
else {//OK...
return mysql_resultFF($result,0, 'name');
}
}
else {
return NULL;
}
}
else {
return $composerarray[$composer_id];
}
}
#Function to emulate $composerarrayindexrev[$composer_name] old global composer system (rev. 4-18-2011)
function em_composerarrayindexrev($composer_name) {
global $GLOBComposertable, $scores_dev3, $composerarrayindexrev;
if ($scores_dev3) {
$query = "SELECT ID FROM $GLOBComposertable WHERE name = '$composer_name'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0, 'ID');
}
else {
return NULL;
}
}
else {
return $composerarrayindexrev[$composer_name];
}
}
#Function to put Genre table inside $genreset array (5-12-2011)...
function setgenres() {
$query = "SELECT genre_name FROM Genre WHERE is_used = 1";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
while ($row = mysql_fetch_arrayFF($result)) {
$genre_name = $row["genre_name"];
$genreset[$genre_name] = 1;
}
}
return $genreset;
}
#Function to return list of items bought for receitp page and other...
function getboughtproducts($ticket) {
global $GLOBpricecolumn, $GLOBscorestable, $offersetflag, $GLOBofferitems, $GLOBofferitemsflag, $plantedone, $mbcomboflag;
#Lista gli items e loro prezzo...
$querySSP = "SELECT distinct a.product_id, a.quantity, count(a.product_id) as quantitycalc, b.product_type_id FROM purchases_details a, $GLOBscorestable b WHERE a.ticket = '$ticket' AND a.product_id != 'shipping_fee' AND a.product_id != 'sale_tax' AND a.product_id NOT LIKE 'discount_%' AND b.id = a.product_id GROUP BY a.product_id ORDER by b.product_type_id, b.PDFdir = 'OFFER' DESC";
$resultSSP = mysql_queryFF($querySSP);
$nitemsSSP = mysql_num_rowsFF($resultSSP);
#print "querySSP: $querySSP";
#exit;
$cc = 0;
while ($rowSI = mysql_fetch_arrayFF($resultSSP)) {
#Prende il prezzo di ogni singolo item...
$queryPRSI = "SELECT $GLOBpricecolumn, title, Instruments, product_type_id, PDFdir, PDFs FROM $GLOBscorestable WHERE id = '".$rowSI["product_id"]."'";
$resultPRSI = mysql_queryFF($queryPRSI);
#Now looks if this order includes an offer to remove price for included items (!!)
#Fixing 10-22-2012)...
$PDFdir = mysql_resultFF($resultPRSI,0,'PDFdir');
$PDFs = mysql_resultFF($resultPRSI,0,'PDFs');
if ($PDFdir == "OFFER") {
$PDFsarr = explode(",", $PDFs);
foreach ($PDFsarr as $single) {
$offerset[$single] = 1;
$offersetflag = 1;
}
}
if (!$offerset[$rowSI['product_id']]) {#Skip included offers...
$prezzoAR[$cc] = mysql_resultFF($resultPRSI,0, $GLOBpricecolumn);
$titleitem = mysql_resultFF($resultPRSI,0,'title');
$titleitemAR[$cc] = cleanffstring($titleitem);
$itemidAR[$cc] = $rowSI["product_id"];
$product_type_idAR[$cc] = mysql_resultFF($resultPRSI,0,'product_type_id');
$instrumentitem = mysql_resultFF($resultPRSI,0,'Instruments');
$instrumentitem = cleanffstring($instrumentitem);
$instrumentitemAR[$cc] = $instrumentitem;
if ($rowSI["quantity"] > 1) {//If new quantity value, thates that (3-12-2014)...
$quantityAR[$cc] = $rowSI["quantity"];
}
else {
$quantityAR[$cc] = $rowSI["quantitycalc"];
}
$cc ++;
}
#Checks if there is an item with Membership,Renewal or Extension offer (11-26-2012)..
if ($GLOBofferitems[$rowSI["product_id"]]) {
$GLOBofferitemsflag = 1;
}
}
/*
//Checks other extra items such as OneTreePlanted, etc...
$querySSP = "SELECT distinct product_id, quantity, count(product_id) as quantitycalc FROM purchases_details WHERE ticket = '$ticket' AND product_id = 'OneTreePlanted'";
$resultSSP = mysql_queryFF($querySSP);
$nitemsSSP = mysql_num_rowsFF($resultSSP);
if ($nitemsSSP) {
$titleitemAR[$cc] = 'OneTreePlanted.org Donation';
$product_type_idAR[$cc] = '0';
$instrumentitemAR[$cc] = 'planting a tree';
$prezzoAR[$cc] = 1;
$quantity = mysql_resultFF($resultSSP,0,'quantity');
$quantitycalc = mysql_resultFF($resultSSP,0,'quantitycalc');
if ($quantitycalc > 1) {//If new quantity value, thates that (3-12-2014)...
$quantityAR[$cc] = $quantity;
}
else {
$quantityAR[$cc] = $quantitycalc;
}
$instrumentitem = mysql_resultFF($resultPRSI,0,'Instruments');
$itemidAR[$cc] = "OneTreePlanted";
}
*/
return array ($titleitemAR, $instrumentitemAR, $prezzoAR, $product_type_idAR, $quantityAR, $itemidAR);
}
#Function to check for shipping options and return shgipping rate to be added to
#total shopping cart...
function check_shippingrate($tmpcbreceipt, $ticket = '') {
if ($ticket) {
$query = "SELECT rate FROM shipping WHERE ticket = '$ticket'";
}
else {
$query = "SELECT rate FROM shipping WHERE tmp_ticket = '$tmpcbreceipt'";
}
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0, 'rate');
}
else {
return 0;
}
}
#Function to check for possible sale tax to be added to
#total shopping cart...
function check_sale_tax($tmpcbreceipt, $ticket = '') {
global $GLOBpricecolumn, $GLOBscorestable, $s_id;
#First, checks if this user is from California...
if ($ticket) {
$query = "SELECT zip FROM shipping WHERE ticket = '$ticket' AND country = 'United States' AND state = 'California'";
}
else {
$query = "SELECT zip FROM shipping WHERE tmp_ticket = '$tmpcbreceipt' AND country = 'United States' AND state = 'California'";
}
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
$zip = mysql_resultFF($result,0, 'zip');
$query1 = "SELECT sum(a.".$GLOBpricecolumn.") as pricehere FROM $GLOBscorestable a, carts b WHERE b.session_id = '$s_id' AND a.ID = b.product_id AND a.product_type_id = 1";
#print "ecco: $query1
"; $result1 = mysql_queryFF($query1); $nitems1 = mysql_num_rowsFF($result1); #print "ecco: $nitems1 and $ticket"; if ($nitems1) { $pricehere = mysql_resultFF($result1,0, 'pricehere'); #Applies discount if set (8-29-2011)... list ($pricehereDD, $discounthereDD) = checkdiscount($pricehere); if (!$membership_only) { $pricehere = $pricehereDD; $discounthere = $discounthereDD; } if (!$pricehere and $ticket) { #Tries to get info from cartsDOWNLOAD... $query1 = "SELECT sum(a.".$GLOBpricecolumn.") as pricehere FROM $GLOBscorestable a, cartsDOWNLOAD b WHERE b.session_id = '$s_id' AND a.ID = b.product_id AND a.product_type_id = 1 AND b.ticket = '$ticket'"; #print "ecco2: $query1"; $result1 = mysql_queryFF($query1); $nitems1 = mysql_num_rowsFF($result1); if ($nitems1) { $pricehere = mysql_resultFF($result1,0, 'pricehere'); } } #print "roo2: $pricehere"; #Now returns 7.75% sales tax (as on 8/4/2011)... return number_format((($pricehere)*SaleTax($zip))/100, 2); } else { return 0; } } else { return 0; } } #Function to check if an item is physical or not... function is_physical($id) { global $GLOBscorestable; $queryFFCK = "SELECT product_type_id FROM $GLOBscorestable WHERE ID = '$id'"; $resultFFCK = mysql_queryFF($queryFFCK); $nitemsFFCK = mysql_num_rowsFF($resultFFCK); if ($nitemsFFCK) { $prodtype = mysql_resultFF($resultFFCK,0, 'product_type_id'); if ($prodtype == 1) { return 1; } else { return 0; } } } ##Function to return sale tax from ZIP code, based on https://www.taxdatasystems.net/ API ##Look at TDSBasic.php script in cgi-bin/cart/ -- 8/15/2011... function SaleTax($ZIP) { global $GLOBbasedir, $s_id, $newcat6; #First checks if this user has been already looked-up for the past day and #if ZIP correspond. This is to avoid to make too many lookups #to the API which costs (!!!) $tempodiff = time()-86400; $query1 = "SELECT tax FROM sale_tax WHERE zip = '$ZIP' AND tempo > ".$tempodiff; $result1 = mysql_queryFF($query1); $nitems1 = mysql_num_rowsFF($result1); if ($nitems1) { $sale_tax = mysql_resultFF($result1,0, 'tax'); //print "BUFFER"; return $sale_tax; } else {#Calls API... #First delets possible user entry... $query2 = "DELETE FROM sale_tax WHERE zip = '$ZIP'"; $result2 = mysql_queryFF($query2); #API process... require_once $GLOBbasedir.'/scripts/alfred/SOAP/nusoap/lib/nusoap.php'; $USER_ID = 'fabrizio@virtualsheetmusic.com'; $PASSWORD = 'topoloso1211'; $WSDL = 'http://service.taxdatasystems.net/TdsBasic.svc?WSDL'; $LOCATION = 'http://service.taxdatasystems.net/TdsBasic.svc/basic'; //This block below has been commented out on 11/12/19, 11:33 AM because doens't work anymore... //It was used for our own physical products (violin package), but the acount on that site was disabled a while ago. //If needed, call Tax Data Systems at 1-800-327-8829 Opt. 4-2 and ask about login info and restore our account. /* // create client $client = new SoapClient($WSDL, array('trace' => 1, 'exceptions' => 1, 'location'=>$LOCATION)); //set up parameter array $params = array("zipcode" => $ZIP, "username" => $USER_ID, "password" => $PASSWORD ); //call the web service operation $result = $client->__soapCall("GetTDSBasicUSPlainNetwork", array($params), null, null, $output_header); //show service results //Note that these are not all the fields contained in the service $sale_tax = 100*($result->GetTDSBasicUSPlainNetworkResult->ServiceResult->TotalUseTax); */ #If API returns 0 for any possible cause, set it to default OC sale tax 7.75... if (!$sale_tax) { $sale_tax = 7.75; } $county = $result->GetTDSBasicUSPlainNetworkResult->ServiceResult->County; #Then makes a new one... $query2 = "INSERT INTO sale_tax (zip, tax, county, tempo) VALUES ('$ZIP', $sale_tax, '$county', ".time().")"; $result2 = mysql_queryFF($query2); //print "API"; return $sale_tax; } } #Function to check and apply discount created 8-29-2011 for FB contest... #Modified 1-8-2012 to set to zero discounts if it is a logged Member... function checkdiscount($totaleCART, $fakediscount = 0, $forceused = 0) { global $s_id, $globaltempo, $discountuid, $discountpublic, $MEMBERlogged, $MEMBERexpired, $membership, $GLOBpricecolumn, $GLOBscorestable, $free_membership, $discount_single_use, $membership_only, $newcat6, $MEMBERrealid; #AND a.expiration >= $globaltempo #Checks if the discount has ben already activated... if ($forceused) { $query = "SELECT a.*, b.offer_id as offer_id, b.free_membership as free_membership, b.membership_only as membership_only FROM discounts a, discounts_table b WHERE a.session_id = '$s_id' AND a.id = b.id ORDER by a.tempo DESC LIMIT 1"; } else {//Default... $query = "SELECT a.*, b.offer_id as offer_id, b.free_membership as free_membership, b.membership_only as membership_only FROM discounts a, discounts_table b WHERE a.session_id = '$s_id' AND a.used = 0 AND a.id = b.id ORDER by a.tempo DESC LIMIT 1"; } $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); /* if ($newcat6) { print "
totaleCART: $totaleCART - query: $query - $nitems"; } */ if ($nitems) { $discountuid = mysql_resultFF($result,0, 'uid'); $idhere = mysql_resultFF($result,0, 'id'); $discount = mysql_resultFF($result,0, 'discount'); $offer_id = mysql_resultFF($result,0, 'offer_id'); $free_membership = mysql_resultFF($result,0, 'free_membership'); $membership_only = mysql_resultFF($result,0, 'membership_only'); #If item specific, checks if applicable... if ($offer_id) { if ($membership) { $discount = 0; } else { #Gets price of offer_id... $query1 = "SELECT $GLOBpricecolumn FROM $GLOBscorestable WHERE ID = '$offer_id'"; $result1 = mysql_queryFF($query1); $nitems1 = mysql_num_rowsFF($result1); if ($nitems1) { $priceck = mysql_resultFF($result1,0, $GLOBpricecolumn); if ($priceck != $totaleCART and !$fakediscount) { $discount = 0; } } } } if ($MEMBERrealid and !$MEMBERexpired and !$membership) { $discount = 0; } $tempohere = mysql_resultFF($result,0, 'tempo'); $expiration = mysql_resultFF($result,0, 'expiration'); $discountpublic = mysql_resultFF($result,0, 'public'); $discount_single_use = mysql_resultFF($result,0, 'single_use'); if ($expiration) { $expires = $expiration; } else { $expires = mktime(0, 0, 0, date("m", $tempohere)+1, date("d", $tempohere), date("Y", $tempohere)); } #print "ecco: $tempohere - $expires"; if ($globaltempo > $expires) {#Expired, returns null... $free_membership = 0; return array($totaleCART, 0); } else {#Ok, proceed... return array(round($totaleCART-(($totaleCART*$discount)/100), 2), $discount); } } else { $discountuid = 0; return array($totaleCART, 0); } } #Function to queue mailing commands inside mailing_lyris table #This function has been created for the old and new system (4-4-2012)... function mailing_queue($email, $name, $UserID, $origemail, $command, $fromscript) { global $globaltempo; $query = "INSERT INTO mailing_lyris (email, name, UserID, origemail, command, fromscript, tempo) VALUES ('$email', '$name', '$UserID', '$origemail', '$command', '$fromscript', $globaltempo)"; //print "query: $query
"; $result = mysql_queryFF($query); } #Function to count login attempts for Members to avoid vicous loop (4-25-2012)... #And in case there are more than 2 attempts, resets cookies... function check_vicious_loop($s_id) { global $globaltempo; if ($s_id) { $query = "SELECT session_id FROM antilooplogin WHERE session_id = '$s_id'"; $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); if ($nitems) {#If present, we must reset cookies... $query1 = "DELETE FROM antilooplogin WHERE session_id = '$s_id'"; $result1 = mysql_queryFF($query1); setcookie("vsmpm","",time(),'/'); setcookie("vsmtm","",time(),'/'); setcookie("virtual","",time(),'/'); setcookie("PHPSESSID","",time(),'/'); session_regenerate_id(); } else { $query1 = "INSERT INTO antilooplogin (session_id, tempo) VALUES ('$s_id', $globaltempo)"; $result1 = mysql_queryFF($query1); } } } #Function to delete record inside antilooplogin once login is successful... function reset_vicious_loop($s_id) { if ($s_id) { $query1 = "DELETE FROM antilooplogin WHERE session_id = '$s_id'"; $result1 = mysql_queryFF($query1); } } #Function to replace accents with normal characters... function replace_accents($string) { //Very special stuff like special apostrophes, etc... $string = str_replace(chr(226).chr(128).chr(153), "'", $string); $string = str_replace(chr(226).chr(128).chr(152), "'", $string); $string = str_replace(chr(226).chr(128).chr(166), "...", $string); $string = str_replace(chr(226).chr(128).chr(147), "-", $string); //These accents are composed by 2 combined characters and must be processed before //the blocks below... $string = str_replace(chr(195).chr(188), "u", $string); $string = str_replace(chr(195).chr(169), "e", $string); $string = str_replace(chr(195).chr(164), "a", $string); $string = str_replace(chr(195).chr(159), "ss", $string); $string = str_replace(chr(195).chr(178), "o", $string); $string = str_replace(chr(197).chr(153), "r", $string); $string = str_replace(chr(195).chr(161), "a", $string); $string = str_replace(chr(195).chr(173), "i", $string); $string = str_replace(chr(195).chr(175), "i", $string); $string = str_replace(chr(195).chr(171), "e", $string); $string = str_replace(chr(195).chr(182), "o", $string); $string = str_replace(chr(195).chr(168), "e", $string); $string = str_replace(chr(195).chr(167), "c", $string); $string = str_replace(chr(197).chr(161), "s", $string); $string = str_replace(chr(196).chr(141), "c", $string); $string = str_replace(chr(195).chr(137), "E", $string); $string = str_replace(chr(195).chr(160), "a", $string); $string = str_replace(chr(195).chr(170), "e", $string); $string = str_replace(chr(195).chr(179), "o", $string); $string = str_replace(chr(195).chr(185), "u", $string); $string = str_replace(chr(195).chr(187), "u", $string); $string = str_replace(chr(195).chr(172), "i", $string); $string = str_replace(chr(195).chr(177), "n", $string); $string = str_replace(chr(195).chr(162), "a", $string); $string = str_replace(chr(195).chr(186), "u", $string); $string = str_replace(chr(195).chr(181), "o", $string); $string = str_replace(chr(195).chr(129), "A", $string); //$string = str_replace('â', "", $string);//Removed this because messes up! //$string = HTMLcar($string); //$string = sanitizeSHARED($string); $search = explode("," , chr(220).','.chr(241).','.chr(231).','.chr(251).','.chr(226).','.chr(238).','.chr(201).','.chr(255).','.chr(193).','.chr(202).','.chr(182).','.chr(183).','.chr(200).','.chr(204).','.chr(219).','.chr(153).','.chr(253).','.chr(203).','.chr(207).','.chr(218).','.chr(152).','.chr(148).','.chr(206).','.chr(212).','.chr(150).','.chr(184).','.chr(157).','.chr(146).','.chr(205).','.chr(211).','.chr(217).','.chr(154).','.chr(194).','.chr(175).','.','.chr(233).','.chr(232).','.chr(224).','.chr(225).','.chr(236).','.chr(237).','.chr(242).','.chr(243).','.chr(249).','.chr(250).','.chr(228).','.chr(235).','.chr(239).','.chr(246).','.chr(252).','.chr(174).','.chr(147).','.chr(148).','.chr(195)); $replace = explode(",",chr(85).','.chr(110).','.chr(99).','.chr(117).','.chr(97).','.chr(105).','.chr(69).','.chr(121).','.chr(99).','.chr(97).','.chr(111).','.chr(97).','.chr(69).','.chr(105).','.chr(85).','.chr(117).','.chr(97).','.chr(69).','.chr(73).','.chr(85).','.chr(117).','.chr(34).','.chr(101).','.chr(105).','.chr(79).','.chr(117).','.chr(121).','.chr(97).','.chr(101).','.chr(105).','.chr(79).','.chr(85).','.chr(65).','.chr(111).','.','.chr(101).','.chr(101).','.chr(97).','.chr(97).','.chr(105).','.chr(105).','.chr(111).','.chr(111).','.chr(117).','.chr(117).','.chr(97).','.chr(101).','.chr(105).','.chr(111).','.chr(117).','.chr(0).','.chr(34).','.chr(34).','.chr(65)); $stringhere = str_ireplace($search, $replace, $string); //Additional replacements not working inside the expression above (5-27-2015)... $stringhere = str_replace(chr(180), "'", $stringhere); $stringhere = str_replace(chr(158), "z", $stringhere); return $stringhere; } #Function to convert all carachters over 128 to respective HTML entities (numerical, unicode)... function htmlentitiesunicode($text) { $trans = array(); for($i=128;$i<=255;$i++) { #print "ecco: $i
"; $trans[chr($i)] = "&#".$i.";"; } return strtr($text, $trans); } /* ///This below not used... #Function to remove all special characters from string... function cleanstring($string) { return trim(preg_replace('/ +/', ' ', preg_replace('/[^A-Za-z0-9 ]/', ' ', urldecode(html_entity_decode(strip_tags($string)))))); } */ ##Function to check legitimacy for free items for new mailing list system (6-10-2012)... function checkbonusaccess($id) { global $bonusaccess; if ($bonusaccess) { #Checks if this is legitimate... $bonusaccess = str_replace("-FREEBONUS", "", $bonusaccess); $queryBONUS = "SELECT uid FROM nl_bonus_id WHERE item_id = '$bonusaccess'"; $resultBONUS = mysql_queryFF($queryBONUS); $nitemsBONUS = mysql_num_rowsFF($resultBONUS); if ($nitemsBONUS and $id == $bonusaccess) { return 1; } else { return 0; } } else { return 0; } } #Function to calculate offer to new Members or Renewals with new $10 credit (6-12-2012)... function calc_memb_credit($totaleCART) { $totaleCARThloffer = $totaleCART - 10; if ($totaleCARThloffer < 0) { $totaleCARThloffer = 0; } return $totaleCARThloffer; } #Function to calculate percentage saving once HLoffer $10 Member credit is applied... function calc_memb_credit_perc($totaleCART, $MemberPriceTOTO) { $perc = 100-(round((100*$MemberPriceTOTO)/$totaleCART)); return $perc; } #Function to calculate offer to new Members or Renewals with new $10 credit (6-12-2012)... #for score page taking into account shopping cart content function calc_memb_credit_cart($totaleCART) { global $GLOBscorestable, $s_id, $MEMBERcredit, $MEMBERlogged, $MEMBERrealid; $query = "SELECT sum(a.memberprice) as price FROM $GLOBscorestable a, carts b WHERE b.session_id = '$s_id' AND a.ID = b.product_id"; $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); if ($nitems) { $carttotal = mysql_resultFF($result,0, 'price'); $totaleCART += $carttotal; } $MEMBERcredithere = $MEMBERcredit; if (!$MEMBERcredithere and !$MEMBERrealid) { $MEMBERcredithere = 10; } elseif (!$MEMBERcredithere and $MEMBERrealid) { $MEMBERcredithere = 0; } $totaleCARThloffer = $totaleCART - $MEMBERcredithere; if ($totaleCARThloffer < 0) { $totaleCARThloffer = 0; } return $totaleCARThloffer; } #Function to return Member credit (HL credit offer for Memberships 6-12-2012)... function get_memb_credit($MEMBERid) { #Checks if this member has some credit to apply (6-12-2012)... $query = "SELECT credit FROM datamembers WHERE id = $MEMBERid AND credit > 0"; $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); if ($nitems) { return mysql_resultFF($result,0, 'credit'); } else { return 0; } } #Function to subtract HLoffer Membership credit (6-13-2012)... function subtract_memb_credit($amount) { global $MEMBERid, $globaltempo; if ($MEMBERid) { $query1 = "UPDATE datamembers SET credit = credit - $amount, credit_tempo = $globaltempo WHERE id = $MEMBERid"; $result1 = mysql_queryFF($query1); } } #Function to check and store discount_member into purchases_details table (6-23-2012)... function checkstorediscountmember($cbreceipt, $s_id, $hlcreditapply, $tempo) { $query = "SELECT uid FROM purchases_details WHERE ticket = '$cbreceipt' AND product_id = 'discount_member'"; $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); if (!$nitems) { $queryPD = "INSERT INTO purchases_details (ticket, session_id, product_id, price, tempo) VALUES ('$cbreceipt','$s_id','discount_member',-".$hlcreditapply.",".$tempo.")"; $resultPD = mysql_queryFF($queryPD); } } // function displaymbg($noprintflag = 0, $mbpage = 0) { // return '';//Null return for redesign 2025... // } function displaymbg($noprintflag = 0, $mbpage = 0) { global $RDT_mbnorton3, $GLOBcdn2; ###Display Money Back Guaranteee, A/B split test winner 6-2-2011... $output = '
Thank you! We will consider to publish the '.ucfirst($type).' version of this item.
';
}
else {
if ($product_type_id == 1) {#If Physical item...
print '';
}
else {
print 'We are sorry, but '.ucfirst($type).' files for ';
if ($origforceid) {
#print "eoo: $origforceid - $forceid";
print return_id_title($forceid);
}
else {
print 'this item';
}
print ' are not available yet.
'; if ($type == 'scorch' or $type == 'interactive') { print ucfirst($type)." files allow you to transpose and change instruments on a score directly inside your browser,
which you can then print copies of.
This feature also allows you to play a score's music by following it on the screen.
"; } elseif ($type == 'mp3') { print "Mp3 files allow you to play and listen to music related to this item.
"; } elseif ($type == 'MIDI') { print "MIDI files allow you to play and listen to music related to this item and also to create your own music with special dedicated programs.
"; } print 'Would you like request '.ucfirst($type).' files for '; if ($origforceid) { print return_id_title($forceid); } else { print 'this item'; } print '?
';
}
}
$offerrequestflag = 1;
}
function enablehtmlgzip() {
if (substr_count($_SERVER['HTTP_ACCEPT_ENCODING'], 'gzip')) ob_start("ob_gzhandler"); else ob_start();
}
function calcsaving($full, $reduced) {
if (!$full) {
return 0;
}
else {
return round(100-((round($reduced, 1)*100)/round($full,1)));
}
}
#Function to return new Membership offers (11-11-2010)...
function returnmo($totaleCART) {
global $MEMBERSHIP_PRICEorig, $discount24;
$membershipdiff = $MEMBERSHIP_PRICEorig-$totaleCART;
$membershipsaving = round(($totaleCART*100)/$MEMBERSHIP_PRICEorig);
$membershipsaving24 = $membershipsaving+$discount24;
$membershipdiff24 = $MEMBERSHIP_PRICEorig-(($membershipsaving24*$MEMBERSHIP_PRICEorig)/100);
#If total cart is over 66% of the full price, just flat offer...
if ($totaleCART > (($MEMBERSHIP_PRICEorig*66)/100)) {
$membershipdiff24 = $membershipdiff;
$no24offer = 1;
$membershipsaving24 = $membershipsaving;
}
#If instead the total cart is too low, we give them a minimum discount of 15%
elseif ($totaleCART < (($MEMBERSHIP_PRICEorig*15)/100)) {
$membershipdiff = $MEMBERSHIP_PRICEorig-(($MEMBERSHIP_PRICEorig*15)/100);
$membershipsaving = 15;
$membershipsaving24 = $membershipsaving+$discount24;
$membershipdiff24 = $MEMBERSHIP_PRICEorig-(($membershipsaving24*$MEMBERSHIP_PRICEorig)/100);
}
#Compose return...
return array ($membershipdiff, $membershipsaving, $membershipdiff24, $membershipsaving24, $no24offer);
}
// function hyperlink($text) {
// #$text = ereg_replaceFF("(\ |^)[[:alpha:]]+://[^<>[:space:]]+[[:alnum:]/]","\\0", $text);
// // match protocol://address/path/file.extension?some=variable&another=asf%
// //Since 6/16/23, 9:14 AM we remove mailto: if present...
// $text = str_replace("mailto:", "", $text);
// $text = preg_replace("/(\s|\>|^)([a-zA-Z]+:\/\/[a-z][a-z0-9\_\.\-]*[a-z]{2,6}[a-zA-Z0-9\/\*\-\?\&\%]*)([\.|\,])([a-z]{2,6})([a-zA-Z0-9\/\-\?\&\@\.\%\=\_\#\+]*)(\s|$|\<[b-zB-Z]+)/i", "$1$2$3$4$5$6", $text);
// // match www.something.domain/path/file.extension?some=variable&another=asf%
// $text = preg_replace("/(\s|\>|^)(www\.[a-z][a-z0-9\_\.\-]*[a-z]{2,6}[a-zA-Z0-9\/\*\-\?\&\%]*)([\s|\.|\,])([a-z]{2,6})([a-zA-Z0-9\/\-\?\&\%\=]*)(\s|$|\<[b-zB-Z]+)/i", "$1$2$3$4$5$6", $text);
// //Added 6-3-2016...
// $text = preg_replace("/(\s|\>|^)([a-zA-Z]+:\/\/[a-zA-Z0-9]+\.[a-zA-Z0-9]+\.[a-z]{2,6}\/[a-zA-Z0-9]+\?[a-zA-Z0-9]+\=[a-zA-Z0-9]+)(\s|$|\<)/i", "$1$2$3", $text);
// // match name@address
// $text = preg_replace("/(\s|\>|^)([a-zA-Z][a-zA-Z0-9\_\.\-]*[a-zA-Z]*\@[a-zA-Z][a-zA-Z0-9\_\.\-]*[a-zA-Z]{2,6})([\s|\.|\,|$|\<])/i","$1$2$3", $text);
// //Toglie target_blank se il link e' a vsm page (locale) (9-5-08)...
// $text = preg_replace("/(\'; if ($type == 'scorch' or $type == 'interactive') { print ucfirst($type)." files allow you to transpose and change instruments on a score directly inside your browser,
which you can then print copies of.
This feature also allows you to play a score's music by following it on the screen.
"; } elseif ($type == 'mp3') { print "Mp3 files allow you to play and listen to music related to this item.
"; } elseif ($type == 'MIDI') { print "MIDI files allow you to play and listen to music related to this item and also to create your own music with special dedicated programs.
"; } print 'Would you like request '.ucfirst($type).' files for '; if ($origforceid) { print return_id_title($forceid); } else { print 'this item'; } print '?
';
return $output;
}
#Function to get product_source_id of specific item...
function get_product_source_id($id) {
global $GLOBscorestable;
$query = "SELECT product_source_id FROM $GLOBscorestable WHERE id = '$id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) { #Is offer...
$product_source_id = mysql_resultFF($result,0, 'product_source_id');
}
return $product_source_id;
}
#Function to get product_type_id of specific item...
function get_product_type_id($id) {
global $GLOBscorestable;
$query = "SELECT product_type_id FROM $GLOBscorestable WHERE id = '$id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) { #Is offer...
$product_type_id = mysql_resultFF($result,0, 'product_type_id');
}
return $product_type_id;
}
#function to return item title only (2-23-2011)...
function return_id_title($id) {
global $GLOBscorestable;
$query = "SELECT title FROM $GLOBscorestable WHERE id = '$id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) { #Is offer...
$title = mysql_resultFF($result,0, 'title');
$title = str_replace("|", "", $title);
return $title;
}
else {
return '';
}
}
#Function to return IE version...
function ieversion() {
eregFF('MSIE ([0-9]\.[0-9])',$_SERVER['HTTP_USER_AGENT'],$reg);
if(!isset($reg[1])) {
return -1;
} else {
return floatval($reg[1]);
}
}
#Function to return data of a specific composer (from composer name - full name)
function get_composer_info($fullname) {
global $GLOBComposertable;
$fullname = mysql_real_escape_stringFF($fullname);
$query = "SELECT * FROM $GLOBComposertable WHERE name = '$fullname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_fetch_assocFF($result);
}
else {
return array();
}
}
#Function to return composer id of a specific composer (from composer name - full name)
function get_composer_id($fullname, $mustbelive = 0) {
global $GLOBComposertable;
$fullname = mysql_real_escape_stringFF($fullname);
$query = "SELECT id FROM virtualsheetmusic_optimizations.".$GLOBComposertable."_OPTIMIZED WHERE name = '$fullname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
elseif (!$mustbelive) {
//Tries to take it from Composer table (fixing 5-1-2014)...
$query = "SELECT id FROM virtualsheetmusic.Composer WHERE name = '$fullname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
//Tries to take it from Composer3 table (fixing 1-22-2019)...
$query = "SELECT id FROM virtualsheetmusic.Composer3 WHERE name = '$fullname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
return '';
}
}
}
}
#Function to return composer id of a specific composer (from composer name - abrv. name)
function get_composer_id_abr($abrname) {
global $GLOBComposertable;
$abrname = mysql_real_escape_stringFF($abrname);
$query = "SELECT id FROM $GLOBComposertable WHERE abbreviated_name = '$abrname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
//Tries to take it from Composer table (fixing 5-1-2014)...
$query = "SELECT id FROM Composer WHERE abbreviated_name = '$abrname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
//Tries to take it from Composer3 table (fixing 1-22-2019)...
$query = "SELECT id FROM Composer3 WHERE abbreviated_name = '$abrname'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0,'id');
}
else {
return '';
}
}
}
}
#Function to emulate $composerarray[$composer_id] old global composer system (rev. 4-18-2011)
function em_composerarray($composer_id, $fromopttable = 0) {
global $GLOBComposertable, $scores_dev3, $composerarray;
if ($scores_dev3) {
if ($fromopttable) {//If we want to get this from the optimized table (2-13-2017)
$query = "SELECT name, ID FROM virtualsheetmusic_optimizations.".$GLOBComposertable."_OPTIMIZED WHERE ID = '$composer_id'";
}
else {//Regular composers table...
$query = "SELECT name, ID FROM $GLOBComposertable WHERE ID = '$composer_id'";
}
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
//If ID is different by $composer_id, returns "errorid:ID" so that we can make
//301 redirect to correct composer URL (6-4-2013)...
$idhere = mysql_resultFF($result,0, 'ID');
if ($idhere != $composer_id) {
return "errorid:".$idhere;
}
else {//OK...
return mysql_resultFF($result,0, 'name');
}
}
else {
return NULL;
}
}
else {
return $composerarray[$composer_id];
}
}
#Function to emulate $composerarrayindexrev[$composer_name] old global composer system (rev. 4-18-2011)
function em_composerarrayindexrev($composer_name) {
global $GLOBComposertable, $scores_dev3, $composerarrayindexrev;
if ($scores_dev3) {
$query = "SELECT ID FROM $GLOBComposertable WHERE name = '$composer_name'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0, 'ID');
}
else {
return NULL;
}
}
else {
return $composerarrayindexrev[$composer_name];
}
}
#Function to put Genre table inside $genreset array (5-12-2011)...
function setgenres() {
$query = "SELECT genre_name FROM Genre WHERE is_used = 1";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
while ($row = mysql_fetch_arrayFF($result)) {
$genre_name = $row["genre_name"];
$genreset[$genre_name] = 1;
}
}
return $genreset;
}
#Function to return list of items bought for receitp page and other...
function getboughtproducts($ticket) {
global $GLOBpricecolumn, $GLOBscorestable, $offersetflag, $GLOBofferitems, $GLOBofferitemsflag, $plantedone, $mbcomboflag;
#Lista gli items e loro prezzo...
$querySSP = "SELECT distinct a.product_id, a.quantity, count(a.product_id) as quantitycalc, b.product_type_id FROM purchases_details a, $GLOBscorestable b WHERE a.ticket = '$ticket' AND a.product_id != 'shipping_fee' AND a.product_id != 'sale_tax' AND a.product_id NOT LIKE 'discount_%' AND b.id = a.product_id GROUP BY a.product_id ORDER by b.product_type_id, b.PDFdir = 'OFFER' DESC";
$resultSSP = mysql_queryFF($querySSP);
$nitemsSSP = mysql_num_rowsFF($resultSSP);
#print "querySSP: $querySSP";
#exit;
$cc = 0;
while ($rowSI = mysql_fetch_arrayFF($resultSSP)) {
#Prende il prezzo di ogni singolo item...
$queryPRSI = "SELECT $GLOBpricecolumn, title, Instruments, product_type_id, PDFdir, PDFs FROM $GLOBscorestable WHERE id = '".$rowSI["product_id"]."'";
$resultPRSI = mysql_queryFF($queryPRSI);
#Now looks if this order includes an offer to remove price for included items (!!)
#Fixing 10-22-2012)...
$PDFdir = mysql_resultFF($resultPRSI,0,'PDFdir');
$PDFs = mysql_resultFF($resultPRSI,0,'PDFs');
if ($PDFdir == "OFFER") {
$PDFsarr = explode(",", $PDFs);
foreach ($PDFsarr as $single) {
$offerset[$single] = 1;
$offersetflag = 1;
}
}
if (!$offerset[$rowSI['product_id']]) {#Skip included offers...
$prezzoAR[$cc] = mysql_resultFF($resultPRSI,0, $GLOBpricecolumn);
$titleitem = mysql_resultFF($resultPRSI,0,'title');
$titleitemAR[$cc] = cleanffstring($titleitem);
$itemidAR[$cc] = $rowSI["product_id"];
$product_type_idAR[$cc] = mysql_resultFF($resultPRSI,0,'product_type_id');
$instrumentitem = mysql_resultFF($resultPRSI,0,'Instruments');
$instrumentitem = cleanffstring($instrumentitem);
$instrumentitemAR[$cc] = $instrumentitem;
if ($rowSI["quantity"] > 1) {//If new quantity value, thates that (3-12-2014)...
$quantityAR[$cc] = $rowSI["quantity"];
}
else {
$quantityAR[$cc] = $rowSI["quantitycalc"];
}
$cc ++;
}
#Checks if there is an item with Membership,Renewal or Extension offer (11-26-2012)..
if ($GLOBofferitems[$rowSI["product_id"]]) {
$GLOBofferitemsflag = 1;
}
}
/*
//Checks other extra items such as OneTreePlanted, etc...
$querySSP = "SELECT distinct product_id, quantity, count(product_id) as quantitycalc FROM purchases_details WHERE ticket = '$ticket' AND product_id = 'OneTreePlanted'";
$resultSSP = mysql_queryFF($querySSP);
$nitemsSSP = mysql_num_rowsFF($resultSSP);
if ($nitemsSSP) {
$titleitemAR[$cc] = 'OneTreePlanted.org Donation';
$product_type_idAR[$cc] = '0';
$instrumentitemAR[$cc] = 'planting a tree';
$prezzoAR[$cc] = 1;
$quantity = mysql_resultFF($resultSSP,0,'quantity');
$quantitycalc = mysql_resultFF($resultSSP,0,'quantitycalc');
if ($quantitycalc > 1) {//If new quantity value, thates that (3-12-2014)...
$quantityAR[$cc] = $quantity;
}
else {
$quantityAR[$cc] = $quantitycalc;
}
$instrumentitem = mysql_resultFF($resultPRSI,0,'Instruments');
$itemidAR[$cc] = "OneTreePlanted";
}
*/
return array ($titleitemAR, $instrumentitemAR, $prezzoAR, $product_type_idAR, $quantityAR, $itemidAR);
}
#Function to check for shipping options and return shgipping rate to be added to
#total shopping cart...
function check_shippingrate($tmpcbreceipt, $ticket = '') {
if ($ticket) {
$query = "SELECT rate FROM shipping WHERE ticket = '$ticket'";
}
else {
$query = "SELECT rate FROM shipping WHERE tmp_ticket = '$tmpcbreceipt'";
}
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
return mysql_resultFF($result,0, 'rate');
}
else {
return 0;
}
}
#Function to check for possible sale tax to be added to
#total shopping cart...
function check_sale_tax($tmpcbreceipt, $ticket = '') {
global $GLOBpricecolumn, $GLOBscorestable, $s_id;
#First, checks if this user is from California...
if ($ticket) {
$query = "SELECT zip FROM shipping WHERE ticket = '$ticket' AND country = 'United States' AND state = 'California'";
}
else {
$query = "SELECT zip FROM shipping WHERE tmp_ticket = '$tmpcbreceipt' AND country = 'United States' AND state = 'California'";
}
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
$zip = mysql_resultFF($result,0, 'zip');
$query1 = "SELECT sum(a.".$GLOBpricecolumn.") as pricehere FROM $GLOBscorestable a, carts b WHERE b.session_id = '$s_id' AND a.ID = b.product_id AND a.product_type_id = 1";
#print "ecco: $query1"; $result1 = mysql_queryFF($query1); $nitems1 = mysql_num_rowsFF($result1); #print "ecco: $nitems1 and $ticket"; if ($nitems1) { $pricehere = mysql_resultFF($result1,0, 'pricehere'); #Applies discount if set (8-29-2011)... list ($pricehereDD, $discounthereDD) = checkdiscount($pricehere); if (!$membership_only) { $pricehere = $pricehereDD; $discounthere = $discounthereDD; } if (!$pricehere and $ticket) { #Tries to get info from cartsDOWNLOAD... $query1 = "SELECT sum(a.".$GLOBpricecolumn.") as pricehere FROM $GLOBscorestable a, cartsDOWNLOAD b WHERE b.session_id = '$s_id' AND a.ID = b.product_id AND a.product_type_id = 1 AND b.ticket = '$ticket'"; #print "ecco2: $query1"; $result1 = mysql_queryFF($query1); $nitems1 = mysql_num_rowsFF($result1); if ($nitems1) { $pricehere = mysql_resultFF($result1,0, 'pricehere'); } } #print "roo2: $pricehere"; #Now returns 7.75% sales tax (as on 8/4/2011)... return number_format((($pricehere)*SaleTax($zip))/100, 2); } else { return 0; } } else { return 0; } } #Function to check if an item is physical or not... function is_physical($id) { global $GLOBscorestable; $queryFFCK = "SELECT product_type_id FROM $GLOBscorestable WHERE ID = '$id'"; $resultFFCK = mysql_queryFF($queryFFCK); $nitemsFFCK = mysql_num_rowsFF($resultFFCK); if ($nitemsFFCK) { $prodtype = mysql_resultFF($resultFFCK,0, 'product_type_id'); if ($prodtype == 1) { return 1; } else { return 0; } } } ##Function to return sale tax from ZIP code, based on https://www.taxdatasystems.net/ API ##Look at TDSBasic.php script in cgi-bin/cart/ -- 8/15/2011... function SaleTax($ZIP) { global $GLOBbasedir, $s_id, $newcat6; #First checks if this user has been already looked-up for the past day and #if ZIP correspond. This is to avoid to make too many lookups #to the API which costs (!!!) $tempodiff = time()-86400; $query1 = "SELECT tax FROM sale_tax WHERE zip = '$ZIP' AND tempo > ".$tempodiff; $result1 = mysql_queryFF($query1); $nitems1 = mysql_num_rowsFF($result1); if ($nitems1) { $sale_tax = mysql_resultFF($result1,0, 'tax'); //print "BUFFER"; return $sale_tax; } else {#Calls API... #First delets possible user entry... $query2 = "DELETE FROM sale_tax WHERE zip = '$ZIP'"; $result2 = mysql_queryFF($query2); #API process... require_once $GLOBbasedir.'/scripts/alfred/SOAP/nusoap/lib/nusoap.php'; $USER_ID = 'fabrizio@virtualsheetmusic.com'; $PASSWORD = 'topoloso1211'; $WSDL = 'http://service.taxdatasystems.net/TdsBasic.svc?WSDL'; $LOCATION = 'http://service.taxdatasystems.net/TdsBasic.svc/basic'; //This block below has been commented out on 11/12/19, 11:33 AM because doens't work anymore... //It was used for our own physical products (violin package), but the acount on that site was disabled a while ago. //If needed, call Tax Data Systems at 1-800-327-8829 Opt. 4-2 and ask about login info and restore our account. /* // create client $client = new SoapClient($WSDL, array('trace' => 1, 'exceptions' => 1, 'location'=>$LOCATION)); //set up parameter array $params = array("zipcode" => $ZIP, "username" => $USER_ID, "password" => $PASSWORD ); //call the web service operation $result = $client->__soapCall("GetTDSBasicUSPlainNetwork", array($params), null, null, $output_header); //show service results //Note that these are not all the fields contained in the service $sale_tax = 100*($result->GetTDSBasicUSPlainNetworkResult->ServiceResult->TotalUseTax); */ #If API returns 0 for any possible cause, set it to default OC sale tax 7.75... if (!$sale_tax) { $sale_tax = 7.75; } $county = $result->GetTDSBasicUSPlainNetworkResult->ServiceResult->County; #Then makes a new one... $query2 = "INSERT INTO sale_tax (zip, tax, county, tempo) VALUES ('$ZIP', $sale_tax, '$county', ".time().")"; $result2 = mysql_queryFF($query2); //print "API"; return $sale_tax; } } #Function to check and apply discount created 8-29-2011 for FB contest... #Modified 1-8-2012 to set to zero discounts if it is a logged Member... function checkdiscount($totaleCART, $fakediscount = 0, $forceused = 0) { global $s_id, $globaltempo, $discountuid, $discountpublic, $MEMBERlogged, $MEMBERexpired, $membership, $GLOBpricecolumn, $GLOBscorestable, $free_membership, $discount_single_use, $membership_only, $newcat6, $MEMBERrealid; #AND a.expiration >= $globaltempo #Checks if the discount has ben already activated... if ($forceused) { $query = "SELECT a.*, b.offer_id as offer_id, b.free_membership as free_membership, b.membership_only as membership_only FROM discounts a, discounts_table b WHERE a.session_id = '$s_id' AND a.id = b.id ORDER by a.tempo DESC LIMIT 1"; } else {//Default... $query = "SELECT a.*, b.offer_id as offer_id, b.free_membership as free_membership, b.membership_only as membership_only FROM discounts a, discounts_table b WHERE a.session_id = '$s_id' AND a.used = 0 AND a.id = b.id ORDER by a.tempo DESC LIMIT 1"; } $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); /* if ($newcat6) { print "
totaleCART: $totaleCART - query: $query - $nitems"; } */ if ($nitems) { $discountuid = mysql_resultFF($result,0, 'uid'); $idhere = mysql_resultFF($result,0, 'id'); $discount = mysql_resultFF($result,0, 'discount'); $offer_id = mysql_resultFF($result,0, 'offer_id'); $free_membership = mysql_resultFF($result,0, 'free_membership'); $membership_only = mysql_resultFF($result,0, 'membership_only'); #If item specific, checks if applicable... if ($offer_id) { if ($membership) { $discount = 0; } else { #Gets price of offer_id... $query1 = "SELECT $GLOBpricecolumn FROM $GLOBscorestable WHERE ID = '$offer_id'"; $result1 = mysql_queryFF($query1); $nitems1 = mysql_num_rowsFF($result1); if ($nitems1) { $priceck = mysql_resultFF($result1,0, $GLOBpricecolumn); if ($priceck != $totaleCART and !$fakediscount) { $discount = 0; } } } } if ($MEMBERrealid and !$MEMBERexpired and !$membership) { $discount = 0; } $tempohere = mysql_resultFF($result,0, 'tempo'); $expiration = mysql_resultFF($result,0, 'expiration'); $discountpublic = mysql_resultFF($result,0, 'public'); $discount_single_use = mysql_resultFF($result,0, 'single_use'); if ($expiration) { $expires = $expiration; } else { $expires = mktime(0, 0, 0, date("m", $tempohere)+1, date("d", $tempohere), date("Y", $tempohere)); } #print "ecco: $tempohere - $expires"; if ($globaltempo > $expires) {#Expired, returns null... $free_membership = 0; return array($totaleCART, 0); } else {#Ok, proceed... return array(round($totaleCART-(($totaleCART*$discount)/100), 2), $discount); } } else { $discountuid = 0; return array($totaleCART, 0); } } #Function to queue mailing commands inside mailing_lyris table #This function has been created for the old and new system (4-4-2012)... function mailing_queue($email, $name, $UserID, $origemail, $command, $fromscript) { global $globaltempo; $query = "INSERT INTO mailing_lyris (email, name, UserID, origemail, command, fromscript, tempo) VALUES ('$email', '$name', '$UserID', '$origemail', '$command', '$fromscript', $globaltempo)"; //print "query: $query
"; $result = mysql_queryFF($query); } #Function to count login attempts for Members to avoid vicous loop (4-25-2012)... #And in case there are more than 2 attempts, resets cookies... function check_vicious_loop($s_id) { global $globaltempo; if ($s_id) { $query = "SELECT session_id FROM antilooplogin WHERE session_id = '$s_id'"; $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); if ($nitems) {#If present, we must reset cookies... $query1 = "DELETE FROM antilooplogin WHERE session_id = '$s_id'"; $result1 = mysql_queryFF($query1); setcookie("vsmpm","",time(),'/'); setcookie("vsmtm","",time(),'/'); setcookie("virtual","",time(),'/'); setcookie("PHPSESSID","",time(),'/'); session_regenerate_id(); } else { $query1 = "INSERT INTO antilooplogin (session_id, tempo) VALUES ('$s_id', $globaltempo)"; $result1 = mysql_queryFF($query1); } } } #Function to delete record inside antilooplogin once login is successful... function reset_vicious_loop($s_id) { if ($s_id) { $query1 = "DELETE FROM antilooplogin WHERE session_id = '$s_id'"; $result1 = mysql_queryFF($query1); } } #Function to replace accents with normal characters... function replace_accents($string) { //Very special stuff like special apostrophes, etc... $string = str_replace(chr(226).chr(128).chr(153), "'", $string); $string = str_replace(chr(226).chr(128).chr(152), "'", $string); $string = str_replace(chr(226).chr(128).chr(166), "...", $string); $string = str_replace(chr(226).chr(128).chr(147), "-", $string); //These accents are composed by 2 combined characters and must be processed before //the blocks below... $string = str_replace(chr(195).chr(188), "u", $string); $string = str_replace(chr(195).chr(169), "e", $string); $string = str_replace(chr(195).chr(164), "a", $string); $string = str_replace(chr(195).chr(159), "ss", $string); $string = str_replace(chr(195).chr(178), "o", $string); $string = str_replace(chr(197).chr(153), "r", $string); $string = str_replace(chr(195).chr(161), "a", $string); $string = str_replace(chr(195).chr(173), "i", $string); $string = str_replace(chr(195).chr(175), "i", $string); $string = str_replace(chr(195).chr(171), "e", $string); $string = str_replace(chr(195).chr(182), "o", $string); $string = str_replace(chr(195).chr(168), "e", $string); $string = str_replace(chr(195).chr(167), "c", $string); $string = str_replace(chr(197).chr(161), "s", $string); $string = str_replace(chr(196).chr(141), "c", $string); $string = str_replace(chr(195).chr(137), "E", $string); $string = str_replace(chr(195).chr(160), "a", $string); $string = str_replace(chr(195).chr(170), "e", $string); $string = str_replace(chr(195).chr(179), "o", $string); $string = str_replace(chr(195).chr(185), "u", $string); $string = str_replace(chr(195).chr(187), "u", $string); $string = str_replace(chr(195).chr(172), "i", $string); $string = str_replace(chr(195).chr(177), "n", $string); $string = str_replace(chr(195).chr(162), "a", $string); $string = str_replace(chr(195).chr(186), "u", $string); $string = str_replace(chr(195).chr(181), "o", $string); $string = str_replace(chr(195).chr(129), "A", $string); //$string = str_replace('â', "", $string);//Removed this because messes up! //$string = HTMLcar($string); //$string = sanitizeSHARED($string); $search = explode("," , chr(220).','.chr(241).','.chr(231).','.chr(251).','.chr(226).','.chr(238).','.chr(201).','.chr(255).','.chr(193).','.chr(202).','.chr(182).','.chr(183).','.chr(200).','.chr(204).','.chr(219).','.chr(153).','.chr(253).','.chr(203).','.chr(207).','.chr(218).','.chr(152).','.chr(148).','.chr(206).','.chr(212).','.chr(150).','.chr(184).','.chr(157).','.chr(146).','.chr(205).','.chr(211).','.chr(217).','.chr(154).','.chr(194).','.chr(175).','.','.chr(233).','.chr(232).','.chr(224).','.chr(225).','.chr(236).','.chr(237).','.chr(242).','.chr(243).','.chr(249).','.chr(250).','.chr(228).','.chr(235).','.chr(239).','.chr(246).','.chr(252).','.chr(174).','.chr(147).','.chr(148).','.chr(195)); $replace = explode(",",chr(85).','.chr(110).','.chr(99).','.chr(117).','.chr(97).','.chr(105).','.chr(69).','.chr(121).','.chr(99).','.chr(97).','.chr(111).','.chr(97).','.chr(69).','.chr(105).','.chr(85).','.chr(117).','.chr(97).','.chr(69).','.chr(73).','.chr(85).','.chr(117).','.chr(34).','.chr(101).','.chr(105).','.chr(79).','.chr(117).','.chr(121).','.chr(97).','.chr(101).','.chr(105).','.chr(79).','.chr(85).','.chr(65).','.chr(111).','.','.chr(101).','.chr(101).','.chr(97).','.chr(97).','.chr(105).','.chr(105).','.chr(111).','.chr(111).','.chr(117).','.chr(117).','.chr(97).','.chr(101).','.chr(105).','.chr(111).','.chr(117).','.chr(0).','.chr(34).','.chr(34).','.chr(65)); $stringhere = str_ireplace($search, $replace, $string); //Additional replacements not working inside the expression above (5-27-2015)... $stringhere = str_replace(chr(180), "'", $stringhere); $stringhere = str_replace(chr(158), "z", $stringhere); return $stringhere; } #Function to convert all carachters over 128 to respective HTML entities (numerical, unicode)... function htmlentitiesunicode($text) { $trans = array(); for($i=128;$i<=255;$i++) { #print "ecco: $i
"; $trans[chr($i)] = "&#".$i.";"; } return strtr($text, $trans); } /* ///This below not used... #Function to remove all special characters from string... function cleanstring($string) { return trim(preg_replace('/ +/', ' ', preg_replace('/[^A-Za-z0-9 ]/', ' ', urldecode(html_entity_decode(strip_tags($string)))))); } */ ##Function to check legitimacy for free items for new mailing list system (6-10-2012)... function checkbonusaccess($id) { global $bonusaccess; if ($bonusaccess) { #Checks if this is legitimate... $bonusaccess = str_replace("-FREEBONUS", "", $bonusaccess); $queryBONUS = "SELECT uid FROM nl_bonus_id WHERE item_id = '$bonusaccess'"; $resultBONUS = mysql_queryFF($queryBONUS); $nitemsBONUS = mysql_num_rowsFF($resultBONUS); if ($nitemsBONUS and $id == $bonusaccess) { return 1; } else { return 0; } } else { return 0; } } #Function to calculate offer to new Members or Renewals with new $10 credit (6-12-2012)... function calc_memb_credit($totaleCART) { $totaleCARThloffer = $totaleCART - 10; if ($totaleCARThloffer < 0) { $totaleCARThloffer = 0; } return $totaleCARThloffer; } #Function to calculate percentage saving once HLoffer $10 Member credit is applied... function calc_memb_credit_perc($totaleCART, $MemberPriceTOTO) { $perc = 100-(round((100*$MemberPriceTOTO)/$totaleCART)); return $perc; } #Function to calculate offer to new Members or Renewals with new $10 credit (6-12-2012)... #for score page taking into account shopping cart content function calc_memb_credit_cart($totaleCART) { global $GLOBscorestable, $s_id, $MEMBERcredit, $MEMBERlogged, $MEMBERrealid; $query = "SELECT sum(a.memberprice) as price FROM $GLOBscorestable a, carts b WHERE b.session_id = '$s_id' AND a.ID = b.product_id"; $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); if ($nitems) { $carttotal = mysql_resultFF($result,0, 'price'); $totaleCART += $carttotal; } $MEMBERcredithere = $MEMBERcredit; if (!$MEMBERcredithere and !$MEMBERrealid) { $MEMBERcredithere = 10; } elseif (!$MEMBERcredithere and $MEMBERrealid) { $MEMBERcredithere = 0; } $totaleCARThloffer = $totaleCART - $MEMBERcredithere; if ($totaleCARThloffer < 0) { $totaleCARThloffer = 0; } return $totaleCARThloffer; } #Function to return Member credit (HL credit offer for Memberships 6-12-2012)... function get_memb_credit($MEMBERid) { #Checks if this member has some credit to apply (6-12-2012)... $query = "SELECT credit FROM datamembers WHERE id = $MEMBERid AND credit > 0"; $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); if ($nitems) { return mysql_resultFF($result,0, 'credit'); } else { return 0; } } #Function to subtract HLoffer Membership credit (6-13-2012)... function subtract_memb_credit($amount) { global $MEMBERid, $globaltempo; if ($MEMBERid) { $query1 = "UPDATE datamembers SET credit = credit - $amount, credit_tempo = $globaltempo WHERE id = $MEMBERid"; $result1 = mysql_queryFF($query1); } } #Function to check and store discount_member into purchases_details table (6-23-2012)... function checkstorediscountmember($cbreceipt, $s_id, $hlcreditapply, $tempo) { $query = "SELECT uid FROM purchases_details WHERE ticket = '$cbreceipt' AND product_id = 'discount_member'"; $result = mysql_queryFF($query); $nitems = mysql_num_rowsFF($result); if (!$nitems) { $queryPD = "INSERT INTO purchases_details (ticket, session_id, product_id, price, tempo) VALUES ('$cbreceipt','$s_id','discount_member',-".$hlcreditapply.",".$tempo.")"; $resultPD = mysql_queryFF($queryPD); } } // function displaymbg($noprintflag = 0, $mbpage = 0) { // return '';//Null return for redesign 2025... // } function displaymbg($noprintflag = 0, $mbpage = 0) { global $RDT_mbnorton3, $GLOBcdn2; ###Display Money Back Guaranteee, A/B split test winner 6-2-2011... $output = '
';
if ($mbpage) {//Norton guarantee for Membership page (8-27-2018)...
$output .= '
';
if ($noprintflag) {
return $output;
}
else {
print $output;
}
}
function escapeMySQL($string) {
$string = preg_replace("/\'/", "\\'", $string);
return $string;
}
//Function to clean instrument to be appended to title for indexes and headers SEO 5-26-2013
function cleaninstrapp($instrhere) {
$instrhere = str_replace("|","",$instrhere);
//$instrhere = str_replace(" solo", "", $instrhere);
//$instrhere = str_replace(" & piano", "", $instrhere);
$instrhere = str_replace ("&", "&", $instrhere);
return $instrhere;
}
function escapeparenthesis($string) {
$string = str_replace('(', '\(', $string);
$string = str_replace(')', '\)', $string);
return $string;
}
//////////////////////////////////////////////////////////////////
/////NEW RANDOM TESTER 10-10-2013 cookies based!!!
//////////////////////////////////////////////////////////////////
function process_randomtester($ticket) {
global $HTTP_USER_AGENT, $HTTP_COOKIE_VARS, $MEMBERrealid, $membership, $mbcomboflag;
$tempo = time();
if (!$HTTP_USER_AGENT) {
$agenthere = 'null';
}
else {
$agenthere = $HTTP_USER_AGENT;
}
#Loops through all cookies...
foreach ($HTTP_COOKIE_VARS as $key => $nrt_value) {
if (preg_match("/^RDT_/", $key)) {
$nrt_id = str_replace("RDT_", "", $key);
$skip = 0;
//Check if this random tester has excluded Members from results (6-27-2018)...
$query = "SELECT exclmb FROM new_random_testers WHERE id ='$nrt_id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) {
$exclmb = mysql_resultFF($result,0, 'exclmb');
if ($exclmb and $MEMBERrealid and !$membership and !$mbcomboflag) {//Must NOT be a just purchased Membership though! Added 5/18/23, 1:39 PM...
$skip = 1;
}
}
if (!$skip) {
###Inserisce risultati dentro purchases_randomtester
#Controllo che non ci sia gia' il record...
$query = "SELECT value FROM purchases_randomtester WHERE ticket = '$ticket' and id = '$nrt_id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if (!$nitems) { #Se non presente...
$queryWR = "INSERT INTO purchases_randomtester (ticket, id, value, agent, tempo) VALUES ('$ticket', '$nrt_id', $nrt_value, '$agenthere', $tempo)";
$resultWR = mysql_queryFF($queryWR);
}
}
}
}
}
function randomtester($id, $no_values, $duration = "1 month", $pretrack = 0, $exclmb = 0) {
global $s_id, $HTTP_COOKIE_VARS, $is_robot, $globaltempo, $REQUEST_URI;
if (!$is_robot and $s_id) {
$tempo = time();
$number = preg_replace("/^([0-9]{1,2})(\ .+$)/", "$1", $duration);
if (strpos($duration, "week")) {
$expiration = strtotime("+".$number." week");
}
elseif (strpos($duration, "month")) {
//$expiration = time()+$number*2592000;
$expiration = strtotime("+".$number." month");
}
else {
/*
if ($id == 'NewCCform') {
$queryWR = "INSERT INTO testing6 (message, message2) VALUES ('1', '$duration')";
$resultWR = mysql_queryFF($queryWR);
}
*/
return 0;//Error, returns 0...
}
//print "expiration: ".date("F j, Y", $expiration);
$cookiename = "RDT_".$id;
#STEP 1: check if this user has already cookie set...
if ($HTTP_COOKIE_VARS[$cookiename] and $value = $HTTP_COOKIE_VARS[$cookiename]) {
#$queryWR = "INSERT INTO testing6 (message, message2) VALUES ('rndtest', '$value')";
#$resultWR = mysql_queryFF($queryWR);
return $value;//ok, read this from cookie, returns it...
}
//If it is here, means that this tester has not been assigned to this user...
#Controlla se questo random tester e' gia' presente nella table...
$query = "SELECT value, expiration FROM new_random_testers WHERE id ='$id'";
$result = mysql_queryFF($query);
$nitems = mysql_num_rowsFF($result);
if ($nitems) { #Se c'e' gia', update...
$expirationMYSQL = mysql_resultFF($result,0, 'expiration');
//If this tester is expired, exists and don't do anything!!! (4-11-2014)...
if ($expirationMYSQL < $globaltempo) {
/*
if ($id == 'NewCCform') {
$queryWR = "INSERT INTO testing6 (message, message2) VALUES ('3', '$expirationMYSQL - $globaltempo')";
$resultWR = mysql_queryFF($queryWR);
}
*/
return 0;//Null...
}
#preleva valore corrente...
$value = $random_testerTEMPOSQL = mysql_resultFF($result,0, 'value');
#Definisce nuovo valore...
if ($value == $no_values) {
$value = 1;
}
else {
$value ++;
}
if ($random_testerTEMPOSQL and $value > 0 and $value <= $no_values) { #ridondanze...
#setta...
$query = "UPDATE new_random_testers SET value = $value, count = count +1, exclmb = $exclmb, last_update = $tempo WHERE id = '$id'";
$result = mysql_queryFF($query);
}
else {
/*
if ($id == 'NewCCform') {
$queryWR = "INSERT INTO testing6 (message, message2) VALUES ('4', '$random_testerTEMPOSQL - $value - $no_values')";
$resultWR = mysql_queryFF($queryWR);
}
*/
return 0;//Error, returns 0...
}
}
else { #Altrimenti lo crea ex novo...
$query = "INSERT INTO new_random_testers (id, no_values, value, count, expiration, exclmb, tempo, last_update) VALUES ('$id', $no_values, 1, 1, $expiration, $exclmb, $tempo, $tempo)";
$result = mysql_queryFF($query);
$value = 1;
}
//print "$cookiename - $value - $expiration";
setcookie($cookiename, $value, $expiration, '/');
/*
//Stores this value in checking table (for accuracy testing)...
$query = "INSERT INTO random_tester_checks (cookiename, value, session_id, tempo) VALUES ('$cookiename', $value, '$s_id', $tempo)";
$result = mysql_queryFF($query);
*/
//If $pretrack is set, we store this value inside new_testrandomsource 3-28-2015...
if ($pretrack) {
$queryRDMTSTb = "INSERT IGNORE INTO new_testrandomsource (id, value, script, session_id, tempo) VALUES ('$id', $value, '$REQUEST_URI', '$s_id', $globaltempo)";
$resultRDMTSTb = mysql_queryFF($queryRDMTSTb);
/*
if ($s_id == "gagtl2inc8c4pclht2b71uui94") {
print "ecco: $queryRDMTSTb";
exit;
}
*/
}
/*
if ($id == 'NewCCform') {
$queryWR = "INSERT INTO testing6 (message, message2) VALUES ('5', '$value')";
$resultWR = mysql_queryFF($queryWR);
}
*/
return $value;
}
else {
return 0;//Error, returns 0...
}
}
//Function to return Muso Special Offer text on 11-14-2013...
function musoffer($kind, $fontsize = '', $receipt = 0) {
$output = '';
$output .= '
';
$output .= '';
$output .= '
';
$output .= '
';
$output .= '';
$output .= '';
$output .= '';
$output .= '
';
}
if ($RDT_mbnorton3 == 2) {//Norton guarantee for Membership payment, bottom (9-17-2018)...
$output .= '';
$output .= '';
$output .= '
';
$output .= '';
$output .= '';
$output .= '
';
}
$output .= 'to Classical Music and International Piano digital magazines!';
if ($receipt) {
$output .= '
';
return $output;
}
#Function to return "restricted" flag of specific item (1-14-2013)...
function checkrestricted($itemid) {
global $GLOBscorestable;
$query5 = "SELECT restricted FROM $GLOBscorestable WHERE ID = '$itemid'";
$result5 = mysql_queryFF($query5);
$nitems5 = mysql_num_rowsFF($result5);
if ($nitems5) {
return mysql_resultFF($result5, 0, 'restricted');
}
else {
return 0;
}
}
///Stores this user profile info (behavioral system March/April 2014)....
function store_user_prefs($s_id, $URL, $source) {
global $GLOBuseragent, $GLOBremoteaddress, $MEMBERid, $MEMBERlogged, $globaltempo, $is_robot, $boxwork, $uniuser, $VSMUSERid;
if (!$is_robot) {
if (!$MEMBERid or !$MEMBERlogged) {
$MEMBERid = 0;
}
$agenthere = escapeMySQL($GLOBuseragent);
if ($uniuser) {
$queryWR = "INSERT INTO PROFILE_1 (session_id, uni_user_id, URL, agent, ip_address, source, tempo) VALUES ('$s_id', $VSMUSERid, '$URL', '$agenthere', '$GLOBremoteaddress', '$source'Check your email to find your '.$kind.' confirmation which includes instructions to access the magazines. Enjoy!
';
}
$output .= '