function ssSetFormFocus(Formname, Elementname) 
{
   if (document.forms.length > 0) {
     if (document.forms[Formname]) {
       if (document.forms[Formname].elements[Elementname]) 
          document.forms[Formname].elements[Elementname].focus();
     }
   }
}


function ssChangeFormButton(Thisform, FieldName, FieldValue) 
{
   var field = Thisform.elements[FieldName];
   if (field) {
      field.disabled = true;
      field.value = FieldValue;
   }
   return true;
}



function ssOpenFormWindow(Chooser,FormField,FormFieldValue,FormField2,
                          FormField2Value,FormField3,FormField3Value,
                          FormField4,FormField4Value,
                          FormField5,FormField5Value,
                          FormField6,FormField6Value)
{
   if (!Chooser) return 0;

   var newPage;
   var p = window.name.substring(0,10);
   if (p == 'formpage')
     newPage = window.name + 'a';
   else
     newPage = 'formpage';

   var addOn = "";
   if ((FormField != null) && (FormFieldValue != null))
      addOn = '&' + escape(FormField) + '=' + escape(FormFieldValue);
   if ((FormField2 != null) && (FormField2Value != null))
      addOn = addOn + '&' + escape(FormField2) + '=' + escape(FormField2Value);
   if ((FormField3 != null) && (FormField3Value != null))
      addOn = addOn + '&' + escape(FormField3) + '=' + escape(FormField3Value);
   if ((FormField4 != null) && (FormField4Value != null))
      addOn = addOn + '&' + escape(FormField4) + '=' + escape(FormField4Value);
   if ((FormField5 != null) && (FormField5Value != null))
      addOn = addOn + '&' + escape(FormField5) + '=' + escape(FormField5Value);
   if ((FormField6 != null) && (FormField6Value != null))
      addOn = addOn + '&' + escape(FormField6) + '=' + escape(FormField6Value);

   var urlStr = '/cgi-bin/dusk?duskchooser=' + Chooser + addOn;

   var xAdd = newPage.length - 10;

   var newWin = window.open(urlStr,newPage,'height=600,width=700,left=' + 
                           ((xAdd * 100) + 100) + 
                            ',top=' + ((xAdd * 100) + 100) +',scrollbars=yes,resizable=yes');
   if (p == 'formpage')
      newWin.scroll(100,100);
}

function ssOpenSizedFormWindow(Chooser,WidthValue,HeightValue,FormField,FormFieldValue,FormField2,
                               FormField2Value,FormField3,FormField3Value,
                               FormField4,FormField4Value,
                               FormField5,FormField5Value,
                               FormField6,FormField6Value)
{
   if (!Chooser) return 0;

   var newPage;
   var p = window.name.substring(0,10);
   if (p == 'formpage')
     newPage = window.name + 'a';
   else
     newPage = 'formpage';

   var addOn = "";
   if ((FormField != null) && (FormFieldValue != null))
      addOn = '&' + escape(FormField) + '=' + escape(FormFieldValue);
   if ((FormField2 != null) && (FormField2Value != null))
      addOn = addOn + '&' + escape(FormField2) + '=' + escape(FormField2Value);
   if ((FormField3 != null) && (FormField3Value != null))
      addOn = addOn + '&' + escape(FormField3) + '=' + escape(FormField3Value);
   if ((FormField4 != null) && (FormField4Value != null))
      addOn = addOn + '&' + escape(FormField4) + '=' + escape(FormField4Value);
   if ((FormField5 != null) && (FormField5Value != null))
      addOn = addOn + '&' + escape(FormField5) + '=' + escape(FormField5Value);
   if ((FormField6 != null) && (FormField6Value != null))
      addOn = addOn + '&' + escape(FormField6) + '=' + escape(FormField6Value);

   var urlStr = '/cgi-bin/dusk?duskchooser=' + Chooser + addOn;

   var xAdd = newPage.length - 10;

   var newHeight = HeightValue;
   var newWidth = WidthValue;
   if (newHeight > screen.height)
      newHeight = screen.height;
   if (newWidth > screen.width)
      newWidth = screen.width;

   var newWin = window.open(urlStr,newPage,'height=' + newHeight + ',width=' + newWidth + ',left=' + 
                           ((xAdd * 100) + 100) + 
                            ',top=' + ((xAdd * 100) + 100) +',scrollbars=yes,resizable=yes');
   if (p == 'formpage')
      newWin.scroll(100,100);
}



function ssCheckResize(NewWidth,NewHeight)
{
   var newHeight = NewHeight;
   var newWidth = NewWidth;
   if (newHeight > screen.height)
      newHeight = screen.height;
   if (newWidth > screen.width)
      newWidth = screen.width;

   var scrollToX = window.location.x;
   var scrollToY = window.location.y;
   if ((window.location.x + newWidth) > screen.width)
      scrollToX = 0;
   if ((window.location.y + newHeight) > screen.height)
      scrollToY = 0;

   window.scroll(scrollToX,scrollToY);
   window.resizeTo(newWidth,newHeight);
}


function ssCheckPopupSession()
{
   var oldWin = window.opener;
   if (oldWin == null || oldWin.closed) {
      window.close();
      alert('You have clicked on a link that opened a window from a prior browser session ' +
              'This is caused by closing the main browser window, but not closing all of the ' +
              'popup browser windows.  This can also occur when you close your main browser window ' +
              'while viewing this popup window.  We will now close your popup window.  If you click on ' +
              'the link that chose to get here again, you will get a new window that will be ' +
              'valid for this session.');
      return false;
   }
   return true;
}


function ssHCInlineCloseup(IDTag)
{
  var idTag = 'DUSKLT_L_' + IDTag;
  var theTag = document.getElementById(idTag);
  if (!theTag) return 0;
  theTag.style.display = '';

  idTag = 'DUSKLT_M_' + IDTag;
  theTag = document.getElementById(idTag);
  if (!theTag) return 0;
  theTag.style.display = 'none';
  return 0;
}

function ssHCInlineExpand(IDTag)
{
  var idTag = 'DUSKLT_L_' + IDTag;
  var theTag = document.getElementById(idTag);
  if (!theTag) return 0;
  theTag.style.display = 'none';

  idTag = 'DUSKLT_M_' + IDTag;
  theTag = document.getElementById(idTag);
  if (!theTag) return 0;
  theTag.style.display = '';
  return 0;
}

function ssHCPopup(Context)
{
  ssOpenSizedFormWindow('clhcpopupdoc',300,250,'fldHC',Context);
}


/**
 * Convert a single file-input element into a 'multiple' input list
 *
 * Usage:
 *
 *   1. Create a file input element (no name)
 *      eg. <input type="file" id="first_file_element">
 *
 *   2. Create a DIV for the output to be written to
 *      eg. <div id="files_list"></div>
 *
 *   3. Instantiate a MultiSelector object, passing in the DIV and an (optional) maximum number of files
 *      eg. var multi_selector = new MultiSelector( document.getElementById( 'files_list' ), 3 );
 *
 *   4. Add the first element
 *      eg. multi_selector.addElement( document.getElementById( 'first_file_element' ) );
 *
 *   5. That's it.
 *
 *   You might (will) want to play around with the addListRow() method to make the output prettier.
 *
 *   You might also want to change the line 
 *       element.name = 'file_' + this.count;
 *   ...to a naming convention that makes more sense to you.
 * 
 * Licence:
 *   Use this however/wherever you like, just don't blame me if it breaks anything.
 *
 * Credit:
 *   If you're nice, you'll leave this bit:
 *  
 *   Class by Stickman -- http://www.the-stickman.com
 *      with thanks to:
 *      [for Safari fixes]
 *         Luis Torrefranca -- http://www.law.pitt.edu
 *         and
 *         Shawn Parker & John Pennypacker -- http://www.fuzzycoconut.com
 *      [for duplicate name bug]
 *         'neal'
 */
function MultiSelector( list_target, max ){

	// Where to write the list
	this.list_target = list_target;
	// How many elements?
	this.count = 0;
	// How many elements?
	this.id = 0;
	// Is there a maximum?
	if( max ){
		this.max = max;
	} else {
		this.max = -1;
	};
	
	/**
	 * Add a new file input element
	 */
	this.addElement = function( element ){

		// Make sure it's a file input element
		if( element.tagName == 'INPUT' && element.type == 'file' ){

			if ( ! element.basename ) 
                          element.basename = element.name;

			// Element name -- what number am I?
			element.name = element.basename + '_' + this.id++;

			// Add reference to this object
			element.multi_selector = this;

			// What to do when a file is selected
			element.onchange = function(){

				// New file input
				var new_element = document.createElement( 'input' );
				new_element.type = 'file';
                                new_element.basename = this.basename;

				// Add new element
				this.parentNode.insertBefore( new_element, this );

				// Apply 'update' to element
				this.multi_selector.addElement( new_element );

				// Update list
				this.multi_selector.addListRow( this );

				// Hide this: we can't use display:none because Safari doesn't like it
				this.style.position = 'absolute';
				this.style.left = '-1000px';

			};
			// If we've reached maximum number, disable input element
			if( this.max != -1 && this.count >= this.max ){
				element.disabled = true;
			};

			// File element counter
			this.count++;
			// Most recent element
			this.current_element = element;
			
		} else {
			// This can only be applied to file input elements!
			alert( 'Error: not a file input element' );
		};

	};

	/**
	 * Add a new row to the list of files
	 */
	this.addListRow = function( element ){

		// Row div
		var new_row = document.createElement( 'div' );

		// Delete button
		var new_row_button = document.createElement( 'input' );
		new_row_button.type = 'button';
		new_row_button.value = 'Delete';

		// References
		new_row.element = element;

		// Delete function
		new_row_button.onclick= function(){

			// Remove element from form
			this.parentNode.element.parentNode.removeChild( this.parentNode.element );

			// Remove this row from the list
			this.parentNode.parentNode.removeChild( this.parentNode );

			// Decrement counter
			this.parentNode.element.multi_selector.count--;

			// Re-enable input element (if it's disabled)
			this.parentNode.element.multi_selector.current_element.disabled = false;

			// Appease Safari
			//    without it Safari wants to reload the browser window
			//    which nixes your already queued uploads
			return false;
		};

		// Set row value
		new_row.innerHTML = element.value;

		// Add button
		new_row.appendChild( new_row_button );

		// Add it to the list
		this.list_target.appendChild( new_row );
		
	};

};