// bbCode control by
// subBlue design
// www.subBlue.com

// Startup variables
var theSelection = false;

// Check for Browser & Platform for PC & IE specific bits
// More details from: http://www.mozilla.org/docs/web-developer/sniffer/browser_type.html
var clientPC = navigator.userAgent.toLowerCase(); // Get client info
var clientVer = parseInt(navigator.appVersion); // Get browser version

var is_ie = ((clientPC.indexOf("msie") != -1) && (clientPC.indexOf("opera") == -1));
var is_nav = ((clientPC.indexOf('mozilla')!=-1) && (clientPC.indexOf('spoofer')==-1)
                && (clientPC.indexOf('compatible') == -1) && (clientPC.indexOf('opera')==-1)
                && (clientPC.indexOf('webtv')==-1) && (clientPC.indexOf('hotjava')==-1));
var is_moz = 0;

var is_win = ((clientPC.indexOf("win")!=-1) || (clientPC.indexOf("16bit") != -1));
var is_mac = (clientPC.indexOf("mac")!=-1);

// Define the bbCode tags
bbcode = new Array();
bbtags = new Array('<b>','</b>','<i>','</i>','<u>','</u>','<blockquote>','</blockquote>','<code>','</code>');

// Replacement for arrayname.length property
function getarraysize(thearray)
{
	for (i = 0; i < thearray.length; i++)
	{
		if ((thearray[i] == "undefined") || (thearray[i] == "") || (thearray[i] == null))
			return i;
	}
	return thearray.length;
}

// Replacement for arrayname.push(value) not implemented in IE until version 5.5
// Appends element to the array
function arraypush(thearray,value)
{
	thearray[ getarraysize(thearray) ] = value;
}

// Replacement for arrayname.pop() not implemented in IE until version 5.5
// Removes and returns the last element of an array
function arraypop(thearray)
{
	thearraysize = getarraysize(thearray);
	retval = thearray[thearraysize - 1];
	delete thearray[thearraysize - 1];
	return retval;
}

function bbfontstyle(bbopen, bbclose, txtarea)
{
	if ((clientVer >= 4) && is_ie && is_win)
	{
		theSelection = document.selection.createRange().text;
		if (!theSelection)
		{
			txtarea.value += bbopen + bbclose;
			txtarea.focus();
			return;
		}
		document.selection.createRange().text = bbopen + theSelection + bbclose;
		txtarea.focus();
		return;
	}
	else if (txtarea.selectionEnd && (txtarea.selectionEnd - txtarea.selectionStart > 0))
	{
		mozWrap(txtarea, bbopen, bbclose);
		return;
	}
	else
	{
		txtarea.value += bbopen + bbclose;
		txtarea.focus();
	}
	storeCaret(txtarea);
}

function bbstyle(bbnumber, txtarea, but)
{
	txtarea.focus();
	donotinsert = false;
	theSelection = false;
	bblast = 0;
	
	if (bbnumber == -1)
	{ // Close all open tags & default button names
		while (bbcode[0])
		{
			butnumber = arraypop(bbcode) - 1;
			txtarea.value += bbtags[butnumber + 1];
			buttext = eval('document.post.addbbcode' + butnumber + but + '.value');
			eval('document.post.addbbcode' + butnumber + but + '.value ="' + buttext.substr(0,(buttext.length - 1)) + '"');
		}
		txtarea.focus();
		return;
	}
	
	if ((clientVer >= 4) && is_ie && is_win)
	{
		theSelection = document.selection.createRange().text; // Get text selection
		if (theSelection)
		{
			// Add tags around selection
			document.selection.createRange().text = bbtags[bbnumber] + theSelection + bbtags[bbnumber+1];
			txtarea.focus();
			theSelection = '';
			return;
		}
	}
	else if (txtarea.selectionEnd && (txtarea.selectionEnd - txtarea.selectionStart > 0))
	{
		mozWrap(txtarea, bbtags[bbnumber], bbtags[bbnumber+1]);
		return;
	}
	
	// Find last occurance of an open tag the same as the one just clicked
	for (i = 0; i < bbcode.length; i++)
	{
		if (bbcode[i] == bbnumber+1)
		{
			bblast = i;
			donotinsert = true;
		}
	}
	
	if (donotinsert)
	{ // Close all open tags up to the one just clicked & default button names
		while (bbcode[bblast])
		{
			butnumber = arraypop(bbcode) - 1;
			txtarea.value += bbtags[butnumber + 1];
			buttext = eval('but.value');
			eval('but.value ="' + buttext.substr(0,(buttext.length - 1)) + '"');
			//imageTag = false;
		}
		txtarea.focus();
		return;
	}
	else
	{ // Open tags
		// Open tag
		txtarea.value += bbtags[bbnumber];
		arraypush(bbcode,bbnumber+1);
		eval('but.value += "*"');
		txtarea.focus();
		return;
	}
	storeCaret(txtarea);
}

// From http://www.massless.org/mozedit/
function mozWrap(txtarea, open, close)
{
	var selLength = txtarea.textLength;
	var selStart = txtarea.selectionStart;
	var selEnd = txtarea.selectionEnd;
	if (selEnd == 1 || selEnd == 2)
		selEnd = selLength;
	
	var s1 = (txtarea.value).substring(0,selStart);
	var s2 = (txtarea.value).substring(selStart, selEnd);
	var s3 = (txtarea.value).substring(selEnd, selLength);
	txtarea.value = s1 + open + s2 + close + s3;
	return;
}

// Insert at Caret position. Code from
// http://www.faqts.com/knowledge_base/view.phtml/aid/1052/fid/130
function storeCaret(textEl)
{
	if (textEl.createTextRange) textEl.caretPos = document.selection.createRange().duplicate();
}

// Tekst til dialogbokser
link_text_prompt = "Skriv inn teksten som skal vises pΠlenken (valgfri).";
link_url_prompt = "Skriv inn lenken.";
link_email_prompt = "Skriv inn e-postadressen.";
list_type_prompt = "Hvilken type liste ¿nsker du? Skriv '1' for en numrert liste, skriv 'a' for en alfabetisk liste, eller blank for en liste med kulepunkter.";
list_item_prompt = "Skriv inn et listeelement.\nLa boksen stΠtom eller trykk 'Cancel' for Πavslutte listen.";
image_size_prompt = "Angi maksimal h¿yde eller bredde pŒ bildet i pixler. La boksen stŒ tom for standardverdi.\n\nLovlige verdier: heltall mellom 32 og 1024.\n";
image_pos_prompt = "Angi bildets posisjon. La boksen stΠtom for standardverdi.\n\nLovlige verdier: 'right' og 'left'.";

function resource(thefield,vbcode,inserttext)
{
	if ((vbcode == null) || (vbcode == ""))
	{
		thefield.value += inserttext+" ";
	}
	else if ((inserttext != null) && (inserttext != ""))
	{
		var fieldvalue = "[ "+vbcode+" "+inserttext;
		maxsize = prompt(image_size_prompt,"");
		position = prompt(image_pos_prompt,"");
		if ((maxsize != null) && (maxsize != ""))
		{
			fieldvalue += " "+maxsize;
		}
		else if ((position != null) && (position != ""))
		{
			fieldvalue += " 240";
		}
		if ((position != null) && (position != ""))
		{
			fieldvalue += " "+position;
		}
		fieldvalue += " ]";
		thefield.value += fieldvalue;
	}
	thefield.focus();
}

function namedlink(thefield,thetype)
{
	var theSelection;
	var prompttext;
	
	if ((clientVer >= 4) && is_ie && is_win)
	{
		theSelection = document.selection.createRange().text;
	}
	else if (thefield.selectionEnd && (thefield.selectionEnd - thefield.selectionStart > 0))
	{
		var selLength = thefield.textLength;
		var selStart = thefield.selectionStart;
		var selEnd = thefield.selectionEnd;
		if (selEnd == 1 || selEnd == 2)
			selEnd = selLength;
		
		theSelection = (thefield.value).substring(selStart, selEnd);
	}
	else
	{
		theSelection = "";
	}
	
	linktext = theSelection ? theSelection : prompt(link_text_prompt,"");
	if (thetype == "")
	{
		prompt_text = link_url_prompt;
		prompt_contents = "http://";
	}
	else
	{
		prompt_text = link_email_prompt;
		prompt_contents = "";
	}
	
	linkurl = prompt(prompt_text,prompt_contents);
	if ((linkurl != null) && (linkurl != ""))
	{
		if ((linktext != null) && (linktext != ""))
		{
			if ((clientVer >= 4) && is_ie && is_win)
			{
				document.selection.createRange().text = "<a href=\""+thetype+linkurl+"\">"+linktext+"</a>";
			}
			else if (thefield.selectionEnd && (thefield.selectionEnd - thefield.selectionStart > 0))
			{
				var s1 = (thefield.value).substring(0,selStart);
				var s2 = "<a href=\""+thetype+linkurl+"\">"+linktext+"</a>";
				var s3 = (thefield.value).substring(selEnd, selLength);
				thefield.value = s1 + s2 + s3;
			}
			else
			{
				thefield.value += "<a href=\""+thetype+linkurl+"\">"+linktext+"</a>";
			}
		}
		else
		{
			if ((clientVer >= 4) && is_ie && is_win && theSelection)
			{
				document.selection.createRange().text = "<a href=\""+thetype+linkurl+"\">"+linkurl+"</a>";
			}
			else if (thefield.selectionEnd && (thefield.selectionEnd - thefield.selectionStart > 0))
			{
				var s1 = (thefield.value).substring(0,selStart);
				var s2 = "<a href=\""+thetype+linkurl+"\">"+linkurl+"</a>";
				var s3 = (thefield.value).substring(selEnd, selLength);
				thefield.value = s1 + s2 + s3;
			}
			else
			{
				thefield.value += "<a href=\""+thetype+linkurl+"\">"+linkurl+"</a>";
			}
		}
	}
	thefield.focus();
}

function dolist(thefield)
{ // inserts list with option to have numbered or alphabetical type
	listtype = prompt(list_type_prompt, "");
	if ((listtype == "a") || (listtype == "1"))
	{
		thelist = "\n<ol type=\""+listtype+"\">\n";
		listend = "</ol>\n";
	}
	else
	{
		thelist = "<ul>\n";
		listend = "</ul>\n";
	}
	listentry = "initial";
	while ((listentry != "") && (listentry != null))
	{
		listentry = prompt(list_item_prompt, "");
		if ((listentry != "") && (listentry != null))
		{
			thelist = thelist+"<li>"+listentry+"</li>\n";
		}
	}
	thefield.value += thelist+listend;
	thefield.focus();
}