function getCookie(name){
  var cname = name + "=";
  var dc = document.cookie;
  if (dc.length > 0) {
    begin = dc.indexOf(cname);
    if (begin != -1) {
      begin += cname.length;
      end = dc.indexOf(";", begin);
      if (end == -1) end = dc.length;
        return unescape(dc.substring(begin, end));
    }
  }
  return null;
}

function setCookie(value, expires, path, domain, secure)
{
	path='/';
	var valor=getCookie('marcadores');
	if (valor!=null)
		valor+=escape(value)+'#';
	else
		valor=escape(value)+'#';
  document.cookie = 'marcadores' + "=" + valor + "; expires=Fri, 14 Jan 2011 00:00:01 UTC" +
  ((path == null) ? "" : "; path=" + path) +
  ((domain == null) ? "" : "; domain=" + domain) +
  ((secure == null) ? "" : "; secure");
}
function delCookie (name,path,domain) {
	path='/';
  if (getCookie(name)) {
    document.cookie = name + "=" +
    ((path == null) ? "" : "; path=" + path) +
    ((domain == null) ? "" : "; domain=" + domain) +
    "; expires=Thu, 01-Jan-70 00:00:01 GMT";
  }
}

function marca(titulo,fichero)
{
	var data=getCookie('marcadores');
	var repetido=0;
	if (data!=null)
	{
		var p=data.split('#');
		var cad='';

		for (x=0;x<p.length;x++)
		{
			var a=p[x].split('@');
			if(a[1]==fichero)
				repetido=1;
		}
	}
	if(!repetido)
	{
		var dt; var mt; var yt;
		Today = new Date();
		dt = Today.getUTCDate();
		mt = Today.getUTCMonth();
		yt = Today.getUTCFullYear();
		ht = Today.getUTCHours()+1;
		mit = Today.getUTCMinutes();
		if (mit<10)
			mit='0'+mit;
		fecha=dt+'/'+mt+'/'+yt+', '+ht+':'+mit;
		fichero=fichero.split('#');
		fichero=fichero[0];
		//alert('Titulo: '+titulo+'    Fichero: '+fichero);
		setCookie(titulo+'@'+fichero+'@'+fecha);
		//alert('La página se ha marcado correctamente.');
	}
	document.getElementById('div_marcaOK').style.display='inline';
	setTimeout("document.getElementById('div_marcaOK').style.display='none';",2000);
}

function desmarca(fichero)
{
	var data=getCookie('marcadores');
	var cad='';
	var p=data.split('#');
	for (var x=0;x<p.length-1;x++)
	{
		var a=p[x].split('@');
		if (a[1]!=fichero)
			cad+=p[x]+'#';
	}
	delCookie('marcadores');
	setCookie(cad);
	window.history.go(0);
}

function check()
{
	if(window.parent.destino!='')
	{
		t=window.parent.destino;
		window.parent.destino='';
		window.location.href=t;
	}
}

function lista_marcadores()
{
	setInterval('check()',250);
	var data=getCookie('marcadores');
	var cad='';
	if (data!=null)
	{
		var p=data.split('#');

		for (x=0;x<p.length;x++)
		{
			var a=p[x].split('@');
			if (a[0]=='' || a[1]=='') continue;
			cad+="<a href='"+a[1]+"' class='amarcador' title='Click para acceder a esta página'> • "+a[0];
			if(a[2])
				cad+=' ('+a[2]+')&nbsp;';
			cad+='</a>';
			cad+="<a style='color:#0000FF;font.size:9px;' href='javascript:void(null)' onclick=\"desmarca('"+a[1]+"')\">Eliminar marcador</a>";
	//		cad+="-> <a href='mailto:?subject=SIE 2005: "+a[0]+"&body=Página recomendada: http://"+escape(a[1])+"' target='_blank' class='amarcador'>enviar a un amigo</a>"
			cad+='<br />';
		}
	}
	if (cad=='')
		cad='Actualmente no tiene marcada ninguna página';
	document.getElementById('contenido').innerHTML=cad;

}

function lista_pdf()
{
	setInterval('check()',250);
}

function imprime()
{
	return;
}