// create global vars
koders_search_url = '';


// set default vars if required
// none required at this time

// run
koders_show_searchbox();
// done


function append_url_param(url, param_name, param_value) {
	//var eval_val = eval("window."+param_name);
	//alert(eval_val);
	alert("param val = " + param_value);
	if(param_value)
	{
		var new_url = url + "&" + param_name + "=" + param_value;
		alert(new_url);
		return new_url;
	}
	else {
		return url;
	}
}

// the main function
function koders_show_searchbox() {
	var w = window;
	if(w.koders_search_format == "vertical") {
		if(!w.koders_search_width || w.koders_search_width < 120)
		{
			w.koders_search_width = 120;
		}
		koders_search_height = 42; 
	}
	else if(w.koders_search_format == "vertical_ext") {
		if(!w.koders_search_width || w.koders_search_width < 120) 
		{
			w.koders_search_width = 120;
		}
		koders_search_height = 60; 
	}
	else {
		w.koders_search_format = "horizontal";
		if(!w.koders_search_width || w.koders_search_width < 265)
		{
			w.koders_search_width = 265;
		}
		koders_search_height = 60; 
	}
	
	w.koders_search_url = "http://www.koders.com/Special/Tools/AddSearchToSite.aspx?"
		+ "koders_search_format=" + w.koders_search_format;
		
		
	if(w.koders_search_scope) {
		w.koders_search_url += "&koders_search_scope=" + w.koders_search_scope;
	}
		
	if(w.koders_search_rid && w.koders_search_pname) {
		w.koders_search_url += "&koders_search_rid=" + w.koders_search_rid;
		w.koders_search_url += "&koders_search_pname=" + w.koders_search_pname;
	}
	
	w.koders_search_url += "&koders_search_width=" + w.koders_search_width;

	//w.koders_search_url = append_url_param(w.koders_search_url, 
	//	"koders_search_source", w.koders_search_source);
		
	if(w.koders_search_source) {
		w.koders_search_url += "&koders_search_source=" + w.koders_search_source;
	}
	
	// so that we can link back. This should always be the last url parameter
	if(document.location.href) {
		w.koders_search_url += "&referrer="+document.location.href;
	}
	
	
	w.koders_search_url = w.koders_search_url.substring(0, 1000);
	w.koders_search_url = w.koders_search_url.replace(/%\w?$/, '');
  
	var iframe_html = '<ifr' + 'ame' +
                     ' name="koders_search_frame"' +
                     ' width=' + quoted(w.koders_search_width) +
                     ' height=' + quoted(w.koders_search_height) +
                     ' frameborder="0"' +
                     ' src=' + quoted(w.koders_search_url) +
                     ' marginwidth="0"' +
                     ' marginheight="0"' +
                     ' vspace="0"' +
                     ' hspace="0"' +
                     ' allowtransparency="true"' +
                     ' scrolling="no">';
	iframe_html += '</ifr' + 'ame>';
	
	// alert(iframe_html);
	document.write(iframe_html);
      
      
      //alert(w.koders_search_width);
      // clear are vars
      w.koders_search_url = null;
}

function quoted(str) {
  return (str != null) ? '"' + str + '"' : '""';
}

