/**
 * Decode the referrer string and return a list of search keywords.
 * @author Scott Yang <http://scott.yang.id.au/>
 */
function decodeReferrer() {
    var referrer = decodeURIComponent(document.referrer);
    var query = null;

    if (referrer.match(/^http:\/\/(www\.)?alltheweb.*/i)) {
	// AllTheWeb
	if (referrer.match(/q=/))
	    query = referrer.replace(/^.*q=([^&]+)&?.*$/i, '$1');
    } else if (referrer.match(/^http:\/\/(www)?\.?google.*/i)) {
	// Google
	if (referrer.match(/q=/))
	    query = referrer.replace(/^.*[&?]{1}q=([^&]+)&?.*$/i, '$1');
    } else if (referrer.match(/^http:\/\/(www)?\.?bing.*/i)) {
	// Bing
	if (referrer.match(/q=/))
	    query = referrer.replace(/^.*[&?]{1}q=([^&]+)&?.*$/i, '$1');
    } else if (referrer.match(/^http:\/\/search\.lycos.*/i)) {
	// Lycos
	if (referrer.match(/query=/))
	    query = referrer.replace(/^.*query=([^&]+)&?.*$/i, '$1');
    } else if (referrer.match(/^http:\/\/search\.msn.*/i)) {
	// MSN
	if (referrer.match(/q=/))
	    query = referrer.replace(/^.*p=([^&]+)&?.*$/i, '$1');
    } else if (referrer.match(/^http:\/\/search\.yahoo.*/i)) {
	// Yahoo
	if (referrer.match(/p=/))
	    query = referrer.replace(/^.*p=([^&]+)&?.*$/i, '$1');
    }

    if (query) {
	query = query.replace(/\'|"/, '');
	/*query = query.split(/[\s,\+\.]+/); */
	query = query.replace(/bkkhoesch\+/, '');
	query = query.replace(/bkk\+/, '');
	query = query.replace(/hoesch\+/, '');
	query = query.replace(/[+]/g, ' ');
    }

    return query;
}
function fillsearchbox () {
	document.ref_tx_indexedsearch['tx_indexedsearch[sword]'].value = decodeReferrer();
	document.ref_tx_indexedsearch['tx_indexedsearch[sword]'].focus();
}