error_reporting(E_ERROR | E_WARNING | E_PARSE);
require_once('Cache/Lite.php');
global $username;
global $password;
global $database;
//$username = "ppp";
//$password = "Nw4W2Z2CT";
$username = "promo";
$password = "Pcat19";
$database = "dbPPP";
global $traffic;
$traffic=(isset($_GET['niche']))?intval($_GET['niche']):3;
function __DBopen(){
global $username;
global $password;
// return mysql_connect('85.92.155.231',$username,$password);
return mysql_connect('74.206.224.229',$username,$password);
}
function __DBclose(){
return mysql_close();
}
function getPacks($siteid) {
try {
__DBopen();
global $database;
global $traffic;
@mysql_select_db($database);
$query="SELECT tblPacks.PackID, tblPacks.CategoryID, tblCategories.Category, tblPacks.PaysiteID, tblDomains.DomainID, tblPaysites.ShortName, tblPacks.Title, tblPacks.Desc, tblPacks.Marketing, tblPacks.Notes, tblPacks.PackDate, tblPacks.Flag_SMailOut, tblPacks.Flag_SMailRec, tblPacks.Flag_Clipped, If(tblPacks.MPA_FHG='',1,0) AS Flag_MPA, If(tblPacks.MPA_VA='',1,0) AS Flag_VA, If(tblPacks.VIST_ID='',1,0) AS Flag_VIST, tblPacks.MPA_FHG, tblPacks.MPA_VA, tblPacks.VIST_ID, tblPacks.Flag_Creative, tblPacks.Flag_AutoBan, tblPacks.Flag_Rdy, tblPacks.Flag_Pub, tblPacks.Flag_Email, tblPacks.Flag_HasFLV, tblPacks.MPA_PIC, If(tblPacks.MPA_PIC='',1,0) AS Flag_PIC ";
$query.="FROM tblDomains INNER JOIN (tblPaysites INNER JOIN (tblCategories INNER JOIN tblPacks ON tblCategories.CategoryID = tblPacks.CategoryID) ON tblPaysites.PaysiteID = tblPacks.PaysiteID) ON tblDomains.DomainID = tblPaysites.DomainID ";
$query.="WHERE (((tblPacks.PackDate) < Now())) AND ((tblPacks.Flag_isTG)=0) AND ((tblPacks.Flag_Pub)=1) AND (tblPaysites.Flag_Public = 1) ";// AND (tblPacks.PaysiteID <> 18)
if($siteid != ""){
if($siteid=="4") $siteid="101";
$query.="AND (tblPacks.PaysiteID=$siteid) ";
} else{
$query.="AND (tblPacks.PaysiteID<>18) ";
}
//} $query.="WHERE $userPaysiteLimit ";
if ($traffic == 2) {
$query.="AND ( tblPaysites.Niche=2 ) ";
}
if ($traffic == 1) {
$query.="AND ( tblPaysites.Niche=1 ) ";
}
$query.="ORDER BY tblPacks.PackDate DESC;";
//echo $query;exit;
$result=mysql_query($query);
//$num=mysql_numrows($result);
__DBclose();
return $result;
} catch (Exception $e) {
$err = mysql_error();
if ($err != "") {
return $err;
} else {
return $e;
}
}
}
$cache_config = array(
'cacheDir'=>'/usr/www/cache/',
'caching'=>true,
'lifetime'=>86400,
'fileLocking'=>true,
'writeControl'=>true,
'readControl'=>true,
'readControlType'=>'crc32',
'memoryCaching'=>false,
'onlyMemoryCaching'=>false,
'memoryCachingLimit'=>1000,
'fileNameProtection'=>true,
'automaticSerialization'=>true,
'automaticCleaningFactor'=>1,
'hashedDirectoryLevel'=>2,
'hashedDirectoryUmask'=>0700
);
$cache =& new Cache_Lite($cache_config);
$dbasedir="/www/virtual/pistolmedia/dbpacks";
//$dbasedir="";
$ourwebid = "100342";
$ourcamp = "111";
$dbgcolor = "ffffff";
$dtextcolor = "000000";
$dlinkcolor = "0033ff";
$webid = ($_GET['w'] ? $_GET['w'] : $ourwebid);
$program = (($_GET['p'] > 0 )?$_GET['p']:1);
$camp = ($_GET['c']?$_GET['c']:'');
$siteid = ($_GET['s']?$_GET['s']:'');
if ($_GET['clr'] != "") {
$cache->clean('videosv4');
}
$cacheID = $webid.$program.$siteid.$dbgcolor.$dtextcolor.$dlinkcolor.$traffic;
$bgcolor = ($_GET['bg'] ? $_GET['bg'] : $dbgcolor);
$textcolor = ($_GET['tx'] ? $_GET['tx'] : $dtextcolor);
$linkcolor = ($_GET['lk'] ? $_GET['lk'] : $dlinkcolor);
$scrollcolor = ($_GET['sc'] ? $_GET['sc'] : $dlinkcolor);
$debugflag = ($_GET['db']=="true" ? $_GET['db'] : "");
if ($data = getCache($cacheID)) {
echo $data;
echo "[cached]";
exit;
}
$packlist = getPacks($siteid);
function url_exists($url) {
global $debugflag;
$a_url = parse_url($url);
if (!isset($a_url['port'])) $a_url['port'] = 80;
$errno = 0;
$errstr = '';
$timeout = 4;
if ($debugflag!="") {
echo "
\n";
echo "URL: " . $url . "|
\n";
echo "aURL: " . $a_url['host'] . "|
\n";
echo "gURL: " . gethostbyname($a_url['host']) . "|
\n";
}
if(isset($a_url['host']) && $a_url['host']!=gethostbyname($a_url['host'])){
$fid = fsockopen($a_url['host'], $a_url['port'], $errno, $errstr, $timeout);
if ($debugflag!="") {
echo "HIT
\n";
if (!$fid) {
echo "$errstr ($errno)
\n";
}
}
if (!$fid) return false;
$page = isset($a_url['path']) ?$a_url['path']:'';
$page .= isset($a_url['query'])?'?'.$a_url['query']:'';
fputs($fid, 'HEAD '.$page.' HTTP/1.0'."\r\n".'Host: '.$a_url['host']."\r\n\r\n");
$head = fread($fid, 4096);
$head = substr($head,0,strpos($head, 'Connection: close'));
fclose($fid);
if ($debugflag!="") {
echo "HEAD: " . $head . "
\n";
}
if (preg_match('#^HTTP/.*\s+[404]+\s#i', $head)) {
return false;
} elseif (preg_match('#^HTTP/.*\s+[200|302]+\s#i', $head)) {
return true;
} else {
return false;
}
/*
if (preg_match('#^HTTP/.*\s+[200|302]+\s#i', $head)) {
$pos = strpos($head, 'Content-Type');
return $pos !== false;
}
*/
} else {
return false;
}
}
/*function generateGalURL($webid, $mpaid, $siteid)
{
if ($mpaid == "" || $siteid == "" || $webid == "") {
return "";
} else {
return "http://gunzblazing.com/gallhit.php?$webid,$mpaid,$siteid,1,0";
}
}*/
function generateGalURL($webid, $mpaid, $siteid, $programid, $campaignid) {
$toolId = '15';
if ($programid == "") {
$programid = 1;
}
if ($mpaid == "" || $siteid == "" || $webid == "") {
return "";
} else {
return "http://gunzblazing.com/gallhit.php?$webid,$mpaid,$siteid,$programid,0,$campaignid,$toolId";
}
}
function getCache($cacheID)
{
global $cache;
if (isset($cache) && $data = $cache->get($cacheID,'videosv4')) {
return $data;
}
return false;
}
function setCache($data, $cacheID)
{
global $cache;
$cache->save($data, $cacheID,'videosv4');
}
function getContent($data, $webid, $program, $camp, $debugflag)
{
$toolId = '15';
$secured = false;
if($_SERVER['HTTPS']){
$secured = true;
}else{
$secured = false;
}
$x = 0;
while($row = mysql_fetch_assoc($data)){
if ($row['MPA_FHG'] != "" && $x < 10) {
$domain = $row['DomainID'];
$siteid = $row['PaysiteID'];
$link = "";
$linkfhg = "";
$linkva = "";
$buffer = "";
switch (strtoupper($row['ShortName']))
{
case "SG":
$link = "Enjoy SexGaymes";
break;
case "RS":
$link = "Enjoy Raging Stallion";
break;
case "FC":
$link = "Enjoy Fisting Central";
break;
case "HB":
$link = "Enjoy Hairy Boyz";
break;
case "XI":
$link = "Enjoy Xtra Inches";
break;
case "HBB":
$link = "Enjoy Hot Barebacking";
break;
case "BBB":
$link = "Enjoy Bang Bang Boys";
break;
case "CO":
$link = "Enjoy Collin O'neal";
break;
case "TW":
$link = "Enjoy Twinks.com";
break;
case "HO":
$link = "Enjoy High Octane";
break;
case "BN":
$link = "Enjoy BoyNapped";
break;
case "DT":
$link = "Enjoy Dark Thunder";
break;
case "TO":
$link = "Enjoy Thug Orgy";
break;
case "BBSB":
$link = "Enjoy BareBackSheBang";
break;
case "FF":
$link = "Enjoy FetishForce";
break;
case "DTI":
$link = "Enjoy DirtyTeenIdols";
break;
case "NUS":
$link = "Enjoy NurseSeductions";
break;
case "SS":
$link = "Enjoy SecretarySeductions";
break;
case "TD":
$link = "Enjoy TabooDesire";
break;
case "UH":
$link = "Enjoy UnfaithfulHousewives";
break;
case "WTB":
$link = "Enjoy WhaletailBangers";
break;
case "NAN":
$link = "Enjoy MyHotNanny";
break;
case "STK":
$link = "Enjoy StockingSecrets";
break;
case "NS":
$link = "Enjoy Naked Sword";
break;
case "GDVD":
$link = "Enjoy GayDVD";
break;
case "RSS":
$link = "Enjoy Raging Stallion Studios";
break;
case "SH":
$link = "Enjoy Stag Homme Studios";
break;
case "BUS":
$link = "Enjoy Bus Stop Girls";
break;
case "HJG":
$link = "Enjoy Hard Jerking Girls";
break;
case "DP":
$link = "Enjoy Dirty Parodies";
break;
case "SYB":
$link = "Enjoy Share Your Boyfriend";
break;
case "TR":
$link = "Enjoy Tylers Room";
break;
case "FA":
$link = "Enjoy Falcon TV";
break;
case "WWBC":
$link = "Enjoy White Wife Black Cocks";
break;
case "BLK":
$link = "Enjoy Black It On Up";
break;
case "FSX":
$link = "Enjoy Fresh SX";
break;
case "SPX":
$link = "Enjoy SmashPixxx";
break;
case "CJS":
$link = "Enjoy Club Jason Sparks";
break;
case "DBS":
$link = "Enjoy Dirty Boy Society";
break;
case "JSL":
$link = "Enjoy Jason Sparks Live";
break;
case "DFL":
$link = "Enjoy Dads Fuck Lads";
break;
case "TRT":
$link = "Enjoy Teens and Twinks";
break;
case "TAT":
$link = "Enjoy Tribal Twinks";
break;
case "WFC":
$link = "Enjoy Wurstfilm Club";
break;
case "CC":
$link = "Enjoy Cazzo Club";
break;
case "GFP":
$link = "Enjoy Gay-Fetish-Porn.XXX";
break;
case "JAL":
$link = "Enjoy Jalif Studio";
break;
default:
$link = "Enjoy Our Site";
break;
}
$linkfhg = generateGalURL($webid, $row['MPA_FHG'], $siteid, ((strtoupper($row['ShortName'])!='RSS' && strtoupper($row['ShortName'])!="GDVD" && strtoupper($row['ShortName'])!="FA")?$program:'2'), $camp);
$linkva = generateGalURL($webid, $row['MPA_VA'], $siteid, ((strtoupper($row['ShortName'])!='RSS' && strtoupper($row['ShortName'])!="GDVD" && strtoupper($row['ShortName'])!="FA")?$program:'2'), $camp);
$linkpic = generateGalURL($webid, $row['MPA_PIC'], $siteid, ((strtoupper($row['ShortName'])!='RSS' && strtoupper($row['ShortName'])!="GDVD" && strtoupper($row['ShortName'])!="FA")?$program:'2'), $camp);
$date = date("d F Y", strtotime($row['PackDate']));
$buffer = '