/* Library of procedures to manipulate strings

	Functions
	---------
	IndexStr
	getArgs

*/

/*********************************************************************

	NAME:          indexString
	DESCRIPTION:   Returns the indexed element of a delimited string
	PARAMETERS:    s - string, d - delimiter, i - index to return
	RETURNS:       String

	DECLARATION:   indexString(s, d, i)
	LANGUAGE:      Javascript
	VERSION:       1.0
	TYPE:          Function
	KEYWORDS:      string, delimit, index
	DEPENDENCIES:  None
	COMMENTS:
	HISTORY:

	DATE       WHO             DESCRIPTION
	2001.12.07 Thomas Adkins   Initial creation of file

*********************************************************************/
function indexString(s, d, i) {
	c = String.fromCharCode(0)
	x = s.replace(d, c);
	a = x.split(c);
	if (a.length == 1) {
		return s;
	} else {
		return a[i - 1];
	}
}

/*********************************************************************

	NAME:          getArgs
	DESCRIPTION:   Returns an array of querystring arguments
	PARAMETERS:
	RETURNS:       String

	DECLARATION:   getArgs()
	EXAMPLE:			http://www.example.com/index.htm?name=Fred&age=25

						var args = getArgs();
						if (args.name) document.write('Name: '+args.name+'<BR>');
						if (args.age) document.write('Age: '+args.age);

	LANGUAGE:      Javascript
	VERSION:       1.0
	TYPE:          Function
	KEYWORDS:      string, url, querystring, search
	DEPENDENCIES:  None
	COMMENTS:
	HISTORY:

	DATE       WHO             DESCRIPTION
	2002.01.31 Thomas Adkins   copied from comp.lang.javascript by Michael Crowe.

*********************************************************************/
function getArgs() {
	var args = new Object();
	var query = location.search.substring(1);
	var pairs = query.split("&");

	for (var i = 0; i < pairs.length; i++) {
		var pos = pairs[i].indexOf('=');
		if (pos == -1) continue;
		var argname = pairs[i].substring(0,pos);
		var value = pairs[i].substring(pos+1);
		args[argname] = unescape(value);
	}
	return args;
}