//
// Author Henning Busacker, Unilog Avinci
//
// 2005_07_27 henning.busacker@unilog.de
//
// File   msd_scriptlib.js   
// 
// Purpose: 
// For the use in the aktivgegenmigraene site
//
// Contents:
// navigation-highlight script
// Respective to the path of a html-page, the highlight-images of the navigation are set
//
// include stylesheet script
// Respective to the browser the right stylesheet is included
//
var trackurl="http://report.msd.de/MSDdeTrack/track?site=";

// the actual folder-structure
var folderlist=new Array("/wissenswertes_ueber_migraene/","/das_koennen_sie_tun/","/aktiv_gegen_migraene/","/service/","xxxxxxx","impressum","presse","wissen");
// the logical navigationstructure  (if different from the folderstructure)
var imagelist=new Array( "wissen","behandlung","aktiv","kontakt","meta_uebermsd","meta_impressum","meta_impressum_h","h_wissen","h_behandlung","h_aktiv","h_kontakt","meta_home");
// image-preload arrays
var buttons_in=new Array();
var buttons_out=new Array();
// imagepath
var gfxsrc = "/images/navi/";
// imagetype (gif, jpg, png ...)
var type = "gif";
// highlight extention
var highlight = "_hi";

// the path of the html-file (with folder structure)
var loc = window.location.pathname;
if (loc.indexOf("aktivFragebogen") != -1) {
	re = /aktivFragebogen/g;                //Create regular expression pattern.
	loc = loc.replace(re,"service");
}

var hl_position = -1;
var lastsuperpos=-1;
// Bullets fuer serviceboxen
var outimg= new Image();
outimg.src="/images/content/hohl_quadrat.gif";
var inimg=new Image();
inimg.src="/images/content/voll_quadrat.gif";

//--------------------------------------------------------------------------------------------------------------------
// set stylesheet
//--------------------------------------------------------------------------------------------------------------------

	document.open();
	document.write("<LINK rel='stylesheet' type='text/css' href='/css/msd.css'>");
	document.close();

//-----------------------------------------------------------------------------------------------------------------
// preload Images
//-----------------------------------------------------------------------------------------------------------------
for (i=0;i<(imagelist.length);i++){
	buttons_in[i]=new Image();
	buttons_out[i]=new Image();
	buttons_in[i].src=gfxsrc+imagelist[i]+highlight+"."+type;
	if (i<4 || i>6 && i<11)
		buttons_out[i].src="/images/tab.gif";
	else 
		buttons_out[i].src=gfxsrc+imagelist[i]+"."+type;
	
}


function loadimages(){
}


function change_over(i){ 
	document.images["button"+i].src=buttons_in[i].src; 
	if ((i != hl_position) && (hl_position!=-1)){
		if (document.images["button"+hl_position]) {
			document.images["button"+hl_position].src=buttons_out[hl_position].src;
		}
	}
} 

function change_out(i){ 
	document.images["button"+i].src=buttons_out[i].src; 
	if (hl_position!=-1 && document.images["button"+hl_position]) {
		document.images["button"+hl_position].src=buttons_in[hl_position].src;
	}
}
//---------------------------------------------------------------------------------------------------------------
// open pop-up window
//---------------------------------------------------------------------------------------------------------------
function open_popup(sUrl,width,heigth,scroll,x,y) {
	sTmp = "width=" + width + ",height=" + heigth + ",scrollbars=" + scroll + ",status=0" + ",left=" + x + ",top=" + y + ",resizable=no";
		
	if(!window.popWin)
	{
		window.popWin = window.open(sUrl,'popup',sTmp);
	}
    else if(window.popWin.closed)
	{
		window.popWin = window.open(sUrl,'popup',sTmp);
	}
    else
    {
		window.popWin.close();
		window.popWin = null;             
		window.popWin = window.open(sUrl,'popup',sTmp);
    }
	window.popWin.focus();
}
function litsearch(){
	var rbutton = "Internet";
	if (document.forms["literatur"].Source[0].checked){
		rbutton = "PubMed";
	}
	var param="http://62.132.145.51:8080/Main.asp?SearchString="+document.forms["literatur"].SearchString.value+"&StartYear="+document.forms["literatur"].StartYear.value+
"&EndYear="+document.forms["literatur"].EndYear.value+"&Source="+rbutton;
win = window.open(param, "popup", "width=800,height=600,resizable=yes,navigation=no,scrollbars=yes");
win.focus();
}
	
function pic_popup(pic,text,x,y,title,alt) {
	var wx=x+20;
	var wy=y+86;
	var pop=window.open('about:blank','pic_pop','height='+wy+',width='+wx+',menubar=no,resizable=no,scrollbars=no,status=no');
	pop.document.writeln('<html><head><title>'+title+'</title></head><body marginwidth="10" marginheight="10" topmargin="10" leftmargin="10">');
	pop.document.writeln('<div align="center" valign="top"><img src="'+pic+'" border="0" alt="'+alt+'" width="'+x+'" height="'+y+'"></div>');
	pop.document.writeln('<img src="/images/tab.gif" border="0" alt="" height="8" width="8"><br>');
	pop.document.writeln('<table border="0" width="'+x+'" bgcolor="#dbd9d8" cellspacing="0" cellpadding="4"><tr><td style="background-color:#dbd9d8;font-family:Verdana,Arial,Helvetica;font-size:9px;line-height:12px;color:#000000;">'+text+'</td></tr></table>');
	pop.document.writeln('<img src="/images/tab.gif" border="0" alt="" height="8" width="8"><br>');
	pop.document.writeln('<table border="0" width="'+x+'"><tr><td bgcolor="#ffffff" align="left" width="50%"><a href="javascript:window.print();"><img src="/images/content/drucken_button.gif" border="0"></a></td><td align="right" width="50%"><a href="" onclick="window.close();"><img src="/images/content/schliessen.gif" border="0"></a></td></tr></table>');
	pop.document.writeln('</body></html>');
	pop.document.close();
	pop.focus();
}

function swap_service_on(i) {
	document.images[i].src=inimg.src;
}
function swap_service_off(i) {

	document.images[i].src=outimg.src;
}

function metanavi(text,link,n,w) {
 if (loc.indexOf("/"+text.toLowerCase()+"/")==-1) {
 	return('<a href="'+link+'" onMouseover="change_over('+n+');" onMouseout="change_out('+n+');"><img src="/images/navi/'+text+'.gif" border="" id="button'+n+'"  name="button'+n+'" height="31" width="'+w+'"></a>');	
 } else {
 	return('<span class="metanavi"><img src="/images/navi/'+text+'_hi.gif" border="0"></span>');	
 }
}
//***************************************************************
// Read cookies
//***************************************************************
function getCookie(name) {
	var start = document.cookie.indexOf(name+"=");
	var len = start+name.length+1;
	if ((!start) && (name != document.cookie.substring(0,name.length))) return null;
	if (start == -1) return null;
	var end = document.cookie.indexOf(";",len);
	if (end == -1) end = document.cookie.length;
	return unescape(document.cookie.substring(len,end));
}


//**************************************************************
// Mailto-Encryption
//**************************************************************
function UnCryptMailto( s )
{
	var n = 0;
	var r = "";
	for( var i = 0; i < s.length; i++)
	{
		n = s.charCodeAt( i );
		if( n >= 8364 )
		{
			n = 128;
		}
		r += String.fromCharCode( n - 1 );
	}
	return r;
}

function linkTo_UnCryptMailto( s )
{
	location.href=UnCryptMailto( s );
}


//**************************************************************
// Tracking
//**************************************************************
function msdtrack() {
	i=window.location.search.indexOf("referrer=");
	amp=window.location.search.indexOf("&",i);
	if (amp < 0) { 
 		amp=window.location.search.length;
	}
 	referrer="";
 
	if (i!=-1) {
		referrer="&referrer="+window.location.search.substring(i+9,amp);
	} else {
	 	if ((window.document.referrer != '') && (window.document.referrer.indexOf(window.document.location.host) == -1)) {
			if (window.document.referrer.search(/\.muc-prj\.|\.la-s\.de|-ut\.merck\.com/) == -1) {
				e=/^http[s]?:\/\/(.*?)\//
				e.exec(window.document.referrer);
				referrer="&referrer="+RegExp.$1;
			}
		}
	}

	unc=getCookie('unique_visitor');
	img=new Image();
	img.src=trackurl+window.location.host+"&url="+loc+"&unc="+unc+referrer;
}
// Tracking aufrufen
	msdtrack();


//**************************************************************
// Flash Including
//**************************************************************

// Adobe-Code
function AC_AddExtension(src, ext)
{
  if (src.indexOf('?') != -1)
    return src.replace(/\?/, ext+'?'); 
  else
    return src + ext;
}

function AC_Generateobj(objAttrs, params, embedAttrs) 
{ 
  var str = '<object ';
  for (var i in objAttrs)
    str += i + '="' + objAttrs[i] + '" ';
  str += '>';
  for (var i in params)
    str += '<param name="' + i + '" value="' + params[i] + '" /> ';
  str += '<embed ';
  for (var i in embedAttrs)
    str += i + '="' + embedAttrs[i] + '" ';
  str += ' ></embed></object>';

  document.write(str);
}

function AC_FL_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".swf", "movie", "clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
     , "application/x-shockwave-flash"
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_SW_RunContent(){
  var ret = 
    AC_GetArgs
    (  arguments, ".dcr", "src", "clsid:166B1BCA-3F9C-11CF-8075-444553540000"
     , null
    );
  AC_Generateobj(ret.objAttrs, ret.params, ret.embedAttrs);
}

function AC_GetArgs(args, ext, srcParamName, classid, mimeType){
  var ret = new Object();
  ret.embedAttrs = new Object();
  ret.params = new Object();
  ret.objAttrs = new Object();
  for (var i=0; i < args.length; i=i+2){
    var currArg = args[i].toLowerCase();    

    switch (currArg){	
      case "classid":
        break;
      case "pluginspage":
        ret.embedAttrs[args[i]] = args[i+1];
        break;
      case "src":
      case "movie":	
        args[i+1] = AC_AddExtension(args[i+1], ext);
        ret.embedAttrs["src"] = args[i+1];
        ret.params[srcParamName] = args[i+1];
        break;
      case "onafterupdate":
      case "onbeforeupdate":
      case "onblur":
      case "oncellchange":
      case "onclick":
      case "ondblClick":
      case "ondrag":
      case "ondragend":
      case "ondragenter":
      case "ondragleave":
      case "ondragover":
      case "ondrop":
      case "onfinish":
      case "onfocus":
      case "onhelp":
      case "onmousedown":
      case "onmouseup":
      case "onmouseover":
      case "onmousemove":
      case "onmouseout":
      case "onkeypress":
      case "onkeydown":
      case "onkeyup":
      case "onload":
      case "onlosecapture":
      case "onpropertychange":
      case "onreadystatechange":
      case "onrowsdelete":
      case "onrowenter":
      case "onrowexit":
      case "onrowsinserted":
      case "onstart":
      case "onscroll":
      case "onbeforeeditfocus":
      case "onactivate":
      case "onbeforedeactivate":
      case "ondeactivate":
      case "type":
      case "codebase":
        ret.objAttrs[args[i]] = args[i+1];
        break;
      case "width":
      case "height":
      case "align":
      case "vspace": 
      case "hspace":
      case "class":
      case "title":
      case "accesskey":
      case "name":
      case "id":
      case "tabindex":
        ret.embedAttrs[args[i]] = ret.objAttrs[args[i]] = args[i+1];
        break;
      default:
        ret.embedAttrs[args[i]] = ret.params[args[i]] = args[i+1];
    }
  }
  ret.objAttrs["classid"] = classid;
  if (mimeType) ret.embedAttrs["type"] = mimeType;
  return ret;
}