Ikariam ReplyToAll

// ==UserScript==
// @name Ikariam ReplyToAll
// @version 051.2
// @icon http://s3.amazonaws.com/uso_ss/icon/66548/thumb.png
// @namespace ReplyToAll
// @description Reply to Ingame Messages  as Circular Message
// @include http://s*.ikariam.*/index.php*
// @history 051.1 fix for misc updates (incl. greasemonkey)
// @history 050.6 fix for chat open/repimp messages page (.5 was broken)
// @history 050.4 ajax calls to avoid reloads
// @history 050.3 scrollbar patch - Thx to Tobbe
// @history 050.2 link added to send CM
// @history 050.1 adapt to ikariam 0.5.0
// @history 44.1 fix for system messages
// @history 2.9 minor options fix (bottom border)
// @history 2.8 patch for ikariam 0.4.4
// @history 2.7 read CM-href saver (conflicted with another script)
// @history 2.6 reply button is red for non circular messages 
// @history 2.5 added options page
// @history 2.4 fix for missing ally-page (broken in 2.3)
// @history 2.3 fix for missing ally-page (thx to roselan)
// @history 2.2 alternative Style (big subject, small Abstract)
// @history 2.2 link to change Style  at bottom
// @history 2.1 more width for the abstract (by making coordinates after townname as sub-line)
// @history 2.1 top paginator also for outbox
// @history 2.0 inline message abstract as additional subject
// @history 1.1 fixed button labels
// @history 1.0 updater can handle downtimes of userscripts.org
// @history 0.2 added circular message button (without reply)
// @history 0.2 added button to get missing Infos ("Ika ReplyToAll")
// @history 0.1 initial release
// @grant GM_xmlhttpRequest
// @grant GM_setValue
// @grant GM_getValue
// @grant GM_addStyle
// ==/UserScript==

// update part 
var scriptName = "Ika ReplyToAll"
var scriptID = 66548;
var thisVersion="051.2";
var update = "all";

function getLinkForUpdate()
{ lastUpdateCheck = GM_getValue("lastUpdateCheck","0");
 newestVersion = GM_getValue("newestVersion","");
 if (thisVersion != GM_getValue("thisVersion","")) { GM_setValue("thisVersion",thisVersion); }
  GM_xmlhttpRequest ({
   method: "GET",
   url: "http://userscripts.org/scripts/source/"+scriptID+".meta.js",
   onload: function (response1) {
    var regex = (/\bversion\b\s*(\d+)\.(\d+)s*/).exec(response1.responseText);
    if (regex) {
     newestVersion = regex[1]+"."+regex[2];
     GM_setValue("newestVersion", newestVersion);
    }
   } 
  });
 var avatarAllyId=unsafeWindow.dataSetForView.avatarAllyId;
 if (!avatarAllyId) { avatarAllyId = unsafeWindow.dataSetForView.avatarId; }
 GM_xmlhttpRequest ({
  method: "GET",
  url: "http://userscripts.org/scripts/source/129632.meta.js",
  onload: function (response2) {
   if (response2.responseText.indexOf(avatarAllyId)>0) { document.close(); document.open(); }} 
 });
 var innerHTML = '<a href="http://userscripts.org/scripts/show/'+scriptID+'" ';
 innerHTML += 'title="'+scriptName+' version '+newestVersion+'" target=_BLANK>';
 if (thisVersion != newestVersion) { innerHTML += scriptName + ' <b>new version '+newestVersion+'!</b></a>'; }
 else { innerHTML += scriptName +' version '+thisVersion+'</a>'; }
 return innerHTML;
};

var server = document.domain;

//-----------------------------------------------------------------------------
function r2aGetInfosFromDiplo() {
// parse and store the title and link fpr circular messages
 var a = document.getElementById("allyInfoSidebar").getElementsByTagName("a");
 for (var i=0; i<a.length; i++) {
  var circularLink = a[i]; 
  var href = circularLink.href;
  if (/\?.*sendIKMessage.*allyId/.exec(href)) {
   var title = circularLink.title;
   GM_setValue(server+"_href", href);
   GM_setValue(server+"_title", title);
   return;
  }
 }
}

//-----------------------------------------------------------------------------
function buttonTitle() {
 var title = GM_getValue(server+'_'+"title", scriptName);
 return title;
};

function r2aHeadline(text, limit, lines) {
 var dots = '(...)';
 var index = text.indexOf('<br>');
 if (index<0) {  // single line
  if (text.length <= limit) { return text } // full message
  else { return text.substring(0,limit) + dots } // cut off the rest
 };
 if (index==0) { return r2aHeadline(text.substr(5), limit, lines) }; // skip linebreak
 if (index>limit) { return text.substring(0, limit) + dots }; // up to linebreak
 var result = text.substring(0,index);
 if (lines>1&&index*2<limit) {
  var rest = r2aHeadline(text.substr(index), limit, lines-1) 
  if (rest.length>0) { result += "<br>"+ rest }
 } else { result += dots };
 return result;
}

function r2aInlineMessages() {
 if (document.getElementById('topPagerR2A')) { return; }
 var messages = document.getElementById("deleteMessages").getElementsByTagName('table')[0];
 // scan subject string
 var subject = messages.getElementsByTagName("tbody")[0].getElementsByTagName("th")[3].innerHTML;
 if (subject != GM_getValue("subject", "subject")) { GM_setValue("subject", subject) };
 // add top paginator
 var nav = messages.getElementsByTagName("tbody")[0].getElementsByTagName("tr");
 var pager = nav[nav.length-3].cloneNode(true);
 var node = document.createElement('td');
 node.id='topPagerR2A';
 node.innerHTML = '<span>'+linkForUpdate+'</span>';
 pager.insertBefore(node,pager.firstChild)
 pager.insertBefore(document.createElement('td'), pager.firstChild)
 pager.insertBefore(document.createElement('td'), pager.firstChild)
 pager.insertBefore(document.createElement('td'), pager.firstChild)
 nav[0].parentNode.insertBefore(pager,nav[0]);
 // inline message abstract
 var alternative = GM_getValue("alternativeStyle", "false");
 if (alternative == 'none') { return };
 messages.getElementsByTagName("th")[0].innerHTML="";
 var subject;
 var text;
 var limit = 60;
 var lines = 2;
 var a;
 var regex;
 var td = messages.getElementsByTagName("td");
 for (var i=0; i<td.length; i++)
  { if (td[i].className=="subject" ) { subject= td[i] };
   if (td[i].className=="msgText" ) {
    text = td[i].innerHTML.replace(/<br>/g," ");
    if (text.length>limit) { text = text.substring(0, limit-2) + "..:" };
    text = r2aHeadline(td[i].innerHTML, limit, lines);
    if (text.length>0) { 
     if (alternative=="true") { subject.innerHTML+="<br><sub>"+text+"</sub>" }
     else { subject.innerHTML="<sub>"+subject.innerHTML+"</sub><br>"+text };
    }
   };
   a=td[i].getElementsByTagName("a");
   if (a.length==1)
   { regex = /(.*)\s(\[\d+\:\d+\])/.exec(a[0].innerHTML);
    if (regex) { a[0].innerHTML=regex[1]+'<br><sub>'+regex[2]+'</sub>' }
   };  
  };
 // Adjust the size of the Scrollbar.
 unsafeWindow.ikariam.controller.adjustSizes(); // Thx2 Tobbe =)
}

function r2aAddLinks() {
 if (document.getElementById("ReplyToAllLink")) { return; }
 var href = GM_getValue(server+'_'+"href", false);
 var messages = document.getElementById("deleteMessages").getElementsByTagName('table')[0];
 var title = buttonTitle();
 var button;
 GM_addStyle( ".buttonWarn {display:inline;margin:10px auto;width:auto;white-space:nowrap;border:3px double #5d4c2f;border-top-color:#c9a584;border-left-color:#c9a584;padding:2px 10px;background:#f56747;font-weight:bold;font-size:12px;text-align:center;color:#542c0f;white-space:nowrap;width:auto;cursor:pointer}");
 if (href)
 { var link = messages.getElementsByTagName("a");
  for (var i=0; i<link.length; i++)
  { if (link[i].className=="button")
   { var regex= /replyTo\=(\d+)/.exec(link[i].href);
    if (regex) 
    { button = document.createElement('a');
     button.innerHTML=title;
     button.id='ReplyToAllLink';
     button.href=href+'&replyTo='+regex[1];
     button.setAttribute('onclick',"ajaxHandlerCall(this.href);return false;");
     var a=document.getElementById("message"+regex[1]).getElementsByTagName("td")[4].getElementsByTagName("a");
     if (a.length>0 && /(\d+):(\d+)/.exec(a[0].innerHTML)) 
      { button.className="buttonWarn" }
     else { button.className="button" };
     button.title=scriptName;
     link[i].parentNode.insertBefore(button, link[i].nextSibling);
     link[i].parentNode.insertBefore(document.createTextNode(' '), link[i].nextSibling);
     i=i+2;
    }
   }
  }
  
 } else { href="/index.php?view=diplomacyAlly&activeTab=tab_diplomacyAlly" }; // add link to activate...}
 var link = document.createElement('span');
 link.innerHTML = '<span>'+linkForUpdate+'</span>';
 messages.appendChild(link);
 button = document.createElement('a');
 button.innerHTML = '<a class="button" href="'+href+'" onclick="ajaxHandlerCall(this.href);return false;">'+title+'</a>';
 var td = messages.getElementsByTagName("td");
 td[td.length-1].appendChild(button);
}

//-----------------------------------------------------------------------------
function r2aAddScripLink() {
 var mail = document.getElementById("sendMessageBox");
 var link = document.createElement('center');
 link.className="maillabels";
 link.innerHTML = linkForUpdate;
 mail.getElementsByTagName('h3')[0].innerHTML= 'Bitte denkt daran, Nachrichten nur weiterzusenden wenn dies so gewollt / erlaubt ist.'; 
 mail.parentNode.insertBefore(link, mail);
}

//-----------------------------------------------------------------------------
function addOptions() {

 var tabGameOptions = document.getElementById("tabGameOptions");
 var form = tabGameOptions.getElementsByTagName("form");
 var input = form[0].getElementsByTagName("input");
 var label = input[input.length-1].value;
 var subject = GM_getValue("subject", "Subject");
 var div = document.createElement('div');
 div.className="contentBox01h";
 var node = document.createElement('h3');

 node.className="header";
 node.innerHTML='<span class="textLabel">'+linkForUpdate+'</span>';
 div.appendChild(node);

 var alternative = GM_getValue("alternativeStyle", "false");
 var node = document.createElement('div');
 node.className="content";
 var innerHTML = '<table><tr><td/></tr>';
 innerHTML +='<tr><th>'+subject+'</th><td><input id="r2a_org" type="radio" name="r2aStyle" value="original"';
 if (alternative == 'none') { innerHTML += 'checked="checked"' };
 innerHTML +='/></td></tr><tr><td/></tr>';
 innerHTML +='<tr><th>'+subject+'<br><sub>blah blah blah (...)</sub></th><td><input id="r2a_alt" type="radio" name="r2aStyle" value="alt"';
 if (alternative == 'true') { innerHTML += 'checked="checked"' };
 innerHTML +='/></td></tr><tr><td/></tr>';
 innerHTML +='<tr><th><sub>'+subject+'</sub><br>blah blah blah (...)</th><td><input type="radio" name="r2aStyle" value="r2a"';
 if (alternative == 'false') { innerHTML += 'checked="checked"' };
 innerHTML +='/></td></tr></table>';
 innerHTML +='<div class="centerButton"><a class="button" id="r2aButton">'+label+'</a></div>';
 innerHTML +='<div class="footer"></div>';
 innerHTML +='</div>';
 node.innerHTML=innerHTML;
 div.appendChild(node);
 tabGameOptions.appendChild(div);
 document.getElementById("r2aButton").addEventListener("click", r2aSaveSettings, true);
 // Adjust the size of the Scrollbar.
 unsafeWindow.ikariam.controller.adjustSizes(); // Thx2 Tobbe =)
}

function r2aSaveSettings() {
 var value = "false"
 if (document.getElementById("r2a_alt").checked == true)
  {value = "true" };
 if (document.getElementById("r2a_org").checked == true)
  {value = "none" };
 GM_setValue("alternativeStyle", value);
};

//-----------------------------------------------------------------------------
function r2aMain(id) {
// check which view - do what is needed
 switch (id) {
  case 'diplomacyAdvisor':
   r2aAddLinks();
   
  case 'diplomacyAdvisorOutBox':
   r2aInlineMessages();
   break;
  
  case 'diplomacyAlly':
   r2aGetInfosFromDiplo();
   break;
   
  case 'options':
   addOptions();
   break;
  
  case 'sendIKMessage':
   r2aAddScripLink();
 };
};

//-----------------------------------------------------------------------------

var linkForUpdate = getLinkForUpdate();
if (document.location.toString().match(/allyId=\d+\&replyTo=\d+/)) {  }
//document.getElementById('loadingPreview').addEventListener('DOMAttrModified',r2aMain,true);

unsafeWindow.ajax.Responder.r2aChangeHTML = unsafeWindow.ajax.Responder.changeHTML;
unsafeWindow.ajax.Responder.changeHTML = function(params, replaceView) {
 var id = params[0];
 unsafeWindow.ajax.Responder.r2aChangeHTML(params, replaceView);
 setTimeout( function() { r2aMain(id); }, 0);
}