var statcrunch_apppref = "new";var apppref = statcrunch_apppref;
var tweets = new Array();
var scnames = new Array();
var texts = new Array();
var retweets = new Array();
var dates = new Array();
var months = new Array();
var years = new Array();
var colcount = 0;
var month = new Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
var debug = "false";
var pagestoload = new Array();
var pagenames = new Array();
var curpage = -1;
var currenttimeinc = -1;
var curpageloaded = false;
var apptitle = "";
var mode = "names";
var tweetcount = 0;
var trendsloaded = false;
function getObjectAsString(obj){
	var output = '';
	for (property in obj) {
  		if(obj[property] instanceof Object){
  			output += property + ': ';
  			//getObjectAsString(obj[property])+';\n';
  		}else
  			output += property + ': ' + obj[property]+'; ';
	}
//	alert(output);	
	return output;
}
function ShowContent(d) {
	if(d.length < 1) { return; }
		document.getElementById(d).style.display = "block";
}
function HideContent(d) {
	if(d.length < 1) { return; }
		document.getElementById(d).style.display = "none";
}
function ReverseContentDisplay(d) {
	if(d.length < 1) { return; }
	if(document.getElementById(d).style.display == "none") { document.getElementById(d).style.display = "block"; }
	else { document.getElementById(d).style.display = "none"; }
}
function trim(str, chars) {
    return ltrim(rtrim(str, chars), chars);
}
function ltrim(str, chars) {
    chars = chars || "\\s";
    return str.replace(new RegExp("^[" + chars + "]+", "g"), "");
}
function rtrim(str, chars) {
    chars = chars || "\\s";
    return str.replace(new RegExp("[" + chars + "]+$", "g"), "");	
}
function textareaToArray(t){
	return trim(t.value).split(/[,\s\n\r]+/);
}
function getQueryString(key, defv){
	if (defv==null) defv = "";
	key = key.replace(/[\[]/,"\\\[").replace(/[\]]/,"\\\]");
	var regex = new RegExp("[\\?&]"+key+"=([^&#]*)");
	var qs = regex.exec(window.location.href);
	if(qs == null)
		return defv;
	else
		return unescape(qs[1]).replace(/\+/g,' ');
}
Array.prototype.unique =
  function() {
    var a = [];
    var l = this.length;
    for(var i=0; i<l; i++) {
      for(var j=i+1; j<l; j++) {
        // If this[i] is found later in the array
        if (this[i] === this[j])
          j = ++i;
      }
      a.push(this[i]);
    }
    return a;
  };
var date_sort_desc = function (tweet1, tweet2) {
  // This is a comparison function that will result in dates being sorted in
  // DESCENDING order.
  if (tweet1.date > tweet2.date) return -1;
  if (tweet1.date < tweet2.date) return 1;
  return 0;
};
function createColumnParam(arr,lab,dlim){
    colcount = colcount + 1;
    var output = '<PARAM name="addColumn'+colcount+'" value="'+arr.join(dlim)+'">';
    output += '<PARAM name="addColumn'+colcount+'name" value="'+lab+'">';
    output += '<PARAM name="addColumn'+colcount+'dlim" value="'+dlim+'">';
    return(output);
}   
function handleSelection(){
	setTimeout("showSelectedTweets()",10);
}
function showSelectedTweets(){
	var dacount = 0;
	if(apppref != "new"){
		var sc = document.applets['webstat1'];
		for(var k = 0; k < tweets.length; k++){	
			if(sc.isTweetSelected(k)){
				dacount++;
				if(dacount == 1)
					HideContent("selins");
					ShowContent('tweet'+k);
				}else
					HideContent('tweet'+k);
		}
	}else{
		var fw = document.getElementById('sc_frame_twitter').contentWindow;
		for(var k = 0; k < tweets.length; k++){	
			if(fw.twitter.isTweetSelected(k+1)){
				dacount++;
				if(dacount == 1)
					HideContent("selins");
					ShowContent('tweet'+k);
				}else
					HideContent('tweet'+k);
		}
	}
	document.getElementById("stcount").innerHTML = ""+dacount;
	if(dacount == 0)
		ShowContent("selins");
}
function clearTweetSelections(){
	if(apppref != "new")	
		document.applets['webstat1'].clearTweetSelections();
	else{
		var fw = document.getElementById('sc_frame_twitter').contentWindow;
		if(fw)
			fw.twitter.clearTweetSelections();
	}
}

function shortdate(date){
	var dayear = date.getFullYear();
	var damonth = month[date.getMonth()];
	var dadate = date.getDate();
	return damonth+" "+dadate+", "+dayear;
}
function timeAgo(date) {
    var relative_to = new Date();
	var delta = ~~((relative_to.getTime() - date.getTime()) / 1000);
    var r = '';
//    delta = delta + (relative_to.getTimezoneOffset() * 60);
//    alert(delta);
    if (delta <= 1) {
        r = '1 second ago';
    } else if (delta < 60) {
        r = delta + ' seconds ago';
    } else if (delta < 120) {
        r = '1 minute ago';
    } else if (delta < ( 59*60)) {
        r = (~~(delta / 60)) + ' minutes ago';
    } else if (delta < (2*90*60)) { // 2* because sometimes read 1 hours ago
        r = '1 hour ago';
    } else if (delta < (24*60*60)) {
        r = (~~(delta / 3600)) + ' hours ago';
    } else {
        r = shortdate(date);
    }
    return r;
}
function expandLinks(tweet) {
    if (tweet === undefined) return '';
    var text = tweet.text, i = 0;
    if (tweet.entities) {
      // replace urls with expanded urls and let the ify shorten the link
      if (tweet.entities.urls && tweet.entities.urls.length) {
        for (i = 0; i < tweet.entities.urls.length; i++) {
          if (tweet.entities.urls[i].expanded_url) text = text.replace(tweet.entities.urls[i].url, tweet.entities.urls[i].expanded_url); // /g ?
        }
      }
      // replace media with url to actual image (or thing?)
      if (tweet.entities.media && tweet.entities.media.length) {
        for (i = 0; i < tweet.entities.media.length; i++) {
          if (tweet.entities.media[i].media_url || tweet.entities.media[i].expanded_url) text = text.replace(tweet.entities.media[i].url, tweet.entities.media[i].media_url ? tweet.entities.media[i].media_url : tweet.entities.media[i].expanded_url); // /g ?
        }
      }
    }
    return text;
}
function fixLink(t) {
    return t.replace(/[a-z]+:\/\/([a-z0-9-_]+\.[a-z0-9-_:~\+#%&\?\/.=]+[^:\.,\)\s*$])/ig, function(m, link) {
        return '<a title="' + m + '" href="' + m + '" target=_blank>' + ((link.length > 36) ? link.substr(0, 35) + '&hellip;' : link) + '</a>';
    });
};
function fixAt(t) {
    return t.replace(/(^|[^\w]+)\@([a-zA-Z0-9_]{1,15}(\/[a-zA-Z0-9-_]+)*)/g, function(m, m1, m2) {
        return m1 + '@<a href="//twitter.com/' + m2 + '" target=_blank>' + m2 + '</a>';
    });
};
function fixHash(t) {
    return t.replace(/(^|[^&\w'"]+)\#([a-zA-Z0-9_^"^<]+)/g, function(m, m1, m2) {
    	return m.substr(-1) === '"' || m.substr(-1) == '<' ? m : m1 + '#<a href="//search.twitter.com/search?q=%23' + m2 + '" target=_blank>' + m2 + '</a>';
	});
};
function clean(tweettext) {
    return fixHash(fixAt(fixLink(tweettext)));
}
function processTweets(){
	tweets.sort(date_sort_desc);
	var td = '<div id=selins style="display: block; padding: 5px; color: #444;font-size: 14px;">To select tweets, interact with the word wall above or click on the corresponding row numbers in the data table. Select the <B>Data</B> tab above to view the data table of tweets.</div>'; 
	for(var i = 0; i < tweets.length; i++){
		var tweet = tweets[i];
		scnames[i] = tweet.user.screen_name.replace(/\,/gi," ");
		texts[i] = tweet.text.replace(/\"/gi,"").replace(/"&quot;"/gi,"").replace(/\|/gi," ");
		retweets[i] = tweet.retweet_count;
		years[i] = tweet.date.getFullYear();
		months[i] = month[tweet.date.getMonth()];
		dates[i] = tweet.date.getDate();
		var nicedate = '<I><A href="//twitter.com/#!/'+scnames[i]+'/status/'+tweet.id_str+'" target="_blank">'+shortdate(tweet.date)+'</A></I>';
		var linkname = '<B><A href="//twitter.com/#!/'+scnames[i]+'" target="_blank">'+scnames[i]+'</A></B>';
		var nicetext = clean(expandLinks(tweet));
		td += '<div id=tweet'+i+' class=tweet>\n<a href="//www.twitter.com/#!/'+scnames[i]+'" target="_blank"><IMG SRC="'+tweet.image.replace(/^http:\/\//i, 'https://')+'" BORDER=0 ALIGN=LEFT style="margin-right: 5px;"></A>'+linkname+'\n<BR>\n'+nicetext+'<BR>'+nicedate+'</div>\n';
	}
	document.getElementById('tweetdisplay').innerHTML = td;
	HideContent('loadarea');
	HideContent('entryload');
	ShowContent('apparea');
	document.getElementById('appletarea').innerHTML = "<iframe src=\"/app/index.php?launch=twitter\" scrolling=auto name=sc_frame_twitter id=sc_frame_twitter style=\"border: 0px; width: 800px; height: 550px;\"></iframe>\n";
	ShowContent('tweetarea');
}

function getStopWords(){
	var stops = "";
	var stopwords = trim(document.getElementById('stopwords').value);
    if(stopwords != "")
    	stops += (" "+stopwords.replace(/\"/gi,""));
    if(mode=="search"){
    	var keys = textareaToArray(document.getElementById('keywords')).unique();    		
    	for(var i = 0; i < keys.length; i++){
    		keys[i] = keys[i].replace(/\#/gi,"").replace(/\"/gi,"");
    		stops += ' '+keys[i]+' @'+keys[i]+' #'+keys[i]+' ';
    	}
    }
    if(mode=="names"){
    	var danames = textareaToArray(document.getElementById('names')).unique();
    	for(var i = 0; i < Math.min(danames.length,5); i++){
    		danames[i] = danames[i].replace(/\#/gi,"").replace(/\"/gi,"");
    		stops += ' '+danames[i]+' @'+danames[i]+' ';
    	}
    }
    return(stops);
}

function launchContent(){
	document.getElementById('applettitle').innerHTML = '<div style="text-align: center;margin-bottom: 4px;">'+apptitle+'</div>';
	var fw = document.getElementById('sc_frame_twitter').contentWindow;
	if(fw){
		var arrayofarrays = [scnames,texts,months,dates,years];
		var arrayofnames = ["Name","Tweet","Month","Date","Year"];
		for(var i = 0; i < arrayofarrays.length; i++){
			var daarray = arrayofarrays[i];
			fw.dp.setNameAt(i,arrayofnames[i]);
			for(var j = 0; j < daarray.length; j++){
				fw.dp.setDataVal(i,j,daarray[j],true);
			}
		}
		fw.dp.trimColumns();
		fw.dp.trimEmptyColumns();
		fw.dp.updateTable();
		fw.dp.clearRowSelections();
		fw.dp.setScrollGrid();
		fw.updateFocusAfterLoad();
		fw.updateDataName('Tweets');
	}else
		alert("Could not find StatCrunch window!");
}

function parseDate(str) {
  var v=str.split(' ');
  return new Date(Date.parse(v[1]+" "+v[2]+", "+v[5]+" "+v[3]+" UTC"));
}
function parseSearchDate(str) {
  var v=str.split(' ');
  return new Date(Date.parse(v[1]+" "+v[2]+", "+v[3]+" "+v[4]+" UTC"));
} 
function loadTweets(response){
	if(!response.errors){
		if(debug=="true")
			document.getElementById("debugarea").innerHTML += "Loading response"+getObjectAsString(response)+"<BR>";
		for(var i = 0; i < response.length; i++){
			var tweet = response[i];
			tweet.date = new Date(parseDate(tweet.created_at.replace(",","")));
			tweet.image = tweet.user.profile_image_url;
			tweets.push(tweet);
		}
		curpageloaded = true;
	}else{
		alert("Twitter says: "+response.errors[0].message+"!");
		HideContent('loadarea');
		ShowContent('entryarea');
	}
}
function loadsearchtweets(keywords){
	loadSearchTweets(keywords);
}
function loadSearchTweets(response){
	if(!response.errors){
		if(debug=="true")
			document.getElementById("debugarea").innerHTML += "Loading response"+getObjectAsString(response)+"<BR>";
		var mintweetid = Number.POSITIVE_INFINITY;
		for(var i = 0; i < response.statuses.length; i++){
			var tweet = response.statuses[i];
			tweet.date = new Date(parseSearchDate(tweet.created_at.replace(",","")));
//			tweet.user = new Object();
//			tweet.user.screen_name = tweet.from_user;
			tweet.image = tweet.user.profile_image_url;
//			tweet.retweet_count = tweet.metadata.recent_retweets;
			tweets.push(tweet);
			if(tweet.id < mintweetid)
				mintweetid = tweet.id;
		}
		if(curpage < pagestoload.length - 1){
			pagestoload[curpage+1] += encodeURIComponent("&max_id="+mintweetid);
			if(debug=="true")
				console.log(pagestoload[curpage+1]);
		}
		curpageloaded = true;
	}else{
		alert("Twitter says: "+response.errors[0].message+"!");
		HideContent('loadarea');
		ShowContent('entryarea');
	}
}
function showRateLimit(response){
	if(response.remaining_hits==0)
		alert("You have "+response.remaining_hits+" Twitter accesses remaining before a reset happens at "+response.reset_time+".");
}
function displayTrends(response){
	if(!response.errors){
		var out = '<A href="//www.twitter.com" target="_blank"><IMG SRC="full_logo_blue.png" BORDER=0></A><BR><BR><B>Trending Now:</B><BR><OL>';
		var n = Math.min(response[0].trends.length,10);
		for(var i = 0; i < n; i++){
			out += '<LI> <a href="#" onclick="HideContent(\'trends\'); setSearchTerm(\''+response[0].trends[i].name+'\'); return false;">'+response[0].trends[i].name+'</A>\n';
			if( i < n-1)
				out +=  " &nbsp; ";
		}
		out += '</OL><BR><INPUT type=button class=abutton  onclick="HideContent(\'trends\'); ShowContent(\'entryarea\'); return false;" value="Back">';
		document.getElementById("trends").innerHTML = out;
		trendsloaded = true;
	}else{
		alert("Twitter says: "+response.errors[0].message+"!");
	}
}
function loadTrends(){
	loadScript('twitter-proxy.php?url='+encodeURIComponent('/trends/place.json?id=1&callback=displayTrends'));
}
function monitorScriptLoad(){
	if(curpageloaded){
		curpage = curpage + 1;
		currenttimeinc = 0;
		if(curpage <= pagestoload.length-1 && tweetcount < tweets.length)
			loadPage(curpage);
		else
			processTweets();
	}else{
		currenttimeinc = currenttimeinc + 1;
		if(currenttimeinc <= 200){
			setTimeout("monitorScriptLoad()",100);
		}else{
			alert("There was an error loading your desired data from Twitter.  If you are searching for screen names, please make sure the names are all valid.  Also, please make sure the Twitter web site is up and running.  You may also try again later if this application's rate limit has been exceeded.");
			HideContent('loadarea');
			ShowContent('entryarea');
//			loadScript('http://api.twitter.com/account/rate_limit_status.json?callback=showRateLimit');
		}
	}
}
function loadScript(src){
    var e = document.createElement('script');
    e.type = 'text/javascript';
//    e.async = true;
    e.src = src;
    if(debug=="true")
		document.getElementById("debugarea").innerHTML += "Loading "+e.src+"<BR>";
	/*
	e.onerror= function () {
    	alert("Error loading data from Twitter."+src+"! Please make sure this is a valid Twitter screen name.  Also, please make sure that twitter.com is up and running.");
    }
    */
    document.getElementsByTagName('head')[0].appendChild(e);
}
function loadPage(i){
	if(i >= 0 && i < pagestoload.length){
		curpage = i;
		currenttimeinc = 0;
		curpageloaded = false;
		tweetcount = tweets.length;
		document.getElementById('loadarea').innerHTML = pagenames[i];
		loadScript(pagestoload[i]);
		setTimeout("monitorScriptLoad()",100);
	}
}
function startLoadingPages(){
	reset();
	HideContent('entryarea');
	ShowContent('loadarea');
	if(pagestoload.length >= 0){
		loadPage(0);
	}
}
function loadName(name){
	document.getElementById('names').value = name;
	loadNames();
}
function loadNames(){
	screennames = textareaToArray(document.getElementById('names')).unique();
	if(screennames.length > 0){
		if(debug=="true")
			document.getElementById("debugarea").innerHTML += "Loading "+screennames.toString()+"<BR>";
		pagestoload = new Array();
		pagenames = new Array();
		apptitle = '<B>Tweets for:</B> <INPUT type=text id=selnames style="width: 450px;" class=textcomp value="';
		for(var i = 0; i < Math.min(screennames.length,5); i++){
			pagestoload.push('twitter-proxy.php?url='+encodeURIComponent('/statuses/user_timeline.json?screen_name='+screennames[i]+'&callback=loadTweets&include_rt=1&include_entities=1&count=200'));
//			pagestoload.push('twitter-proxy.php?url='+encodeURIComponent('/statuses/user_timeline.json?screen_name='+screennames[i]+'&callback=loadTweets&include_rt=1&include_entities=1&count=200&page=2'));
			pagenames.push("Loading tweets for "+screennames[i]);
			pagenames.push("Loading tweets for "+screennames[i]);
			apptitle += screennames[i]+" ";
		}
		apptitle += '"> <B><A href="#" onclick="backToEntry(); return false;">Edit</A></B>';
		mode="names";
		startLoadingPages();
	}else
		alert("You must enter at least one valid screen name!");
}
function setSearchTerm(term){
	document.getElementById('keywords').value = term;
	loadSearch(document.getElementById('keywords').value);
}
function loadsearchtweets(keywords){
	loadSearchTweets(keywords);
}
function loadSearch(keywords){
	keywords = trim(keywords);
	if(keywords != ""){
		pagestoload = new Array();
		pagenames = new Array();
		apptitle = '<B>Tweets matching:</B> <INPUT type=text id=selkeywords style="width: 450px;" class=textcomp value="'+keywords+'"> <B><A href="#" onclick="backToEntry(); return false;">Edit</A></B>';
		keywords = escape(keywords);
		for(var i =1; i <= 2; i++){
//			console.log('twitter-proxy.php?url='+encodeURIComponent('/search/tweets.json?q='+keywords+'&callback=loadSearchTweets&count=100'));
			pagestoload.push('twitter-proxy.php?url='+encodeURIComponent('/search/tweets.json?q='+keywords+'&callback=loadSearchTweets&count=100'));
			pagenames.push("Loading tweets "+((i-1)*100+1)+" to "+(i*100));
		}
		mode="search";
		startLoadingPages();		
	}else
		alert("You must enter keywords!");
}
function getPopular(){
	pagestoload = new Array();
	pagenames = new Array();
	apptitle = '<B>Up to 200 popular tweets</B> <B><A href="#" onclick="backToEntry(); return false;">Edit</A></B>';
	for(var i =1; i <=2; i++){
		pagestoload.push('twitter-proxy.php?url='+encodeURIComponent('/search/tweets.json?q=&callback=loadSearchTweets&count=100'));
		pagenames.push("Loading tweets "+((i-1)*100+1)+" to "+(i*100));
	}
	startLoadingPages();
}
function reset(){
	tweets = new Array();
	scnames = new Array();
	texts = new Array();
	retweets = new Array();
	dates = new Array();
	months = new Array();
	years = new Array();
	colcount = 0;
	document.getElementById("stcount").innerHTML = ""+0;
}
function initialize(){
	var sninfo = getQueryString("names","false");
	debug = getQueryString("debug","false");
	if(debug=="true")
  		ShowContent('debugarea');
  	if(sninfo != "false"){
		document.getElementById('names').value = sninfo;
//		loadNames();
	}
//	loadTrends();
}
function backToEntry(){
	HideContent('apparea');
	HideContent('tweetarea');
	ShowContent('entryload');
    ShowContent('entryarea');
    document.getElementById('appletarea').innerHTML = "";
}