// ==UserScript==
// @name          SoftPedia Bless Users
// @author        Ciuly  
// @namespace     http://www.ciuly.com
// @description   Posts the warn message in the dedicated area when warning
// @include       http://forum.softpedia.com/index.php?act=warn&type=add&mid=*
// ==/UserScript==

var forms, form, s;

s = "0";
if (document.getElementsByTagName) 
	forms = document.getElementsByTagName("form");
else
	forms = document.body.all.tags("form");
for (var j=0; j<forms.length; j++){
  form = forms.item(j);
  if ( form.getAttribute("id") == "postingform" ){
    s = "1";
    break;
  }
}

if ( s == "0" ){
  alert("Error: Correct form was not found. Helper script is not installed.");
} 
else
{

  window.ciuly_diacritice = function(post){// ugly fix for romanian special character support
	post = encodeURIComponent(post);
	post = post.replace(/%C4%83/gi,"%E3");// a tilda
	post = post.replace(/%C3%AE/gi,"%EE");// i caciula
	post = post.replace(/%C5%9F/gi,"%BA");// sh
	post = post.replace(/%C5%A3/gi,"%FE");// tz
	post = post.replace(/%C3%A2/gi,"%E2");// a caciula
	return post;
  }

  window.ciuly_post = function(url, data) {
	var request = new XMLHttpRequest();
	request.open("POST", url, false);
	request.setRequestHeader('Content-type', 'application/x-www-form-urlencoded');
	request.send(data);
//	request.send(encodeURI(data));

//	w = window.open('','');
//	w. document.write(request.responseText);
//	w.focus();

//	GM_xmlhttpRequest({
//    	  method: "POST",
//    	  url: url,
//    	  headers:{'Content-type':'application/x-www-form-urlencoded'},
//    	  data:encodeURI(data)
//  	});
	alert("Done.");
  };

  window.ciuly_post_bless = function (username, forum, postContent){
	ciuly_post( "http://forum.softpedia.com/index.php?", 
		"st=0"+
		"&act=Post"+
		"&s="+
		"&f="+forum+
		"&auth_key="+ciuly_authKey+
		"&removeattachid=0"+
		"&MAX_FILE_SIZE=0"+
		"&CODE=01"+
		"&attach_post_key="+
		"&TopicTitle="+username+
		"&TopicDesc="+
		"&poll_question="+
		"&ed-0_wysiwyg_used=0"+
		"&editor_ids=ed-0"+
		"&Post="+ciuly_diacritice(postContent)+
		"&enableem=yes"+
		"&enablesig=yes"+
		"&enabletrack=0"+
		"&iconid=0"+
		"&dosubmit=Bless"
	);
  };

  window.ciuly_post_warn = function(username){
	postContent = prompt("Reason (wait until notified)", "Slightly less boring default.");
	ciuly_post_bless(username, "265", postContent);
  };

  window.ciuly_form = form;
  if (form.getElementsByTagName)
	window.ciuly_username = form.getElementsByTagName("a").item(0).innerHTML;
  else
	window.ciuly_username = form.all.tags("a").item(0).innerHTML;

  unsafeWindow.ciuly_WarnUser = function(wtype){
//  window.ciuly_WarnUser = function(wtype){
//  function ciuly_WarnUser(wtype){
    var reason = prompt("Reason", "");
    if (reason =="" || !reason) {
      alert("No reason given. No action taken.");
      return false;
    }

    // change all crlf (no matter the case) into \r
    reason = reason.replace(/crlf/gi,"\r");

    if (wtype == "suspend"){
	days = prompt("Suspend user for how many days?", "3");
    } else {
	days = "0";
    }
    for (var l=0; l<ciuly_form.elements.length; l++){
	var el = ciuly_form.elements[l];
	if (el.name == "key"){
		window.ciuly_authKey = el.value;
	}
      	if (el.name == "level"){
		if (el.value == "add")
			el.checked="checked";
		else
			el.checked="";
      	}
	if (el.name == "mod_indef"){
		if (wtype == "ban")
			el.checked="checked";
		else
			el.checked="";
	}
	if (el.name == "mod_value"){
		el.value=days;
	}
	if (el.name == "post_indef"){
		if (wtype == "ban")
			el.checked="checked";
		else
			el.checked="";
	}
	if (el.name == "post_value"){
		el.value=days;
	}
	if (el.name == "susp_value"){
		if (wtype == "ban")
			el.value="999999999999999999";
		else
			el.value=days;
	}
	if (el.name == "reason"){
		el.value = reason;
	}
	if (el.name == "subject"){
		if (wtype == "ban")
			el.value = "Ai fost banat definitiv.";
		else {
			if (wtype == "suspend")
				el.value = "Ai fost suspendat pentru "+days+" zile";
			else
				el.value = "Ai primit un warn.";
		}
	}
	if (el.name == "contact"){
		el.value = reason;
	}

    }

    // remove quotes from reason. if the user has said something ugly which is added as the reason, we don't want to post it publicly
    var tmp = "";
    while (tmp != reason){
      tmp = reason;
      reason = reason.replace(/\[quote.*?\[\/quote\]/i,"");
    }

    var rsn = "Motiv: ";
    if (reason.length>80)
      rsn = rsn+"\n";

    if (wtype == "warn")
    	ciuly_post_bless(ciuly_username, "265", rsn+reason);
    else if (wtype == "suspend")
    	ciuly_post_bless(ciuly_username, "266", rsn+reason+"\n\nPerioada: "+days+" zile");
    else
    	ciuly_post_bless(ciuly_username, "267", rsn+reason);

    return true;
  }

  var div;
  if (form.getElementsByTagName)
	div = form.getElementsByTagName("div").item(2);
  else
	div = form.all.tags("div").item(2);

function addButton(bname, btitle, bonclick, btext){
  var b = document.createElement("button");
  b.setAttribute( "class", "button");
  b.name = bname;
  b.title = btitle;
  b.setAttribute("onclick", bonclick);
  b.innerHTML = btext;
  div.appendChild( document.createTextNode(" ") );
  div.appendChild( b );
  div.appendChild( document.createTextNode(" ") );
}

  addButton("ban", "Ban User", "return ciuly_WarnUser('ban')", "Ban");
  addButton("suspend", "Suspend User", "return ciuly_WarnUser('suspend')", "Suspend");
  addButton("warn", "Warn User", "return ciuly_WarnUser('warn')", "Warn");
}