// PlaceEngine JavaScript API
// $Id: pengine.js,v 1.34 2008/07/14 17:13:10 rekimoto Exp $
// Copyright(c)2005-2007 Jun Rekimoto

var __pe = null;
function PEngine(cb) {
    this.version = "1.01";
    this.host = "http://www.placeengine.com/api";
    this.rtagd = "http://127.0.0.1:5448";
    this.debug = false;
    this.clientexists = false;
    this.appkey = null;
    this.rtag = null;
    this.time = null;
    this.sameserver = false;
    this.x = 0;
    this.y = 0;
    this.numap = 0;
    this.onGetWifi = null;
    this.onFindClient = null;
    this.onGetLocation = null;
    this.onMessage = null;
    this.idstatus = null;
    this.lang_en = false;
    if (cb != null) {
	if (cb.host != null) { this.host = cb.host; }
	if (cb.rtagd != null) { this.rtagd = cb.rtagd; }
	if (cb.debug != null) { this.debug = cb.debug; }
	if (cb.lang_en != null) { this.lang_en = cb.lang_en; }
	if (cb.sameserver != null) { this.sameserver = cb.sameserver;}
	if (cb.idstatus != null) { this.idstatus = cb.idstatus; }
	if (cb.onGetLocation != null) { this.onGetLocation = cb.onGetLocation;}
	if (cb.onMessage != null) { this.onMessage = cb.onMessage;}
	if (cb.onGetWifi != null) { this.onGetWifi = cb.onGetWifi;}
	if (cb.onFindClient != null) { this.onFindClient = cb.onFindClient;}
	if (cb.appkey != null) {this.appkey = cb.appkey;}
    }
    this.callback = cb;


    function sendScript(url){
	if (this.debug) alert("peSendScript: " + url);
	var s = document.createElement("script");
	s.src= url;
	s.charset="UTF-8";
	document.body.appendChild(s);
    }
    PEngine.prototype.sendScript = sendScript;

    function message(str) {
	if (this.debug) alert("msg:"+ str);
	if (this.idstatus != null && document.getElementById(this.idstatus) != null) document.getElementById(this.idstatus).innerHTML = str;
	if (__pe.onMessage != null) __pe.onMessage(str);
    }
    PEngine.prototype.message = message;

    function errmsg(code) {
	if (this.debug) alert("errmsg:"+ code);
	if (this.idstatus != null) {
	    if (code<=-100) {
		__pe.message(this.lang_en ?
			     "Not registered in PlaceEngine DB"		     
			     :
			     "まだ位置情報が登録されていません。");
	    } else if (code<=0) {
		__pe.message((this.lang_en ?
			      "Cannot get Wi-Fi information. No access points nearby of Wi-Fi device is OFF.":
			      "Wi-Fi情報が取得できません。周辺にアクセスポイントが無いか, 無線LANがOFFになっています。") + code);
	    }
	}
    }
    PEngine.prototype.errmsg = errmsg;

    function getLocation() {
	this.numap = 0;
	this.message(this.lang_en?"Retrieving Wi-Fi information...":"Wi-Fi情報取得中...");
	if (this.appkey != null) {
	    this.sendScript(this.rtagd + "/rtagjs?t=" + (new Date().getTime()) + "&appk=" + this.appkey);
	} else {
	    this.sendScript(this.rtagd + "/rtagjs?t=" + (new Date().getTime()));
	}
    }
    PEngine.prototype.getLocation = getLocation;

    // note: this is googleMap dependent
    function registerLocation(map) {
	var url = "http://www.placeengine.com/map?regiloc=1";
	if (map != null) {
	    var c = map.getCenter();
	    url = "http://www.placeengine.com/map?regiloc=1&x=" + c.lng() + "&y=" + c.lat() + "&z=" + map.getZoom();
	} else if (__pe.x != 0 && __pe.y != 0) {
	    url = "http://www.placeengine.com/map?regiloc=1&x=" + __pe.x + "&y=" + __pe.y;
	}
	window.open(url, "_blank");
    }
    PEngine.prototype.registerLocation = registerLocation;

    function pingClient(msg) {
	if (msg != null) this.message(msg);
	this.sendScript(this.rtagd + "/ackjs?t=" + (new Date().getTime()));
    }
    PEngine.prototype.pingClient = pingClient;

    function submitRtag(rtag,time) {
	this.message("[" + this.numap + "] <b>" + (this.lang_en?"Connecting to PlaceEngine server...":"PlaceEngine</b>サーバー問い合わせ中..."));
	var param = 'rtag=' + rtag + "&t=" + time;
	if (this.appkey != null) {
	    param += "&appk=" + this.appkey;
	}
	param += "&ref=" + encodeURIComponent(location.href);
	if (this.sameserver) {
	    param += '&fmt=json';
	    if (this.lang_en) param += "&lang=en";
	    new Ajax.Request('/api/loc', {method:'get',parameters:param,onComplete:recvLoc2});
	} else {
	    this.sendScript(this.host + "/loc?" + param);
	}
    }
    PEngine.prototype.submitRtag = submitRtag;
    __pe = this;

  this.message(this.lang_en ? "'Get Location' becomes available once PlaceEngine client is <a href=http://www.placeengine.com/showe/install>installed</a>" : "PlaceEngineを <a href=http://www.placeengine.com/show/install>インストール</a> すると現在地取得機能が使えるようになります")
		 

    this.sendScript(this.rtagd + "/ackjs?t=" + (new Date().getTime()));
    return this;
}
// from PlaceEngine server
function recvLoc(x, y, range, info) {
    if (__pe == null) return;
    if (__pe.debug) alert("recvLoc: " + x + "," + y + ",range=" + range + "," + info);
    __pe.x = x;
    __pe.y = y;
    if (x !=0 && y != 0 && range >= 0) {
	var cx = Math.floor(x * 10000) / 10000;
	var cy = Math.floor(y * 10000) / 10000;
	__pe.message((__pe.numap>0? "(" + __pe.numap + ") " : "") + "<b>" + (cy>0?"N":"S")+Math.abs(cy)+" "+(cx>0?"E":"W")+Math.abs(cx) + "</b> " + info.addr + (info.floor?" " + info.floor:"") + " " + range + "m");
    } else if (info.msg != null && info.msg.length > 0) {
	__pe.message(info.msg);
    } else {
	__pe.errmsg(range);
    }
    if (__pe.onGetLocation != null) __pe.onGetLocation(x, y, range, info);
}
// from PlaceEngine server
// callback from locserver (when sameserver==true)
function recvLoc2(r) {
    if (__pe == null) return;
    if (__pe.debug) alert("recvLoc: " + r.responseText);
    var val = eval(r.responseText);
    if (val.length >= 4) 
	recvLoc(val[0], val[1], val[2], val[3]);
}
// from rtagd
function recvRTAG(rtag,numap,time){
    if (__pe == null) return;
    if (__pe.debug) alert("recvRTAG: " + numap);
    if (numap >= 0) __pe.numap = numap;
    if (rtag != null && rtag != undefined) __pe.rtag = rtag;
    if (time!=null) __pe.time = time;
    if (numap > 0) {
	__pe.message("[" + numap + (__pe.lang_en?"] Wi-Fi information retrieved":"] Wi-Fi情報を取得しました"));
    } else if (numap == -4 || numap == -5 || numap == -6) {
	__pe.message((__pe.lang_en?"Refused retrieving Wi-Fi information":"Wi-Fi情報取得が拒絶されました(")+numap+")");
    } else if (numap == -2) {
	__pe.message(__pe.lang_en?"No access points nearby of Wi-Fi device":"アクセスポイントが見つかりませんでした");
    } else if (numap == -1) {
	__pe.message(__pe.lang_en?"Wi-Fi device is OFF":"無線LANがOFFです");
    } else {
	__pe.message((__pe.lang_en?"Cannot get Wi-Fi information. No access ponts nearby of Wi-Fi device is OFF. (":"Wi-Fi情報が取得できません。周辺にアクセスポイントがないか無線LANがOFFになっています(")+numap+")");
    }
    var askserver = true;
    if (__pe.onGetWifi != null) askserver = __pe.onGetWifi(rtag,numap);
    if (numap > 0 && askserver) __pe.submitRtag(rtag,time);
}
// callback from rtagd
function ackRTAG(ver){
    if (__pe == null) return;
    if (__pe.debug) alert("ackRTAG");
    if (ver=="w080229" || ver=="w080703" || ver=="m080303" || ver=="o080701" || ver=="y080101" || ver=="i080201" || ver=="s080714" ) {
	__pe.message(__pe.lang_en?"<b>PlaceEngine</b> client found":"<b>PlaceEngine</b>クライアントが見つかりました。");
    } else {
	__pe.message(__pe.lang_en?("A" + ' [ <a href="http://www.placeengine.com/show/install" target="_blank">new version</a> ]' + " of the PlaceEngine client is available"):
		     ("PlaceEngineクライアントの " + '[ <a href="http://www.placeengine.com/show/install" target="_blank">新バージョン</a> ]' + " がダウンロード可能です."));
    }
    __pe.clientexists = true;
    if (__pe.onFindClient != null) {__pe.onFindClient(ver);}
}