var cnnad_tileID = cnnad_getID();
var cnnad_enabled = true;
var cnnad_adIframes = new Array();
var cnnad_adVault = new Array();
var cnnad_adCache = new Array();

// browser detection
var cnnad_IE = (document.all) ? 1 : 0;
var cnnad_DOM = (document.getElementById) ? 1 : 0;
var cnnad_NS4 = (document.layers) ? 1 : 0;
var cnnad_MAC = ( (navigator.appVersion.indexOf("PPC") >0) || (navigator.appVersion.indexOf("Mac") >0) ) ? 1 : 0;
var cnnad_ua = '$User_Agent';
var cnnad_OPERA = (cnnad_ua.indexOf("Opera") > 0) ? 1 : 0;

// flag for geo targetting image
var alreadySwappedDETargetImage = false;
var cnnDEadDEonCookie = false;

// document domain security issues
var cnnDocDomain = cnnad_getTld(location.hostname);
if (cnnDocDomain) {document.domain = cnnDocDomain;}

//ADM send functionality
//pagemodes - 1(all tags) - DM_cat(), DM_addToLoc(), DM_tag();
//pagemodes - 2(health) -  DM_tag();
//pagemodes - 3(none);
var cnnad_pageMode = 1;
var cnnad_calledURLs = new Array(); //associative array
var cnnad_successfulSend = 0;
var cnnad_resultArray = new Array();
var cnnad_ADMSizes = new Array();
// Set default sizes, can be overridden with cnnad_setADMSizes
cnnad_ADMSizes = ["728x90","300x250","336x280","160x600","336x850","300x600"];

function cnnad_setADMSizes(admSizesArray) {
        // Use this function to override ADM ad sizes to be sent
        cnnad_ADMSizes = admSizesArray;
}

function cnnad_parseReferrer(url) {
        // take a url, typically document.referrer, and parse out the domain,
        // eg "http://edition.cnn.com/story/otherstuff&refresh=1" returns "cnn.com"
        if (!url) {
                return null;
        }
        var data = url.substring(0, url.indexOf('/', 7));
        if (data.indexOf(':', 5) > 0)
                data = data.substring(0, url.indexOf(':', 5));
        data = data.substring(data.lastIndexOf('/')+1);
        var datachop = data.split('.');
        return(datachop[datachop.length-2] + '.' + datachop[datachop.length-1]);
}


function cnnad_sendADMData() {
	var finalExpression = "";

	for(as=0;as<cnnad_ADMSizes.length;as++){
		var calledURL = cnnad_calledURLs[cnnad_ADMSizes[as]];

		if(calledURL && cnnad_successfulSend == 0){

			if(cnnad_pageMode != 3){
				finalExpression += '<scr' + 'ipt> \n ';
				if(cnnad_pageMode == 1){
					finalExpression += '	A09801.DM_cat("';
					var site = cnnad_getParamValue(calledURL, "site=","&");
					var rollup = cnnad_getParamValue(calledURL, "_rollup=","&");
					var section = cnnad_getParamValue(calledURL, "_section=","&");
					var subsection = cnnad_getParamValue(calledURL, "_subsection=","&");
                                        var referrerTld = cnnad_parseReferrer(document.referrer);

					finalExpression += site;
					if((site!="") && ((rollup!="") || (section!="") || (subsection!=""))){
						finalExpression += " > ";
					}
					finalExpression += rollup;
					if((rollup!="") && ((section!="") || (subsection!=""))){
						finalExpression += " > ";
					}
					finalExpression += section;
					if((section!="") && (subsection!="")){
						finalExpression += " > ";
					}
					finalExpression += subsection;
					finalExpression += '"); \n ';
                                        if (referrerTld)
                                                finalExpression += '    A09801.DM_addEncToLoc("refer", "' + referrerTld + '"); \n ';
                                        else
                                                finalExpression += '    A09801.DM_addEncToLoc(); \n ';
				}
				finalExpression += '	A09801.DM_tag(); \n ';
				finalExpression += '</scr' + 'ipt> \n ';

				//alert(finalExpression);

				document.write(finalExpression);

			}

			cnnad_successfulSend = 1;
			break;
		}
	}
}


function cnnad_getParamValue(paramString, parameter, endCharacter){
	if(paramString.match(parameter)){
		var startOfString = paramString.indexOf(parameter)+parameter.length;
		var endOfString = paramString.indexOf(endCharacter,startOfString);
	 	var parameterValue = paramString.substring(startOfString,endOfString);
	 	return parameterValue;
	 }
	 else{
	 	return "";
	 }
}
// end ADM send functionality

//DYNAMIC TYLEID
var cnnad_adTileIDGroup = new Array();
var cnnad_newTileIDIteration = 0;

function cnnad_newTileIDGroup(newGroupArray) {
	var newTileID = (cnnad_tileID * 1 + (++cnnad_newTileIDIteration));
	for (var i = 0; i < newGroupArray.length; i++) {
		cnnad_adTileIDGroup[cnnad_adTileIDGroup.length] = {tileID:newTileID, adName:newGroupArray[i]}; 
	}
}

function cnnad_getDynamicTileID(adURL) {
	var returnId = cnnad_tileID;
	if(cnnad_adTileIDGroup.length > 0){
		var ad_position;
		if(adURL.match("_position=") ){
			ad_position = cnnad_getParamValue(adURL, "_position=", "&");
		}
		else if(adURL.match("_pos=")){
			ad_position = cnnad_getParamValue(adURL, "_pos=", "&");
		}
		else {
			ad_position = "";
		}
		for (var i = 0; i < cnnad_adTileIDGroup.length; i++) {
			var adName = cnnad_adTileIDGroup[i].adName;
			if(ad_position == adName){
				returnId = cnnad_adTileIDGroup[i].tileID;
				break;
			}			
		}
	}
	return returnId;
}
//END DYNAMIC TYLEID

function cnnad_reverseString (input)
{
	// convert everything to a string
	input = "" + input;
	var output = '';

	if (input.length)
	{
		var i;
		for (i = input.length; i > 0; i--)
		{
			output += input.charAt(i-1);
		}
	}
	return(output);
}

function cnnad_getID() {
	return (cnnad_reverseString(new Date().getTime()));
}

function cnnad_renderAd(cnnad_url) {
	if(cnnad_enabled == true) {
		document.write("<script type=\"text/javascript\"");
		document.write(" src=\""+cnnad_url+"&tile="+cnnad_getDynamicTileID(cnnad_url)+"\"></scr");
		document.write("ipt>");
	}
}

function cnnad_preview(cnnad_adstring) {
	if ( location.host.indexOf("turner.com") > -1) {
		// we are on preview (or on local subnet, so we have to use internal names)
		// cnnad_adstring = cnnad_adstring.replace(new RegExp("ads\..*?\.com","gi"),"ads-dev.turner.com");
		// alert("in cnnad_preview and about to regexp. cnnad_adstring= " + cnnad_adstring);
		cnnad_adstring = cnnad_adstring.replace(new RegExp("ads\..*?\.com","gi"),"ads.turner.com");
	}
	// alert("in cnnad_preview returning " + cnnad_adstring);
	return cnnad_adstring;
}

function cnnad_createIframe (id, url)
{
	var iframe = document.createElement('iframe');
	iframe.id = id;
	iframe.name = id;
	iframe.width = 0;
	iframe.height = 0;
	iframe.style.visibility = 'hidden';
	iframe.style.position = 'absolute';
	iframe.marginWidth = 0;
	iframe.marginHeight = 0;
	iframe.frameBorder = 0;
	iframe.scrolling = "no";
	iframe.allowtransparency = 'true';
	iframe.src = url;

	return iframe;
}


function cnnad_createAdNoTileId(adId,cnnad_url,cnnad_height,cnnad_width) {
	cnnad_url = cnnad_preview(cnnad_url);
	document.write('<iframe ALLOWTRANSPARENCY="true" hspace="0" vspace="0" marginHeight="0" marginWidth="0" src="' + cnnad_url + '&page.allowcompete=yes&domId=' + adId + '" border="0" frameBorder="0" height="0" width="0" scrolling="no"  id="'+adId+'" style="position: absolute; visibility: hidden;" ></iframe>');
}

function cnnad_createAd(adId,cnnad_url,cnnad_height,cnnad_width,target) {
	var d = document.getElementById('ad-' + adId);
	cnnad_url = cnnad_preview(cnnad_url);

	if (d)
	{
		cnnad_url += '&tile=' + cnnad_getDynamicTileID(cnnad_url) + '&page.allowcompete=yes&domId=' + adId;
		if (! document.getElementById(adId))
		{
			d.appendChild(cnnad_createIframe(adId, cnnad_url));
		}
	}
	else
	{
		if (!target) {
			document.write('<iframe ALLOWTRANSPARENCY="true" hspace="0" vspace="0" marginHeight="0" marginWidth="0" src="' + cnnad_url + '&tile=' + cnnad_getDynamicTileID(cnnad_url) + '&page.allowcompete=yes&domId=' + adId + '" border="0" frameBorder="0" height="0" width="0" scrolling="no"  id="'+adId+'" style="position: absolute; visibility: hidden;" ></iframe>');
		} else {
			document.getElementById(target).innerHTML = '<iframe ALLOWTRANSPARENCY="true" hspace="0" vspace="0" marginHeight="0" marginWidth="0" src="' + cnnad_url + '&tile=' + cnnad_getDynamicTileID(cnnad_url) + '&page.allowcompete=yes&domId=' + adId + '" border="0" frameBorder="0" height="0" width="0" scrolling="no"  id="'+adId+'" style="position: absolute; visibility: hidden;" ></iframe>';
		}
	}

	// ADM functionality
		var adSize = new String();
	
		if(cnnad_url.match("_position=") ){
			adSize = cnnad_getParamValue(cnnad_url, "_position=", "_");
		}
		else if(cnnad_url.match("_pos=")){
			adSize = cnnad_getParamValue(cnnad_url, "_pos=", "_");
		}
		else {
			adSize = "";
		}
	
		cnnad_calledURLs[adSize] = cnnad_url;
	// END ADM functionality

}

function cnnad_writeAd(cnnad_callid,cnnad_url) {
        if(cnnad_enabled == true) {
                document.write("<script id=\"" + cnnad_callid + "\" type=\"text/javascript\" onload=\"cnnSendData();\"");
                document.write(" src=\""+cnnad_url+"&tile="+cnnad_getDynamicTileID(cnnad_url)+"\"></scr");
                document.write("ipt>");
        }
}

function cnnad_showAd(cnnad_id) {
	if (document.getElementById(cnnad_id))
	{
		document.getElementById(cnnad_id).style.position = 'relative';
		document.getElementById(cnnad_id).style.visibility = 'visible';
	}
	else 
	{
		// alert("Error displaying ad component: " + cnnad_id);	
		// just do not display the ad. -sg
	}
}

function cnnad_setAdSize(docId,height,width) {
	var i = document.getElementById(docId);

        if (i)
	{
                i.height = height;
                i.width = width;
        }
	else 
	{
		// alert("Error displaying ad component: " + cnnad_id);	
		// just do not display the ad. -sg
	}
}

function cnnad_readCookie( name ) {
        if ( document.cookie == '' ) { // there is no cookie, so go no further
            return false;
        } else { // there is a cookie
            var firstChar, lastChar;
                var theBigCookie = document.cookie;
                firstChar = theBigCookie.indexOf(name); // find the start of 'name'
                var NN2Hack = firstChar + name.length;
                if ( (firstChar != -1) && (theBigCookie.charAt(NN2Hack) == '=') ) { // if you found the cookie
                        firstChar += name.length + 1; // skip 'name' and '='
                        lastChar = theBigCookie.indexOf(';', firstChar); // Find the end of the value string (i.e. the next ';').
                        if (lastChar == -1) lastChar = theBigCookie.length;
                        return unescape( theBigCookie.substring(firstChar, lastChar) );
                } else { // If there was no cookie of that name, return false.
                        return false;
                }
        }
}

function cnnad_getTld (hostname)
{
	var data = hostname.split(".");
	if (data.length >= 2)
	{
		return (data[data.length-2] + "." + data[data.length-1]);
	}
	return(null);
}

function cnnad_refreshAds (type)
{
    if (! cnnad_adIframes)
    {
        return;
    }

	var debug = document.getElementById("debugUrl");

	if (debug)
	{
		debug.innerHTML = "";
	}

    for (var i = 0; i < cnnad_adIframes.length; i++)
    {
		var targetAd = cnnad_adIframes[i];
		var newAdLoc = cnnad_findAd(type,targetAd.getWidth(),targetAd.getHeight());
		cnnad_swapAd(targetAd.getId(), newAdLoc, debug);
    }
}

function cnnad_swapAd (id, newAdLoc, debug)
{

	var elem = document.getElementById(id);
	if (elem)
	{
		if (debug) alert("Got the element");
		// elem.width = 0;
		// elem.height = 0;
		// elem.style.position = 'absolute';
		// elem.style.visibility = 'hidden';

		// if we find our ad in the cache, then use it
		if (cnnad_adCache[newAdLoc])
		{
			if (debug) alert("found ad via cache: " + cnnad_adCache[newAdLoc]);
			//elem.src = cnnad_adCache[newAdLoc];

		for (var j = 0; j < window.frames.length; j++) {
			try {
					if (window.frames[j].location.href.indexOf('domId='+id) > -1) {
						window.frames[j].location.replace(cnnad_adCache[newAdLoc]);
					}
 		} catch(e) {
			if (debug) alert("Caught exception: " + e);
		}
		}		

			return;
		}

		// if not in cache, we fetch it using an Ajax call
		// first we try Prototype
		if ((typeof Ajax != 'undefined') && (typeof Ajax.Request != 'undefined'))
		{
			if (debug) alert("Fetching with an Ajax call");
			var temp = new Ajax.Request(
								newAdLoc,
								{
									method:'get',
									onSuccess: function (req) {
										if (debug) alert("Got Ajax success: " + req.responseText);
										if (debug) alert("req.readystate: " + req.readyState);
										if (debug) alert("req.status: " + req.status);
										var newLoc = cnnad_parseResponse(req.responseText,id);
										// var newLoc = req.responseText;
										if (debug) alert("newLoc: " + newLoc);
										newLoc = cnnad_preview(newLoc);
										if (debug) alert("newLoc: " + newLoc);
										if (newLoc)
										{
											if (debug) { debug.innerHTML += "<br>Updated " + elem.id + " with " + newLoc;
												alert("Inside if newLoc");
											}
											cnnad_adCache[newAdLoc] = newLoc;
											// elem.src = newLoc;
		for (var j = 0; j < window.frames.length; j++) {
			try {
					if (window.frames[j].location.href.indexOf('domId='+id) > -1) {
						window.frames[j].location.replace(newLoc);
					}
 		} catch(e) {
			if (debug) alert("Caught exception: " + e);
		}
		}		

			if (debug) alert("About to return!");
			return;
										}
									}
								});
		}
		// next try Dojo
		else if (typeof dojo != 'undefined')
		{
			if (debug) alert("Trying Dojo");
			if (typeof dojo.io == 'undefined')
			{
				dojo.require("dojo.io.*");
			}

			dojo.io.bind({
				url: newAdLoc,
				load: function (type, data, evt) {
							var newLoc = cnnad_parseResponse(data,id);
							newLoc = cnnad_preview(newLoc);
							if (newLoc)
							{
								if (debug) { debug.innerHTML += "<br>Updated " + elem.id + " with " + newLoc; }
								cnnad_adCache[newAdLoc] = newLoc;
								elem.src = newLoc;
							}
					}
			});

		}
		// neither worked, we just give up and not do anything
		else
		{
			// do nothing 
			if (debug) alert("No way to fetch " + newAdLoc);
		}
	}
}

function cnnad_parseResponse (resp, id)
{
	// chop off everything before callout marker
	var startMarker = "<!-- CALLOUT|";
	var endMarker = "|CALLOUT -->";
	var start = resp.indexOf(startMarker);
	var end = resp.indexOf(endMarker);
	var loc = null;
	
	if (start >= 0 && end > start)
	{
		loc = resp.substring(start + startMarker.length ,end);
	}

	if (loc)
	{
		return(loc + "&domId=" + id + "&page.allowcompete=yes");
	}
	else
	{
		// alert("Parsing failed!");
		return null;
	}
}

function cnnad_findAd (type, width, height)
{
	var ret = null;
	for (var i = 0; i < cnnad_adVault.length; i++)
	{
		var ad = cnnad_adVault[i];
		if (ad.getType() == type && ad.getHeight() == height && ad.getWidth() == width)
		{
			ret = ad.getUrl();
			break;
		}
	}
	return ret;
}

function cnnad_getDEAdHeadCookie( imageRef ) {
	if (typeof(cnnad_readCookie) != "undefined") {
		cnnDEadDEonCookie = cnnad_readCookie( 'adDEon' );
	}
	var newSrc = "http://gdyn." + cnnad_getTld(location.hostname) + "/1.1/1.gif?" + new Date().getTime();
	if ( !alreadySwappedDETargetImage && !cnnDEadDEonCookie) {
		imageRef.src = newSrc;
		alreadySwappedDETargetImage = true;
	}
}

function cnnad_registerAd (type, width, height, url)
{
	var ad = new cnnad_AdObject (null, width, height, type, url);
	cnnad_adVault[cnnad_adVault.length] = ad;
}

function cnnad_registerSpace (id, width, height)
{
	var ad = new cnnad_AdObject(id, width, height, null, null);
	cnnad_adIframes[cnnad_adIframes.length] = ad;
}

function cnnad_showAdByKey(adKey, iframeId) {
	cnnad_swapAd(iframeId, cnnad_adUrls[adKey], false);
}


// ----- THE CNN ADS OBJECT ----- //
function cnnad_AdObject (id,width,height,type,url)
{
	this.id = id;
	this.width = width;
	this.height = height;
	this.type = type;
	this.url = url;

	this.getId = function () { return this.id; };
	this.setId = function (id) { this.id = id };

	this.getWidth = function () { return this.width; };
	this.setWidth = function (width) { this.width = width; };

	this.getHeight = function () { return this.height; };
	this.setHeight = function (height) { this.height = height; };

	this.getType = function () { return this.type; };
	this.setType = function (type) { this.type = type; };

	this.getUrl = function () { return this.url; };
	this.setUrl = function (url) { this.url = url; };

	this.toString = function () { return "[AD|ID=" + this.id + "|WIDTH=" + this.width + "|HEIGHT=" + this.height + "]"; };
}
// ------ /CNN ADS OBJECT ----- //
