// Widget de Pesquisa nas Bibliotecas 
 
// JS Function to decode B64 - by Tyler Akins
var ua = navigator.userAgent.toLowerCase();
if (ua.indexOf(" chrome/") >= 0 || ua.indexOf(" firefox/") >= 0 || ua.indexOf(' gecko/') >= 0) {
	var BE_forense_StringMaker = function () {
		this.str = "";
		this.length = 0;
		this.append = function (s) {
			this.str += s;
			this.length += s.length;
		}
		this.prepend = function (s) {
			this.str = s + this.str;
			this.length += s.length;
		}
		this.toString = function () {
			return this.str;
		}
	}
} else {
	var BE_forense_StringMaker = function () {
		this.parts = [];
		this.length = 0;
		this.append = function (s) {
			this.parts.push(s);
			this.length += s.length;
		}
		this.prepend = function (s) {
			this.parts.unshift(s);
			this.length += s.length;
		}
		this.toString = function () {
			return this.parts.join('');
		}
	}
}

function BE_forense_fireClickEvent(objetoClicavel){
  if (document.all){ 
    objetoClicavel.fireEvent("onclick"); 
    } else {
    var clickEvent = window.document.createEvent("MouseEvent");
    clickEvent.initEvent("click", false, true);
    objetoClicavel.dispatchEvent(clickEvent);
  }
}  

function BE_forense_retornaValorVetor(vetor, name){
  var i;
  var aux;
  
  for (i=0;i<vetor.length;i++){
    aux = vetor[i].split("=");
	  if (aux[0] == name) return aux[1];
  }
  return "";
}

var keyStr = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=";

function BE_forense_encode64(input) {
	var output = new BE_forense_StringMaker();
	var chr1, chr2, chr3;
	var enc1, enc2, enc3, enc4;
	var i = 0;
	while (i < input.length) {
		chr1 = input.charCodeAt(i++);
		chr2 = input.charCodeAt(i++);
		chr3 = input.charCodeAt(i++);
		enc1 = chr1 >> 2;
		enc2 = ((chr1 & 3) << 4) | (chr2 >> 4);
		enc3 = ((chr2 & 15) << 2) | (chr3 >> 6);
		enc4 = chr3 & 63;
		if (isNaN(chr2)) {
			enc3 = enc4 = 64;
		} else if (isNaN(chr3)) {
			enc4 = 64;
		} 
		output.append(keyStr.charAt(enc1) + keyStr.charAt(enc2) + keyStr.charAt(enc3) + keyStr.charAt(enc4));
   }
   return output.toString();
}

function BE_forense_decode64(input) {
	var output = new BE_forense_StringMaker();
	var chr1, chr2, chr3;
	var enc1, enc2, enc3, enc4;
	var i = 0;
	// remove all characters that are not A-Z, a-z, 0-9, +, /, or =
	input = input.replace(/[^A-Za-z0-9\+\/\=]/g, "");
	while (i < input.length) {
		enc1 = keyStr.indexOf(input.charAt(i++));
		enc2 = keyStr.indexOf(input.charAt(i++));
		enc3 = keyStr.indexOf(input.charAt(i++));
		enc4 = keyStr.indexOf(input.charAt(i++));
		chr1 = (enc1 << 2) | (enc2 >> 4);
		chr2 = ((enc2 & 15) << 4) | (enc3 >> 2);
		chr3 = ((enc3 & 3) << 6) | enc4;
		output.append(String.fromCharCode(chr1));
		if (enc3 != 64) { output.append(String.fromCharCode(chr2)); }
		if (enc4 != 64) { output.append(String.fromCharCode(chr3)); }
	}
	return output.toString();
}

function BE_forense_carregaWidget(nomeDiv){
  var htmlWidget = "PGRpdiBjbGFzcz0iQkUtZm9yZW5zZS13aWRnZXQiPgogIDwhLS1iYXJyYSBkZSBwZXNxdWlzYS0tPgogIDxkaXYgY2xhc3M9IkJFLWZvcmVuc2Utd2lkZ2V0LXRvcG8iPgogICAgPGEgaHJlZj0iaHR0cDovL3d3dy5iaWJsaW90ZWNhZm9yZW5zZS5jb20uYnIiIHRhcmdldD0iX2JsYW5rIiB0aXRsZT0iRm9yZW5zZSAtIENsaXF1ZSBlIGNvbmhl52EhIj48aW1nIHNyYz0iaHR0cDovL2ZvcmVuc2UuYmlibGlvdGVjYWVsZXRyb25pY2EuY29tLmJyL3dpZGdldC9pbWcvbG9nby1mb3JlbnNlLmpwZyIgYWx0PSJGb3JlbnNlIC0gQ2xpcXVlIGUgY29uaGXnYSEiIGNsYXNzPSJCRS1mb3JlbnNlLWZsIiAvPjwvYT4KICAgIDxkaXYgY2xhc3M9IkJFLWZvcmVuc2UtZnIiPgogICAgICA8aW1nIHNyYz0iaHR0cDovL2ZvcmVuc2UuYmlibGlvdGVjYWVsZXRyb25pY2EuY29tLmJyL3dpZGdldC9pbWcvY29ybmVyLmpwZyIgYWx0PSIiIGNsYXNzPSJCRS1mb3JlbnNlLWZsIiAvPgogICAgICA8aW5wdXQgaWQ9IkJFLWZvcmVuc2UtY2FtcG9wZXNxdWlzYSIgdHlwZT0idGV4dCIgdmFsdWU9IlBlc3F1aXNlIG5vIGFjZXJ2byBkZSBlLWJvb2tzIiBjbGFzcz0iQkUtZm9yZW5zZS1mbCIgc3R5bGU9IndpZHRoOjUyMHB4OyIgb25mb2N1cz0iaWYodGhpcy52YWx1ZT09J1Blc3F1aXNlIG5vIGFjZXJ2byBkZSBlLWJvb2tzJyl0aGlzLnZhbHVlPScnOyIgb25ibHVyPSJpZih0aGlzLnZhbHVlPT0nJyl0aGlzLnZhbHVlPSdQZXNxdWlzZSBubyBhY2Vydm8gZGUgZS1ib29rcyc7IiBvbmtleXByZXNzPSJpZigod2luZG93LmV2ZW50P2V2ZW50LmtleUNvZGU6ZXZlbnQud2hpY2gpPT0xMyl7IEJFX2ZvcmVuc2VfZmlyZUNsaWNrRXZlbnQoZG9jdW1lbnQuZ2V0RWxlbWVudEJ5SWQoJ0JFLWZvcmVuc2UtcGVzcXVpc2FyJykpOyB9IiAvPgogICAgICA8c3BhbiBjbGFzcz0iQkUtZm9yZW5zZS1mbCBidG4tbGltcGFyIiBvbmNsaWNrPSJ2YXIgY2FtcG89ZG9jdW1lbnQuZ2V0RWxlbWVudEJ5SWQoJ0JFLWZvcmVuc2UtY2FtcG9wZXNxdWlzYScpO2NhbXBvLnZhbHVlPScnO2NhbXBvLmZvY3VzKCk7Ij48L3NwYW4+CiAgICAgIDxzcGFuIGlkPSJCRS1mb3JlbnNlLXBlc3F1aXNhciIgY2xhc3M9IkJFLWZvcmVuc2UtZmwgYnRuLWJ1c2NhciIgb25jbGljaz0iQkVfZm9yZW5zZV9pbmljaWFQZXNxdWlzYShkb2N1bWVudC5nZXRFbGVtZW50QnlJZCgnQkUtZm9yZW5zZS1jYW1wb3Blc3F1aXNhJykudmFsdWUsIDAsIDcpOyI+PC9zcGFuPgogICAgICA8c3BhbiBpZD0iQkUtZm9yZW5zZS1jYXJyZWdhbmRvIiBjbGFzcz0iQkUtZm9yZW5zZS1mbCBidG4tbG9hZGluZyIgc3R5bGU9ImRpc3BsYXk6bm9uZSI+PGltZyBzcmM9Imh0dHA6Ly9mb3JlbnNlLmJpYmxpb3RlY2FlbGV0cm9uaWNhLmNvbS5ici93aWRnZXQvaW1nL2xvYWRlci5naWYiIGFsdD0iIiAvPjwvc3Bhbj4KICAgICAgPGJyIGNsYXNzPSJCRS1mb3JlbnNlLWNsZWFyIiAvPgogICAgPC9kaXY+CiAgICA8YnIgY2xhc3M9IkJFLWZvcmVuc2UtY2xlYXIiIC8+CiAgPC9kaXY+CiAgCiAgPGRpdiBpZD0iQkUtZm9yZW5zZS1hbGVydGEiIGNsYXNzPSJCRS1mb3JlbnNlLWFsZXJ0YSIgc3R5bGU9ImRpc3BsYXk6bm9uZSI+CiAgICA8aW1nIHNyYz0iaHR0cDovL2ZvcmVuc2UuYmlibGlvdGVjYWVsZXRyb25pY2EuY29tLmJyL3dpZGdldC9pbWcvYWxlcnRhLnBuZyIgYWx0PSJhbGVydGEiIGNsYXNzPSJCRS1mb3JlbnNlLWZsIiAvPgogICAgPHAgY2xhc3M9IkJFLWZvcmVuc2UtZmwiPk5lbmh1bWEgb2JyYSBlbmNvbnRyYWRhLCBwZXNxdWlzZSBub3ZhbWVudGUgdXRpbGl6YW5kbyBvdXRybyB0ZXJtby48L3A+CiAgICA8YnIgY2xhc3M9IkJFLWZvcmVuc2UtY2xlYXIiIC8+CiAgPC9kaXY+CiAgCiAgPCEtLeFyZWEgZGUgcmVzdWx0YWRvLS0+CiAgPGRpdiBpZD0iQkUtZm9yZW5zZS13aWRnZXQtcmVzdWx0YWRvIiBjbGFzcz0iQkUtZm9yZW5zZS13aWRnZXQtZnJhbWUiIHN0eWxlPSJkaXNwbGF5Om5vbmU7Ij4KICAgIDxpbnB1dCB0eXBlPSJoaWRkZW4iIGlkPSJCRS1mb3JlbnNlLXJlc3VsdGFkby1jYXJyZWdhZG9zIiB2YWx1ZT0iMCIgLz4KICAgIDxkaXYgaWQ9IkJFLWZvcmVuc2UtcmVzdWx0YWRvIj48L2Rpdj4KICAgIDxkaXYgaWQ9IkJFLWZvcmVuc2UtcmVzdWx0YWRvLWRpdmlzb3IiIHN0eWxlPSJkaXNwbGF5Om5vbmU7Ij4KICAgICAgPGJyIGNsYXNzPSJCRS1mb3JlbnNlLWNsZWFyIiAvPgogICAgICA8IS0tZGl2aXNvci0tPgogICAgICA8aHIgY2xhc3M9IkJFLWZvcmVuc2UtZGl2aXNvciIgLz4KICAgICAgPGlucHV0IGlkPSJCRS1mb3JlbnNlLW1haXNyZXN1bHRhZG9zIiB0eXBlPSJidXR0b24iIHZhbHVlPSJDbGlxdWUgYXF1aSBwYXJhIGV4aWJpciBtYWlzIHJlc3VsdGFkb3MiIGNsYXNzPSJCRS1mb3JlbnNlLWRpdmlzb3IiIC8+CiAgICA8L2Rpdj4KICA8L2Rpdj4KICAKPC9kaXY+CjxkaXYgY2xhc3M9IkJFLWZvcmVuc2UtYXNzaW5hdHVyYSI+PGEgaHJlZj0iaHR0cDovL3d3dy5qdXJpZC5jb20uYnIiIHRhcmdldD0iX2JsYW5rIiB0aXRsZT0iRGVzZW52b2x2aWRvIHBvciBKdXJpZCBQdWJsaWNh5/VlcyBFbGV0cvRuaWNhcyI+SnVyaWQ8L2E+PC9kaXY+";
  var divDestino = document.getElementById(nomeDiv);
  
  // carregamento da folha de estilos
  var styleSheet = document.createElement("link");
  styleSheet.id = "BE-forense-css";
  styleSheet.rel = "stylesheet";
  styleSheet.type = "text/css";
  styleSheet.href = "http://forense.bibliotecaeletronica.com.br/widget/?css&pl=7";
  styleSheet.media = "all";
//  document.lastChild.firstChild.appendChild(styleSheet);

  var _css = document.getElementById("BE-forense-css");
  if (_css) document.getElementsByTagName('head')[0].removeChild(_css);    

  // Insert <script> into DOM  
  document.getElementsByTagName('head')[0].appendChild(styleSheet); 
   
  if (!divDestino) return false;
  
  divDestino.innerHTML = BE_forense_decode64(htmlWidget);
}

// Funções de pesquisa
function BE_forense_iniciaPesquisa(pesquisa, atual, qtd){
  if (isNaN(atual)) atual = 0;
  if (isNaN(qtd)) qtd = 4;

  var bp=document.getElementById('BE-forense-pesquisar');
  var bc=document.getElementById('BE-forense-carregando');

  bp.style.display="none";  
  bc.style.display="";

  var _id = null;
  var _script = document.createElement('script');
  _script.setAttribute('type', 'text/javascript');
  _script.setAttribute('src', 'http://forense.bibliotecaeletronica.com.br/widget/?json&e=' + BE_forense_encode64(pesquisa) + '&atual=' + atual + '&qtd=' + qtd);
  _script.setAttribute('id', '_id');

  _id = document.getElementById('_id');  
  if(_id) document.getElementsByTagName('head')[0].removeChild(_id);    

  // Insert <script> into DOM  
  document.getElementsByTagName('head')[0].appendChild(_script); 
}

function BE_forense_pesquisaCallBack(r){
 
  var v = new Array();
  for (i=0;i<r.length;i++) v[v.length] = r[i][0] + "=" + r[i][1];

  var total = v[0];
  total = total.split("=");
  var primeira = v[1];
  primeira = primeira.split("=");

  var d=document.getElementById('BE-forense-widget-resultado');
  var dr=document.getElementById('BE-forense-resultado');
  var dd=document.getElementById('BE-forense-resultado-divisor');
  var bmr=document.getElementById('BE-forense-maisresultados');
  var rc=document.getElementById('BE-forense-resultado-carregados');
  var da=document.getElementById('BE-forense-alerta');
  var bp=document.getElementById('BE-forense-pesquisar');
  var bc=document.getElementById('BE-forense-carregando');
  var cp=document.getElementById('BE-forense-campopesquisa');

  var pesquisa = cp.value.replace('"', ''); 

  bp.style.display="";  
  bc.style.display="none";

  if (total[1] <= 0){
    dr.innerHTML = "";
    d.style.display="none";
    da.style.display="";
    return false;
  }
  da.style.display="none"; 

  if (parseInt(primeira[1]) <= 0){
    d.style.display = "";
    dr.innerHTML = "";
    var ul = document.createElement('ul');
    ul.className = "BE-forense-lista";
    ul.id="BE-forense-lista-resultado";
    dr.appendChild(ul);
    } else {
    ul=document.getElementById('BE-forense-lista-resultado');
  }
  rc.value = parseInt(rc.value) + (v.length-2);

  var primeiro = "";
  for(i=2;i<v.length;i++){
    var o=v[i];
    o=o.split("=");
    
    var li=document.createElement('li');
    li.className = "BE-forense-itemlista";
    li.id="forense_item_" + (parseInt(rc.value) + (i-2));
    if (primeiro=="")primeiro=li.id;
    li.innerHTML = '<a href="https://secure.jurid.com.br/bibliotecaforense/?IDOBRA=' + o[0] + '&PALAVRA=' + pesquisa + '" target="blank"><img src="https://secure.jurid.com.br/bibliotecaforense/cgi_obras/capas/' + o[0] + '_135x193.jpg" height="128" width="90"></a>';
    ul.appendChild(li);
  }
        
  if (total[1] > parseInt(rc.value)){    
    dd.style.display="";
    bmr.onclick = function(){ BE_forense_iniciaPesquisa(document.getElementById('BE-forense-campopesquisa').value, parseInt(primeira[1])+parseInt(rc.value), 7); } //(v.length-2)
    } else {
    dd.style.display="none";
  }
  
  document.getElementById(primeiro).scrollIntoView(false);
}

var _onLoadforense = window.onload;
if (typeof(window.onload) != 'function'){
  window.onload = BE_forense_carregaWidget('forense');
  } else {
  window.onload = function(){ 
    if (_onLoadforense) {
      _onLoadforense(); 
    }
    BE_forense_carregaWidget('forense');
  }
}