 /*
	Written-By:	doktype, Senior Web Developer
	Create-Date:	18-01-2000
	Revisions:
		PA:	26-08-2000
		PA: 02-02-2001	minor tweak
		PA: 05-02-2001	added error logging routine
	Filename:	warpto.js
	Description:
		Generates a cross website/domain ("Client Side Include") drop down
		box of websites that can be customised for individual websites via HTML or CSS
	Notes:
		the "ID" name for the dropdown is "#warpdrive"
*/

/* This function is meant to check is flash is enabled, but does not work correctly yet. */
function MM_checkPlugin(plgIn) { //v3.0
	var ok=false; document.MM_returnValue = false;
	var expdate = new Date();
	var proto = location.protocol;
	if (proto == "http:") { var dummy = new Image(); }
  
	with (navigator)
		if (appName.indexOf('Microsoft')==-1) ok=(plugins && plugins[plgIn]);
		else if (appVersion.indexOf('3.1')==-1) { //not Netscape or Win3.1
		if (plgIn.indexOf("Flash")!=-1 && window.MM_flash!=null) ok=window.MM_flash;
		else if (plgIn.indexOf("Director")!=-1 && window.MM_dir!=null) ok=window.MM_dir;
		else ok; //=autoGo;
		}
		if (ok) {
		return '&flash=enabled';
		} else {
		return '&flash=disabled';
	}
}	

/* This function is intended to give 'us' user statistics */
function stats() {
	var bV=parseInt(navigator.appVersion);
	NS4=(document.layers) ? true : false;
	IE4=((document.all)&&(bV>=4))?true:false;
	ver4 = (NS4 || IE4) ? true : false;
	
	if (ver4) {
		var expdate = new Date();

		var proto = location.protocol;
		if (proto == "http:") { var dummy = new Image(); }
		var deep = 0;

		if (NS4) { colourDepth = screen.pixelDepth; }
		if (IE4) { colourDepth = screen.colorDepth; }

		if (NS4) { browserHeight = screen.pixelDepth; }
		if (IE4) { browserHeight = screen.colorDepth; }

		if (proto == "http:") { dummy.src = 'http://warp.prnewswire.co.uk/cgi/metrics?screen.width='+screen.width+'&screen.height='+screen.height+'&colourDepth='+colourDepth+'&java='+navigator.javaEnabled()+'&flash='+MM_checkPlugin('Shockwave Flash')+'&browser='+escape(navigator.appName)+'&appver='+escape(navigator.appVersion)+'&os='+escape(navigator.platform)+'&site='+escape(location.protocol+'//'+location.hostname)+'&screenavheight='+screen.availHeight+'&screenavwidth='+screen.availWidth; }
	}
}

function makeitso(URL) {
	if (URL != "") {
		logGotourl(URL);
		top.location = URL;
	}
} 

document.write('<form name="warpto">'+
'<span id="warpdrive" >'+
'<select id="warpdrive" name="site" onChange="makeitso(document.warpto.site.options[document.warpto.site.selectedIndex].value)">'+
'	<option value="">PR Newswire web sites'+
'	<option value="">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;----- MEDIA -----'+
'	<option value="http://www.prnewswire.com/media/">&nbsp;Media Site'+
'	<option value="http://www.profnet.com/">&nbsp;ProfNet'+
'	<option value="">&nbsp;---- INFORMATION ----'+
'	<option value="http://www.prnewswire.com.hk/">&nbsp;Asia'+
'	<option value="http://www.prnewswire.com.br/">&nbsp;Brazil'+
'	<option value="http://www.newswire.ca/">&nbsp;Canada'+
'	<option value="http://www.prnewswire.co.uk/">&nbsp;Europe'+
'	<option value="http://www.prnewswire.com/">&nbsp;North America'+
'	<option value="http://www.prnewswire.co.uk/disclose/">&nbsp;Disclose'+
'	<option value="http://ewatch.prnewswire.co.uk/">&nbsp;eWatch (UK)'+
'	<option value="http://www.ewatch.com/">&nbsp;eWatch (US)'+
'	<option value="http://www.mediainsider.com/">&nbsp;Media Insider'+
'	<option value="http://mediamanager.prnewswire.co.uk/">&nbsp;MediaManager'+
'	<option value="http://www.prnewswire.com/mediatlas/">&nbsp;Online MEDIAtlas&#153;'+
'	<option value="">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;----- CLIENTS -----'+
'	<option value="http://www.prndirect.com/">&nbsp;PRN Direct'+
'	<option value="">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;----- NEWS -----'+
'	<option value="http://www.prnewswire.com.hk/">&nbsp;Asia'+
'	<option value="http://www.prnewswire.com.br/">&nbsp;Brazil'+
'	<option value="http://www.newswire.ca/">&nbsp;Canada'+
'	<option value="http://www.prnewswire.co.uk/news/">&nbsp;Europe'+
'	<option value="http://www.cyperus.fr/">&nbsp;France'+
'	<option value="http://www.prnewswire.co.il/">&nbsp;Israel'+
'	<option value="http://www.prnewswire.com/news/">&nbsp;North America'+
'	<option value="http://www.prnewswire.co.za/">&nbsp;South Africa'+
'	<option value="http://www.cyperus.es/">&nbsp;Spain'+
'</select>'+
'</span>'+
'</form>'+
'\n');
stats();

/* Error logging routine */

jserror_count = 0;
function reportError(msg,url,line) {
  par_url = parent.location.href;
  par_url = (par_url == location.href) ? "no parent" : par_url;
  query_string = "http://www.oit.net/cgi-bin/jserrors.cgi"
   + "?url=" + escape(location.href)
   + "&parent=" + escape(par_url)
   + "&referrer=" + escape(document.referrer)
   + "&browser=" + escape(navigator.appName + " "
   + navigator.appVersion)
   + "&msg=" + escape(msg)
   + "&line=" + escape(line)
   + "&count=" + (++jserror_count);

  if (document.images) {
   reporter = new Image();
   reporter.src = query_string;
  }
  return true;
}

// window.onerror = reportError;

/* Goto_url logging */

function logGotourl(URL) {
  par_url = parent.location.href;
  par_url = (par_url == location.href) ? "no parent" : par_url;
  var proto = location.protocol;
  if (proto == "http:") { query_string = "http://warp.prnewswire.co.uk/cgi-bin/goto_url" }
	else { query_string = "https://secure.prnewswire.co.uk/cgi-bin/goto_url" }
   + "?" + escape(location.href)
   + "&to=" + escape(URL);
   
  if (document.images) {
   reporter = new Image();
   reporter.src = query_string;
  }
  return true;
}
