// Last modification: 11/3/2007
//
// Javascript copyright 2003-2007 by Jeff Krause.  All rights reserved.
// Licensed to Amanda Real.
//

var clib_fLocal,clib_website,clib_websiteUrl,clib_pageUrl,clib_subUrl,clib_pagePath,clib_host;
var clib_currentYear = null;
var clib_rgUrlParam = new Array();
var clib_homePrefix;

function clib_checkTopUrl() { if (window != top) top.location.href = location.href; }
function clib_gotoTopUrl(url) { top.location.href = url; }
function clib_emailLink(user,dom,type,subj,cl) { return '<a ' + (cl == null ? '' : 'class=' + cl) + ' href="mailto:' + user + '@' + dom + '.' + type + (subj == null ? '' : '?subject=' + subj) + '">' + user + '@' + dom + '.' + type + '</a>'; }

function clib_cleanUrl(url) {
	if (url == null) return '';
	var x = url + ' ';
	url = x.substr(0,x.length-1);
	var len = url.length;
	var j = 0;
	var c = '';
	while (j < len) {
		var ch = url.charAt(j);
		var chLeft = len - j - 1;
		if (ch == '\\') ch = '/';
		else if ((ch == '%') && (chLeft >= 2)) if (url.substr(j,3) == '%20') {
			ch = ' ';
			j += 2;
			}
		c += ch;
		j++;
		}
	return c;
	}

function clib_initWebSiteName() {
	var url = document.location;
	url = clib_cleanUrl(url);
	var rgWebSuffix = new Array('.com', '.org', '.net');
	var nrgWebSuffix = rgWebSuffix.length;
	var rgFolders = new Array();
	rgFolders = url.split('/');
	clib_website = '';
	clib_homePrefix = '';
	clib_websiteUrl= '';
	clib_pagePath = '';
	var urlLocal = 'file:';
	clib_fLocal = (url.substr(0,urlLocal.length) == urlLocal);		// force to be string and see if its "file:..."
	var n = 0;
	for (var i = rgFolders.length - 1; i >= 0; i--) {
		for (var j = 0; j < rgWebSuffix.length; j++) {
			var web = rgWebSuffix[j].toLowerCase();
			var local = rgFolders[i].toLowerCase();
			if (local.length >= web.length) {
				if (web == local.substr(local.length-web.length,web.length)) {
					for (var k = i + 1; k < rgFolders.length - 1; k++) clib_pagePath += rgFolders[k] + '/';
					clib_website = local;
					clib_websiteUrl="http://" + clib_website + "/";
					if (clib_fLocal) {
						clib_homePrefix = '';
						if (n > 0) for (var i = 1; i < n; i++) clib_homePrefix += "../";
						}
					else clib_homePrefix = clib_websiteUrl;
					if (clib_fLocal) clib_host='local';
					else {
						var rgsite = new Array();
						rgsite = clib_website.split('.');
						clib_host = rgsite[rgsite.length-2].toLowerCase();
						}
					return;
					}
				}
			}
		n++;
		}
	return;
	}

function clib_getUrlPrefix(url) {
	url = clib_cleanUrl(url);
	var rg = url.split('#');
	if (rg.length < 2) rg = url.split('?');
	if (rg.length > 1) url = rg[0];
	rg = url.split('/');
	if (rg.length > 1) return rg[rg.length-1];
	else return url;
	}

function clib_getUrlSuffix(url) {
	url = clib_cleanUrl(url);
	var ch = '#';
	var rg = url.split(ch);
	if (rg.length < 2) { ch = '?'; rg = url.split(ch); }
	if (rg.length > 1) {
		url = rg[1];
		for (var i = 2; i < rg.length; i++) url += ch + rg[i];
		return url;
		}
	else return null;
	}

function clib_urlParamType(id,value) { this.members = 'id,value'; this.id = id; this.value = value; }
function clib_initClibLibrary(url) {
	clib_initWebSiteName();
	if (url == null) url = document.location;
	clib_pageUrl = clib_getUrlPrefix(url);
	clib_subUrl = clib_getUrlSuffix(url);
	if (clib_subUrl != null) {
		var rg = clib_subUrl.split('&');
		for (var i = 0; i < rg.length; i++) {
			var id,value;
			var rgp = rg[i].split('=');
			if (rgp.length > 2) for (var j = 2; j < rgp.length; j++) rgp[1] += '=' + rgp[j];
			if (rgp.length < 2) { id = rg[i]; value = ''; }
			else { id = rgp[0]; value = rgp[1]; }
			clib_rgUrlParam[clib_rgUrlParam.length] = new clib_urlParamType(id,value);
			}
		}
	var td = new Date();
	clib_currentYear = td.getFullYear();
	}

clib_initClibLibrary();

//
// Amanda Real routines
//

function hideem() {
	var html = clib_emailLink('info', 'amandareal', 'com', 'AmandaReal.com inquiry',null);
	document.write(html);
	}

function checkWebSiteName() {
	if (clib_fLocal) return;
	if ((window != top) || (clib_website != 'amandareal.com')) top.location.href = 'http://amandareal.com/' + clib_pageUrl;
	}

checkWebSiteName();
window.focus();