function setUploadOff() {
	//alert('function called');
		document.pdata.code1.disabled = false;
		document.pdata.code2.disabled = false;
		document.pdata.uploadfile1.disabled = true;
		document.pdata.uploadfile2.disabled = true;
}
function setUploadOn() {
		document.pdata.code1.disabled = true;
		document.pdata.code2.disabled = true;
		document.pdata.uploadfile1.disabled = false;
		document.pdata.uploadfile2.disabled = false;
}

// Email Validation Javascript
// copyright 23rd March 2003, by Stephen Chapman, Felgall Pty Ltd

// You have permission to copy and use this javascript provided that
// the content of the script is not changed in any way.

function validateEmail(addr,man,db) {
if (addr == '' && man) {
   if (db) alert('email address is mandatory');
   return false;
}
var invalidChars = '\/\'\\ ";:?!()[]\{\}^|';
for (i=0; i<invalidChars.length; i++) {
   if (addr.indexOf(invalidChars.charAt(i),0) > -1) {
      if (db) alert('email address contains invalid characters');
      return false;
   }
}
for (i=0; i<addr.length; i++) {
   if (addr.charCodeAt(i)>127) {
      if (db) alert("email address contains non ascii characters.");
      return false;
   }
}

var atPos = addr.indexOf('@',0);
if (atPos == -1) {
   if (db) alert('email address must contain an @');
   return false;
}
if (atPos == 0) {
   if (db) alert('email address must not start with @');
   return false;
}
if (addr.indexOf('@', atPos + 1) > - 1) {
   if (db) alert('email address must contain only one @');
   return false;
}
if (addr.indexOf('.', atPos) == -1) {
   if (db) alert('email address must contain a period in the domain name');
   return false;
}
if (addr.indexOf('@.',0) != -1) {
   if (db) alert('period must not immediately follow @ in email address');
   return false;
}
if (addr.indexOf('.@',0) != -1){
   if (db) alert('period must not immediately precede @ in email address');
   return false;
}
if (addr.indexOf('..',0) != -1) {
   if (db) alert('two periods must not be adjacent in email address');
   return false;
}
var suffix = addr.substring(addr.lastIndexOf('.')+1);
if (suffix.length != 2 && suffix != 'com' && suffix != 'net' && suffix != 'org' && suffix != 'edu' && suffix != 'int' && suffix != 'mil' && suffix != 'gov' & suffix != 'arpa' && suffix != 'biz' && suffix != 'aero' && suffix != 'name' && suffix != 'coop' && suffix != 'info' && suffix != 'pro' && suffix != 'museum') {
   if (db) alert('invalid primary domain in email address');
   return false;
}
return true;
}

function is_int(str) {
	return (parseInt(str) == str);
}

function is_float(str) {
	return (parseFloat(str) == str);
}

function validateForm() {
	error = "";
	// validate email (allow blank)
	emailid = document.pdata.email.value;
	if (!(emailid == "")) {
		if (!validateEmail(emailid, true, false)) {
			alert("Please enter a valid e-mail address");
			return false;
		}
	}
	
	// validate structures
	if (document.pdata.uploadoption[0].checked) {
		// validate PDB codes
		pdb1 = document.pdata.code1.value;
		pdb2 = document.pdata.code2.value;
		var regexp1 = eval("/"+"[A-Z0-9]{4}"+"/gi");
		if (pdb1.length != 4 || pdb2.length != 4) { // || 
			//!pdb1.match(regexp) || !pdb2.match(regexp)) {
			alert("PDB Codes are 4 characters in length");
			return false;
		}
		
		if (!pdb1.match(regexp1) || !pdb2.match(regexp1)) {
			alert("Invalid PDB Codes");
			return false;
		}
	}
	else {
		if (document.pdata.uploadfile1.value == "" ||
			document.pdata.uploadfile2.value == "") {
			alert("Please specify input files or PDB codes");
			return false;
		}
	}
	
	// validate params
	// p-value
	// pvalue = parseFloat(document.pdata.pval.value);
	// if (pvalue != pvalue || pvalue >= 1.0 || pvalue <= 0.0) {
	// 	alert("p-value should be a number between 0 and 1");
	// 	return false;
	// }

	// clusters
	kvalue = document.pdata.kval.value;
	if (is_int(kvalue))
	{
		if (parseInt(kvalue) <= 0) {
			alert("# clusters should be a positive integer");
			return false;
		}
	}
	else {
		alert("# clusters should be a positive integer");
		return false;
	}
	
	// chainIDs, blank is fine
	c1 = document.pdata.chain1.value;
	c2 = document.pdata.chain2.value;
	if (!(c1 == "")) {
		if (c1.length > 1 || !c1.match(eval("/[A-Za-z]/g"))) {
			alert("Chain 1 should be either blank or a letter");
			return false;
		}
	}
	if (!(c2 == "")) {
		if (c2.length > 1 || !c2.match(eval("/[A-Za-z]/g"))) {
			alert("Chain 2 should be either blank or a letter");
			return false;
		}
	}
	
	// residues from and to
	r1 = document.pdata.resFrom1.value;
	r2 = document.pdata.resTo1.value;
	r3 = document.pdata.resFrom2.value;
	r4 = document.pdata.resTo2.value;
	
	if (!(r1 == "" && r2 == "")) {
		if (is_int(r1) && is_int(r2)) {
			if (parseInt(r1) >= parseInt(r2)) {
				alert("Invalid residue numbering for structure 1");
				return false;
			}
		}
		else {
			alert("Residue numbers for structure 1 should be integers");
			return false;
		}
	}
	
	if (!(r3 == "" && r4 == "")) {
		if (is_int(r3) && is_int(r4)) {
			if (parseInt(r3) >= parseInt(r4)) {
				alert("Invalid residue numbering for structure 2");
				return false;
			}
		}
		else {
			alert("Residue numbers for structure 2 should be integers");
			return false;
		}
	}
	
	// noise level
	s1 = parseFloat(document.pdata.sigma.value);
	if (s1 != s1 || s1 <= 0.0) {
		alert("Noise value must be a positive real");
		return false;
	}
	
	//alert("all checks out");
	return true;
}