(function() {
	
	/**
	 * GeoKBD 0.3 - Georgian keyboard and text convertation library
	 *
	 * Copyright (c) 2007 Ioseb Dzmanashvili (http://www.code.ge)
	 * Licensed under the MIT (http://www.opensource.org/licenses/mit-license.php)
	 */
	
	String.prototype.pasteTo = function(field) {
		field.focus();
		if (document.selection) {
			var selection = document.selection;
			var range = selection.createRange();
			range.colapse;
			if (range) {
				range.text = this;
			}
		} else if (field.selectionStart || field.selectionEnd) {
			var scrollTop = field.scrollTop, start = field.selectionStart, end = field.selectionEnd;
			var value = field.value.substring(0, start) + this + field.value.substring(end, field.value.length);
			field.value = value;
			field.scrollTop = scrollTop;
			field.selectionStart = field.selectionEnd = start + this.length;
		} else {
			field.value += this;
			field.selectionStart = field.selectionEnd = field.value.length;
		}
	}, 
	
	String.prototype.translateToKA = function() {
		
		/**
		 * Original idea by Irakli Nadareishvili
		 * http://www.sapikhvno.org/viewtopic.php?t=47&postdays=0&postorder=asc&start=10
		 */
		var index, chr, text = [], symbols = "abgdevzTiklmnopJrstufqRySCcZwWxjh";
		
		for (var i = 0; i < this.length; i++) {
			chr = this.substr(i, 1);
			if ((index = symbols.indexOf(chr)) >= 0) {
				text.push(String.fromCharCode(index + 4304));
			} else {
				text.push(chr);
			}
		}
		
		return text.join('');
		
	},
	
	GeoKBD = {
		
		browser: {
			isOpera: navigator.userAgent.toLowerCase().indexOf('opera') > -1,
			isIe: navigator.userAgent.toLowerCase().indexOf('msie') > -1,
			isIe6: navigator.userAgent.toLowerCase().indexOf('msie 6') > -1,
			isIe7: navigator.userAgent.toLowerCase().indexOf('msie 7') > -1
		},
		
		event: {
			
			get: function(e) {
				return e || window.event;
			},
			
			getKeyCode: function(e) {
				e = this.get(e);
				return e.keyCode || e.which;
			},
			
			targetIs: function(e, tagName) {
				e = this.get(e);
				var t = e.target || e.srcElement;
				return t.tagName.toLowerCase() == tagName ? t : null;
			},
			
			attach: function(obj, eventName, fnc, capture) {
				if (obj.addEventListener) {
					obj.addEventListener(eventName, fnc, capture);
				} else if (obj.attachEvent) {
					return obj.attachEvent('on' + eventName, fnc);
				} else {
					obj['on' + eventName] = fnc;
				}	
			},
			
			detach: function(obj, eventName, fnc, capture) {
				if (obj.removeEventListener) {
					obj.removeEventListener(eventName, fnc, capture);
				} else if (obj.detachEvent) {
					obj.detachEvent('on' + eventName, fnc);
				} else {
					obj['on' + eventName] = null;
				}
			},
			
			cancel: function(e) {
				e = this.get(e);
				if (e.stopPropagation) {
					e.stopPropagation();
					e.preventDefault();
				} else {
					e.cancelBubble = true;
					e.returnValue = false;
				}
			}
			
		},
		
		map: function(form, fieldName, switcher) {
			
			var self = this;
			
			form = (typeof form == 'string') ? document.forms[form] : form;
						
			if (!form.fields || form.fields == undefined) form.fields = {};
			if (form.ka == undefined) form.ka = form[switcher] ? form[switcher].checked : true;
			
			if (fieldName) {
				if (typeof fieldName == 'string') fieldName = [fieldName];
				for (var i = 0; i < fieldName.length; i++) {
					if (form[fieldName[i]] && !form.fields[fieldName[i]]) form.fields[fieldName[i]] = fieldName[i];
				}
			} else {
				var name, type;
				for (var i = 0; i < form.elements.length; i++) {
					if (form.elements[i].type) {
						name = form.elements[i].name; type = form.elements[i].type.toLowerCase();
						if (type == 'text' || type == 'textarea') {
							form.fields[name] = name;
						}
					}
				}
			}
			
			switcher = switcher || 'geo';
			form.switcher = switcher;
			
			form.onkeypress = function(e) {
				
				e = self.event.get(e);
				if (e.altKey || e.ctrlKey) return;
				
				var target, _switcher = switcher, keyCode = self.event.getKeyCode(e);
				
				if (keyCode == 96) {
					if (this[_switcher]) {
						this.ka = this[_switcher].checked = !this[_switcher].checked;
					} else {
						this.ka = !this.ka;
					}
					return false;
				} else if (this[_switcher]) {
					this.ka = this[_switcher].checked;
				}
				
				if (!this.ka) return;
				
				if ((target = (self.event.targetIs(e, 'textarea') || self.event.targetIs(e, 'input')))) {
					if (!this.fields[target.name]) return;
					text = String.fromCharCode(keyCode);
					kaText = text.translateToKA();
					if (kaText != text) {
						kaText.pasteTo(target);
						return false;
					}
				}
			}
			
			form = null;
			
		},
		
		mapIFrame: function(iframe) {
			
			var __keypress = function(e) {
				
				var doc = (e.target || e.srcElement).ownerDocument;
				if (doc.ka == undefined) doc.ka = true;
				var keyCode = GeoKBD.event.getKeyCode(e);
				var text = String.fromCharCode(keyCode);
				var form, switcher;
				if (parent.document.forms[doc.parentForm]) {
					form = parent.document.forms[doc.parentForm];
					if (form.switcher && form[form.switcher]) {
						switcher = form[form.switcher];
					}
				}
				
				if (keyCode == 96) {
					doc.ka = !doc.ka;					
					if (switcher) switcher.checked = doc.ka;
					GeoKBD.event.cancel(e);
				} else if (switcher) {
					doc.ka = switcher.checked;
				}
				
				form = switcher = null;
				
				if (doc.ka) {				
					var kaText = text.translateToKA();
					if (kaText != text) {
						if (!GeoKBD.browser.isIe) {
							doc.execCommand('InsertHTML', false, kaText);
						} else {
							var range = doc.selection.createRange();
							range.pasteHTML(kaText);
						}
						GeoKBD.event.cancel(e);
					}
				}
				
			}
			
			var __focus = function(e) {			
				if (!GeoKBD.browser.isIe) {
					GeoKBD.event.attach(this.document, 'keypress', __keypress, true);
					GeoKBD.event.detach(this, 'focus', __focus, true);
				} else {
					GeoKBD.event.attach(this.contentWindow.document, 'keypress', __keypress, true);
					this.onfocus = null;
				}
			};
			
			var interval = window.setInterval(function() {
				var el = typeof iframe=='string' ? document.getElementById(iframe) : iframe();
				if (el) {
					for (var p = el.parentNode; p && p != document.body; p = p.parentNode) {
						if (/form/i.test(p.tagName)) {
							if (el.contentWindow.document) {
								el.contentWindow.document.parentForm = p.name || p.id;
							} else {
								el.document.parentForm = p.name || p.id;
							}
							break;
						}
					}
					if (!GeoKBD.browser.isIe) {		
						GeoKBD.event.attach(el.contentWindow, 'focus', __focus, true);
					} else {
						el.onfocus = __focus;
					}
					el = null;
					window.clearInterval(interval);
				}
			}, 100);
			
		}
		
	};
	
	window.GeoKBD = GeoKBD;

})();