monotype.js

;var monotype = monotype || (function(monotype){
	monotype.range = function(n){
		var R, s, t, n = n || 0, win = monotype.win || window, doc = win.document;
		if(!arguments.length) return doc.createRange();
		if(!(win.Range && R instanceof Range)){
			s = win.getSelection? win.getSelection() : {};
			if(s.rangeCount){ 
				R = s.getRangeAt(n);
			} else {
				if(doc.createRange){
					R = doc.createRange();
					R.setStart(doc.body, 0);
				} else 
				if (doc.selection){ // <IE9
					R = doc.selection.createRange();
					R = R.getBookmark();
				}
			}
			s.end = (s.extentNode || s.focusNode || R.startContainer);
			if(s.anchorNode === s.end){
				R.direction = s.anchorOffset <= (s.extentOffset || s.focusOffset || 0)? 1 : -1;
			} else
			if($.contains(s.anchorNode||{}, s.end||{})){
				s.end = $(s.anchorNode).contents().filter(s.end).length? s.end : $(s.end).parentsUntil(s.anchorNode).last()[0];
				R.direction = s.anchorOffset < $(s.anchorNode).contents().index(s.end)? 1 : -1; // Compare immediate descendants to see which comes first.
			} else {
				R.direction = s.anchorNode === R.endContainer? -1 : 1; // Checking against startContainer fails going backward.
			}
		}
		return R;
	}
	monotype.restore = function(R){
		var win = monotype.win, doc = win.document;
		if(R.R && R.restore){ 
			R.restore();
			return;
		}
		if(win.getSelection){
			var s = win.getSelection();
			s.removeAllRanges();
			if(s.extend && R.direction < 0){
				R.esC = R.startContainer;
				R.esO = R.startOffset;
				R.setStart(R.endContainer, R.endOffset);
			}
			s.addRange(R);
			R.esC && s.extend(R.esC, R.esO);
		} else {
			if(doc.body.createTextRange) { // <IE9
				var ier = doc.body.createTextRange();
				ier.moveToBookmark(R);
				ier.select();
			}
		}
	}
	monotype.text = function(n){
		return !n? false : (n.nodeType == 3 || n.nodeType == Node.TEXT_NODE);
	}
	monotype.prev = function(n,c,d){
		return !n? null : n === c? null
		: n[(d?'next':'previous')+'Sibling']?
			monotype.deep(n[(d?'next':'previous')+'Sibling'],d?-1:Infinity).container
		: monotype.prev($(n).parent()[0],c,d);
	}; monotype.next = function(n,c){ return monotype.prev(n,c,1) }
	monotype.deep = function(n, o, c, i){
		return i = (o === Infinity? $(n).contents().length-1 : o),
		i = (i === -1? 0 : i),
		(c = $(n).contents()).length?
			monotype.deep(c = c[i < c.length? i : c.length - 1], monotype.text(c)? 0 : o)
		: {
			container: n
			,offset: $(n).text() && o !== -1? (o === Infinity? $(n).text().length : o) : 0
		};
	}
	monotype.count = function(n, o, c){
		var g = monotype.deep(n, o)
		, m = g.container
		, i = g.offset || 0;
		while(m = monotype.prev(m,c)){
			i += $(m).text().length;
		}
		return i;
	}
	monotype.hint = function(n, o, c){
		var g = monotype.deep(n, o)
		, m = g.container
		, i = g.offset || 0
		, h = [], t;
		while(m){
			h.push({
				t: t = $(m).text()
				,n: t? 'TEXT' : m.nodeName
			});
			m = t? null : monotype.prev(m,c);
		}
		if(h.length == 1 && h[0].t){
			return [];
		}
		if((t = $(n).contents()).length && o == t.length){
			h.push(1); // Indicate that the selection is after the last element.
		}
		return h;
	}
	monotype.reach = function(i, c, o){
		o = o || {};
		o.i = o.i || o.offset || 0;
		o.$ = o.$? o.$.jquery? o.$ : $(o.$) 
		: o.container? $(o.container) : $(c);
		var n = monotype.deep(o.$[0], -1).container, t;
		while(n){
			t = $(n).text().length;
			if(i <= o.i + t){
				o.$ = $(n);
				o.i = i - o.i;
				n = null;
			} else {
				o.i += t;
			}
			n = monotype.next(n,c);
		}
		return o;
	}
	return monotype;
})(function(r,opt){
	r = r || {};
	opt = opt || {};
	monotype.win = opt.win || window;
	r = r.jquery || monotype.text(r)? {root: $(r)} : r;
	r.root = $(r.root || monotype.win.document.body);
	var t, m = monotype;
	//console.log('_______________________');
	r.R = m.range(0);
	r.H = {};
	r.H.R = $.extend({}, r.R);
	r.d = r.R.direction || 1;
	r.t = r.R.toString();
	r.H.s = m.hint(r.R.startContainer, r.R.startOffset, r.root[0]);
	r.s = m.count(r.R.startContainer, r.R.startOffset, r.root[0]);
	t = m.deep(r.R.startContainer, r.R.startOffset);
	(!t.offset && !r.H.s.length) && (r.s += 0.1); // At the beginning of a text, not at the end of a text.
	r.H.e = m.hint(r.R.endContainer, r.R.endOffset, r.root[0]);
	r.e = (function(n, o, c, t){
		if(r.R.collapsed
		|| (o === r.R.startOffset 
		&& n === r.R.startContainer)){
			return r.s;
		} c = m.count(n, o, r.root[0]);
		t = m.deep(n, o);
		(!t.offset && !r.H.e.length) && (c += 0.1); // Same as above.
		return c;
	})(r.R.endContainer, r.R.endOffset);
	//console.log(r.s, r.R.startOffset, r.H.s, 'M',r.d,'E', r.H.e, r.R.endOffset, r.e);
	t = r.root.text();
	r.L = t.length;
	r.T = {
		s: t.slice(r.s - 9, r.s)
		,e: t.slice(r.e, r.e + 9)
		,t: function(){ return r.T.s + r.T.e }
	}
	r.range = function(){
		//console.log('----');
		r.H = r.H || {};
		var s = m.reach(r.s, r.root[0])
		, st = s.$.text()
		, e = m.reach(r.e, r.root[0])
		, et = e.$.text()
		, R = m.range()
		, p = function(g, c){ // TODO: BUG! Backtracking in non-Chrome and non-IE9+ browsers. IE9 doesn't like end selections.
			if(!c || !c.length){
				return g;
			}
			var n = g.$[0], f = [], i = 0, t;
			while((n = m.next(n,r.root[0])) && ++i < c.length){
				t = $(n).text();
				if(t){
					n = null;
				} else {
					f.push(n);
				}
			}
			n = $(f[f.length-1] || g.$);
			t = n.parent();
			if(c[c.length-1] === 1 || (i && f.length === i)){
				return {
					i: t.contents().length
					,$: t
				}
			} if(f.length < c.length - 1){
				f = t.contents().slice(n = t.contents().index(n));
				i = f.map(function(j){ return $(this).text()? (n+j+1) : null})[0] || t.contents().length;
				f = f.slice(0, i - n);
				n = f.last()[0];
				if(g.$[0] === n){
					return g;
				}
				return {
					$: t
					,i: t.contents().index(n)
				}
			}
			return {
				i: 0
				,$: n
			};
		}
		s = p(s, r.H.s);
		e = p(e, r.H.e);
		//console.log("START", parseInt(s.i), 'in """',(s.$[0]),'""" with hint of', r.H.s, 'from original', r.s);
		//console.log("END", parseInt(e.i), 'in """',(e.$[0]),'""" hint clue of', r.H.e, 'from original', r.e);
		R.setStart(s.$[0], parseInt(s.i));
		R.setEnd(e.$[0], parseInt(e.i));
		return R;
	}
	r.restore = function(R){
		if(r.R.startOffset !== r.H.R.startOffset
		|| r.R.endOffset !== r.H.R.endOffset
		|| r.R.startContainer !== r.H.R.startContainer
		|| r.R.endContainer !== r.H.R.endContainer){
			r.R = R = r.range();
		} else {
			R = r.R;
		}
		R.direction = r.d;
		m.restore(R);
		return r;
	}
	return r;
});