dbg = 0;
var run;
var myvar = "undefined";
if ( run == undefined ) run = 0;
if ( myvar == "undefined" ) myvar = "indetpt";

// Parse the URL.
//run = 0;
//myvar = "indetpt";
superqueries = parse_url().queries;
if ( superqueries.length == 1 ) queries = superqueries[0].split("&");
else queries = superqueries;
indent = "  ";
newline = "<br>";
newindent = "<br>" + indent;
if ( dbg ) document.writeln("Parsing " + queries.length.toString() + " queries");
for ( i=0; i<queries.length; ++i ) {
  query = queries[i];
  if ( dbg ) document.writeln(newindent + "Query: " + query);
  vals = query.split("=")
  if ( vals.length != 2 ) continue;
  name = vals[0];
  val = vals[1];
  if ( dbg ) document.writeln(newindent + name + " = " + val);
  if ( name == "run" ) {
    run = val;
    if ( dbg ) document.writeln(newindent + "Run is " + run);
  } else if ( name == "myvar" ) {
    myvar = val;
    if ( dbg ) document.writeln(newindent + "Variable is " + myvar);
  }
}

function runit() {
  //run = inrun;
  //myvar = invar;
}

if ( run > 0 ) {
  //run = runform.run;
  //myvar = runform.myvar;
  prefix = "http://atlasdqm.cern.ch/tier0/Cosmics08/1/physics_IDCosmic/run_";
  suffix = "";
  if ( myvar == "indetpt" ) {
    suffix = "/run/InnerDetector/IDAlignment/Tracks_NoTriggerSelection/GenericTracks/pT.html";
  } else if ( myvar == "muonpt" ) {
    suffix = "/run/MuonTracks/ConvertedMBoy/NoMuonTriggerSelection/m_recomuon_POS_pT.html";
  }
  url = prefix + run + suffix;
  if ( dbg ) document.writeln(newline + url);
  else location.href = prefix + run + suffix;
}

// Form for name pattern.
document.write("<form name=\"runform\" action=\"dq.html\" onsubmit=\"runit()\">");
document.write("Run: ");
document.write("<input type=\"text\" size=7 name=\"run\" value=\"" + run + "\">");
document.write("<p>Variable: ");
document.write("<input type=\"text\" size=7 name=\"myvar\" value=\"" + myvar + "\">");
document.write("<p><input type=\"submit\" value=\"Submit\">");
document.write("</form>");