function IpLookup() {
  var jsurl = '/geo/?by_ip=1&ve=1';
  var s = document.createElement( "script" );
  s.src = jsurl;
  s.type = "text/javascript";
  document.getElementsByTagName( "head" )[0].appendChild( s );
}
function GeoLookup() {
  var loc = document.getElementById('geolookup').value;
  var jsurl = '/geo/?ve=1&loc=' + escape(loc) + '&s=1';
  var s = document.createElement( "script" );
  s.src = jsurl;
  s.type = "text/javascript";
  document.getElementsByTagName( "head" )[0].appendChild( s );
}

var URL_GETFILE_CGI = "/cgi-bin/proxy.pl";
function _getInitialUrl(moved) {
  var newurl = URL_GETFILE_CGI;
//  var distOffset = document.location.search.indexOf("dist=") + "dist=".length;
//  alert(distOffset);
//  if (distOffset > 0) {
//     newurl = newurl + '&dist=' + document.location.search.substring(distOffset);
//  }
  var pOffset = 0;
  if (document.location.search.indexOf("p=") > 0 ) {
    pOffset = document.location.search.indexOf("p=") + "p=".length;
  }
  if (!moved && (pOffset < 1 || document.location.search.substring(pOffset).length < 1)) {
     return;
  }
  var addon = '?';
  if (pOffset && document.location.search.substring(pOffset)) {
    newurl = newurl + addon + 'p=' + unescape(document.location.search.substring(pOffset));
    addon = '&';
  }
  if (map && moved) {
    newurl = newurl + addon + 'lat=' + map.GetCenterLatitude() + '&long=' + map.GetCenterLongitude();
    _by_point = 1;
  }
  newurl = newurl + '&start=' + c_start + '&r=' + Math.random();
//alert(newurl);
  _Loaded = 1;
  return newurl; 
}
function NextSet(moved) {
  var pOffset = document.location.search.indexOf("p=") + "p=".length;
  if (!moved && (pOffset < 1 || document.location.search.substring(pOffset).length < 1)) {
     return;
  }
  parse_page(_getInitialUrl(moved));
}

function parse_page(url) {
  if (!url) {
    return;
  }
  var xmlhttp = false;
  var use_msie = 0;
  if (window.XMLHttpRequest) {
    xmlhttp = new XMLHttpRequest();
    xmlhttp.overrideMimeType('text/xml');
  }
  else if (window.ActiveXObject) {
    use_msie = 1;
    xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
  }
  xmlhttp.open('GET', url, true);
  xmlhttp.onreadystatechange = function() {
    if (xmlhttp.readyState == 4 && xmlhttp.status == 200) {
       var response = '';
       var items = '';
       var xmlDoc = '';
       if (use_msie) {
         xmlDoc = new ActiveXObject("Microsoft.XMLDOM");
         xmlDoc.async = false;
         xmlDoc.loadXML(xmlhttp.responseText);
         items = xmlDoc.getElementsByTagName("item");
       }
       else {
	 response = xmlhttp.responseXML.documentElement;
         items = response.getElementsByTagName("item");
       }
       if (!items.length) {
          alert("Not found in GeoURL.org DB!\nTry adding it at http://geourl.org/add.html");
	  return;
       }
       if (use_msie) {
	 if (!_by_point) {
            SetMap(items.item(0).getElementsByTagName("geourl:latitude").item(0).text,
		   items.item(0).getElementsByTagName("geourl:longitude").item(0).text, 
		   13);
	 }
         document.title = xmlDoc.getElementsByTagName("channel").item(0).getElementsByTagName("title").item(0).text;
       }
       else {
         if (!_by_point) {
	    SetMap(items.item(0).getElementsByTagName("latitude").item(0).firstChild.data,
		   items.item(0).getElementsByTagName("longitude").item(0).firstChild.data,
		   13);
	 }
         document.title = response.getElementsByTagName("title").item(0).firstChild.data;
       }
       for (var i = 0; i < items.length; i++) {
          var mylink = '';
	  var mydesc = '';
	  var mylat = '';
  	  var mylong = '';
          if (use_msie) {
	    mylink = items.item(i).getElementsByTagName("link").item(0).text;
	    mydesc = items.item(i).getElementsByTagName("description").item(0).text;
	    mylat =  items.item(i).getElementsByTagName("geourl:latitude").item(0).text;
	    mylong = items.item(i).getElementsByTagName("geourl:longitude").item(0).text;
	  }
	  else {
            mylink = items.item(i).getElementsByTagName("link").item(0).firstChild.data;
	    mydesc = items.item(i).getElementsByTagName("description").item(0).firstChild.data;
	    mylat =  items.item(i).getElementsByTagName("latitude").item(0).firstChild.data;
	    mylong = items.item(i).getElementsByTagName("longitude").item(0).firstChild.data;
          }
	  
          var myhtml = '<a href="javascript:void(0)" onclick="javascript:GenInfo(\'' + mylink + '\',\'' + mydesc + '\');"><img border="0" src="/marker.png" height="20" width="12"></a>';
	  map.AddPushpin(mylink,mylat,mylong,20,12,'pin',myhtml);
	  MarkerArray.push(mylink);
       }
       c_start = c_start + items.length;
    }
  };
  xmlhttp.send(null);
}
function GenInfo(mylink,mydesc) {
  var this_str = '<font style="font-size: 10pt;"><a href="' + mylink +
                        '">' + mylink + '</a></font>' +
                        '<br /><font style="font-size: 10pt;">' + mydesc +
                        '</font><br />' +
                        '<img src="http://open.thumbshots.org/image.pxf?url=' +
mylink +
                        '" border="0" height="60" width="80">';
  document.getElementById('info').innerHTML=this_str;
}

//NextSet();
