/*  Prototype JavaScript framework, version 1.6.0.2
 *  (c) 2005-2008 Sam Stephenson
 *
 *  Prototype is freely distributable under the terms of an MIT-style license.
 *  For details, see the Prototype web site: http://www.prototypejs.org/
 *
 *--------------------------------------------------------------------------*/

var Prototype = {
  Version: '1.6.0.2',

  Browser: {
    IE:     !!(window.attachEvent && !window.opera),
    Opera:  !!window.opera,
    WebKit: navigator.userAgent.indexOf('AppleWebKit/') > -1,
    Gecko:  navigator.userAgent.indexOf('Gecko') > -1 && navigator.userAgent.indexOf('KHTML') == -1,
    MobileSafari: !!navigator.userAgent.match(/Apple.*Mobile.*Safari/)
  },

  BrowserFeatures: {
    XPath: !!document.evaluate,
    ElementExtensions: !!window.HTMLElement,
    SpecificElementExtensions:
      document.createElement('div').__proto__ &&
      document.createElement('div').__proto__ !==
        document.createElement('form').__proto__
  },

  ScriptFragment: '<script[^>]*>([\\S\\s]*?)<\/script>',
  JSONFilter: /^\/\*-secure-([\s\S]*)\*\/\s*$/,

  emptyFunction: function() { },
  K: function(x) { return x }
};

if (Prototype.Browser.MobileSafari)
  Prototype.BrowserFeatures.SpecificElementExtensions = false;


/* Based on Alex Arnell's inheritance implementation. */
var Class = {
  create: function() {
    var parent = null, properties = $A(arguments);
    if (Object.isFunction(properties[0]))
      parent = properties.shift();

    function klass() {
      this.initialize.apply(this, arguments);
    }

    Object.extend(klass, Class.Methods);
    klass.superclass = parent;
    klass.subclasses = [];

    if (parent) {
      var subclass = function() { };
      subclass.prototype = parent.prototype;
      klass.prototype = new subclass;
      parent.subclasses.push(klass);
    }

    for (var i = 0; i < properties.length; i++)
      klass.addMethods(properties[i]);

    if (!klass.prototype.initialize)
      klass.prototype.initialize = Prototype.emptyFunction;

    klass.prototype.constructor = klass;

    return klass;
  }
};

Class.Methods = {
  addMethods: function(source) {
    var ancestor   = this.superclass && this.superclass.prototype;
    var properties = Object.keys(source);

    if (!Object.keys({ toString: true }).length)
      properties.push("toString", "valueOf");

    for (var i = 0, length = properties.length; i < length; i++) {
      var property = properties[i], value = source[property];
      if (ancestor && Object.isFunction(value) &&
          value.argumentNames().first() == "$super") {
        var method = value, value = Object.extend((function(m) {
          return function() { return ancestor[m].apply(this, arguments) };
        })(property).wrap(method), {
          valueOf:  function() { return method },
          toString: function() { return method.toString() }
        });
      }
      this.prototype[property] = value;
    }

    return this;
  }
};

var Abstract = { };

Object.extend = function(destination, source) {
  for (var property in source)
    destination[property] = source[property];
  return destination;
};

Object.extend(Object, {
  inspect: function(object) {
    try {
      if (Object.isUndefined(object)) return 'undefined';
      if (object === null) return 'null';
      return object.inspect ? object.inspect() : String(object);
    } catch (e) {
      if (e instanceof RangeError) return '...';
      throw e;
    }
  },

  toJSON: function(object) {
    var type = typeof object;
    switch (type) {
      case 'undefined':
      case 'function':
      case 'unknown': return;
      case 'boolean': return object.toString();
    }

    if (object === null) return 'null';
    if (object.toJSON) return object.toJSON();
    if (Object.isElement(object)) return;

    var results = [];
    for (var property in object) {
      var value = Object.toJSON(object[property]);
      if (!Object.isUndefined(value))
        results.push(property.toJSON() + ': ' + value);
    }

    return '{' + results.join(', ') + '}';
  },

  toQueryString: function(object) {
    return $H(object).toQueryString();
  },

  toHTML: function(object) {
    return object && object.toHTML ? object.toHTML() : String.interpret(object);
  },

  keys: function(object) {
    var keys = [];
    for (var property in object)
      keys.push(property);
    return keys;
  },

  values: function(object) {
    var values = [];
    for (var property in object)
      values.push(object[property]);
    return values;
  },

  clone: function(object) {
    return Object.extend({ }, object);
  },

  isElement: function(object) {
    return object && object.nodeType == 1;
  },

  isArray: function(object) {
    return object != null && typeof object == "object" &&
      'splice' in object && 'join' in object;
  },

  isHash: function(object) {
    return object instanceof Hash;
  },

  isFunction: function(object) {
    return typeof object == "function";
  },

  isString: function(object) {
    return typeof object == "string";
  },

  isNumber: function(object) {
    return typeof object == "number";
  },

  isUndefined: function(object) {
    return typeof object == "undefined";
  }
});

Object.extend(Function.prototype, {
  argumentNames: function() {
    var names = this.toString().match(/^[\s\(]*function[^(]*\((.*?)\)/)[1].split(",").invoke("strip");
    return names.length == 1 && !names[0] ? [] : names;
  },

  bind: function() {
    if (arguments.length < 2 && Object.isUndefined(arguments[0])) return this;
    var __method = this, args = $A(arguments), object = args.shift();
    return function() {
      return __method.apply(object, args.concat($A(arguments)));
    }
  },

  bindAsEventListener: function() {
    var __method = this, args = $A(arguments), object = args.shift();
    return function(event) {
      return __method.apply(object, [event || window.event].concat(args));
    }
  },

  curry: function() {
    if (!arguments.length) return this;
    var __method = this, args = $A(arguments);
    return function() {
      return __method.apply(this, args.concat($A(arguments)));
    }
  },

  delay: function() {
    var __method = this, args = $A(arguments), timeout = args.shift() * 1000;
    return window.setTimeout(function() {
      return __method.apply(__method, args);
    }, timeout);
  },

  wrap: function(wrapper) {
    var __method = this;
    return function() {
      return wrapper.apply(this, [__method.bind(this)].concat($A(arguments)));
    }
  },

  methodize: function() {
    if (this._methodized) return this._methodized;
    var __method = this;
    return this._methodized = function() {
      return __method.apply(null, [this].concat($A(arguments)));
    };
  }
});

Function.prototype.defer = Function.prototype.delay.curry(0.01);

Date.prototype.toJSON = function() {
  return '"' + this.getUTCFullYear() + '-' +
    (this.getUTCMonth() + 1).toPaddedString(2) + '-' +
    this.getUTCDate().toPaddedString(2) + 'T' +
    this.getUTCHours().toPaddedString(2) + ':' +
    this.getUTCMinutes().toPaddedString(2) + ':' +
    this.getUTCSeconds().toPaddedString(2) + 'Z"';
};

var Try = {
  these: function() {
    var returnValue;

    for (var i = 0, length = arguments.length; i < length; i++) {
      var lambda = arguments[i];
      try {
        returnValue = lambda();
        break;
      } catch (e) { }
    }

    return returnValue;
  }
};

RegExp.prototype.match = RegExp.prototype.test;

RegExp.escape = function(str) {
  return String(str).replace(/([.*+?^=!:${}()|[\]\/\\])/g, '\\$1');
};

/*--------------------------------------------------------------------------*/

var PeriodicalExecuter = Class.create({
  initialize: function(callback, frequency) {
    this.callback = callback;
    this.frequency = frequency;
    this.currentlyExecuting = false;

    this.registerCallback();
  },

  registerCallback: function() {
    this.timer = setInterval(this.onTimerEvent.bind(this), this.frequency * 1000);
  },

  execute: function() {
    this.callback(this);
  },

  stop: function() {
    if (!this.timer) return;
    clearInterval(this.timer);
    this.timer = null;
  },

  onTimerEvent: function() {
    if (!this.currentlyExecuting) {
      try {
        this.currentlyExecuting = true;
        this.execute();
      } finally {
        this.currentlyExecuting = false;
      }
    }
  }
});
Object.extend(String, {
  interpret: function(value) {
    return value == null ? '' : String(value);
  },
  specialChar: {
    '\b': '\\b',
    '\t': '\\t',
    '\n': '\\n',
    '\f': '\\f',
    '\r': '\\r',
    '\\': '\\\\'
  }
});

Object.extend(String.prototype, {
  gsub: function(pattern, replacement) {
    var result = '', source = this, match;
    replacement = arguments.callee.prepareReplacement(replacement);

    while (source.length > 0) {
      if (match = source.match(pattern)) {
        result += source.slice(0, match.index);
        result += String.interpret(replacement(match));
        source  = source.slice(match.index + match[0].length);
      } else {
        result += source, source = '';
      }
    }
    return result;
  },

  sub: function(pattern, replacement, count) {
    replacement = this.gsub.prepareReplacement(replacement);
    count = Object.isUndefined(count) ? 1 : count;

    return this.gsub(pattern, function(match) {
      if (--count < 0) return match[0];
      return replacement(match);
    });
  },

  scan: function(pattern, iterator) {
    this.gsub(pattern, iterator);
    return String(this);
  },

  truncate: function(length, truncation) {
    length = length || 30;
    truncation = Object.isUndefined(truncation) ? '...' : truncation;
    return this.length > length ?
      this.slice(0, length - truncation.length) + truncation : String(this);
  },

  strip: function() {
    return this.replace(/^\s+/, '').replace(/\s+$/, '');
  },

  stripTags: function() {
    return this.replace(/<\/?[^>]+>/gi, '');
  },

  stripScripts: function() {
    return this.replace(new RegExp(Prototype.ScriptFragment, 'img'), '');
  },

  extractScripts: function() {
    var matchAll = new RegExp(Prototype.ScriptFragment, 'img');
    var matchOne = new RegExp(Prototype.ScriptFragment, 'im');
    return (this.match(matchAll) || []).map(function(scriptTag) {
      return (scriptTag.match(matchOne) || ['', ''])[1];
    });
  },

  evalScripts: function() {
    return this.extractScripts().map(function(script) { return eval(script) });
  },

  escapeHTML: function() {
    var self = arguments.callee;
    self.text.data = this;
    return self.div.innerHTML;
  },

  unescapeHTML: function() {
    var div = new Element('div');
    div.innerHTML = this.stripTags();
    return div.childNodes[0] ? (div.childNodes.length > 1 ?
      $A(div.childNodes).inject('', function(memo, node) { return memo+node.nodeValue }) :
      div.childNodes[0].nodeValue) : '';
  },

  toQueryParams: function(separator) {
    var match = this.strip().match(/([^?#]*)(#.*)?$/);
    if (!match) return { };

    return match[1].split(separator || '&').inject({ }, function(hash, pair) {
      if ((pair = pair.split('='))[0]) {
        var key = decodeURIComponent(pair.shift());
        var value = pair.length > 1 ? pair.join('=') : pair[0];
        if (value != undefined) value = decodeURIComponent(value);

        if (key in hash) {
          if (!Object.isArray(hash[key])) hash[key] = [hash[key]];
          hash[key].push(value);
        }
        else hash[key] = value;
      }
      return hash;
    });
  },

  toArray: function() {
    return this.split('');
  },

  succ: function() {
    return this.slice(0, this.length - 1) +
      String.fromCharCode(this.charCodeAt(this.length - 1) + 1);
  },

  times: function(count) {
    return count < 1 ? '' : new Array(count + 1).join(this);
  },

  camelize: function() {
    var parts = this.split('-'), len = parts.length;
    if (len == 1) return parts[0];

    var camelized = this.charAt(0) == '-'
      ? parts[0].charAt(0).toUpperCase() + parts[0].substring(1)
      : parts[0];

    for (var i = 1; i < len; i++)
      camelized += parts[i].charAt(0).toUpperCase() + parts[i].substring(1);

    return camelized;
  },

  capitalize: function() {
    return this.charAt(0).toUpperCase() + this.substring(1).toLowerCase();
  },

  underscore: function() {
    return this.gsub(/::/, '/').gsub(/([A-Z]+)([A-Z][a-z])/,'#{1}_#{2}').gsub(/([a-z\d])([A-Z])/,'#{1}_#{2}').gsub(/-/,'_').toLowerCase();
  },

  dasherize: function() {
    return this.gsub(/_/,'-');
  },

  inspect: function(useDoubleQuotes) {
    var escapedString = this.gsub(/[\x00-\x1f\\]/, function(match) {
      var character = String.specialChar[match[0]];
      return character ? character : '\\u00' + match[0].charCodeAt().toPaddedString(2, 16);
    });
    if (useDoubleQuotes) return '"' + escapedString.replace(/"/g, '\\"') + '"';
    return "'" + escapedString.replace(/'/g, '\\\'') + "'";
  },

  toJSON: function() {
    return this.inspect(true);
  },

  unfilterJSON: function(filter) {
    return this.sub(filter || Prototype.JSONFilter, '#{1}');
  },

  isJSON: function() {
    var str = this;
    if (str.blank()) return false;
    str = this.replace(/\\./g, '@').replace(/"[^"\\\n\r]*"/g, '');
    return (/^[,:{}\[\]0-9.\-+Eaeflnr-u \n\r\t]*$/).test(str);
  },

  evalJSON: function(sanitize) {
    var json = this.unfilterJSON();
    try {
      if (!sanitize || json.isJSON()) return eval('(' + json + ')');
    } catch (e) { }
    throw new SyntaxError('Badly formed JSON string: ' + this.inspect());
  },

  include: function(pattern) {
    return this.indexOf(pattern) > -1;
  },

  startsWith: function(pattern) {
    return this.indexOf(pattern) === 0;
  },

  endsWith: function(pattern) {
    var d = this.length - pattern.length;
    return d >= 0 && this.lastIndexOf(pattern) === d;
  },

  empty: function() {
    return this == '';
  },

  blank: function() {
    return /^\s*$/.test(this);
  },

  interpolate: function(object, pattern) {
    return new Template(this, pattern).evaluate(object);
  }
});

if (Prototype.Browser.WebKit || Prototype.Browser.IE) Object.extend(String.prototype, {
  escapeHTML: function() {
    return this.replace(/&/g,'&amp;').replace(/</g,'&lt;').replace(/>/g,'&gt;');
  },
  unescapeHTML: function() {
    return this.replace(/&amp;/g,'&').replace(/&lt;/g,'<').replace(/&gt;/g,'>');
  }
});

String.prototype.gsub.prepareReplacement = function(replacement) {
  if (Object.isFunction(replacement)) return replacement;
  var template = new Template(replacement);
  return function(match) { return template.evaluate(match) };
};

String.prototype.parseQuery = String.prototype.toQueryParams;

Object.extend(String.prototype.escapeHTML, {
  div:  document.createElement('div'),
  text: document.createTextNode('')
});

with (String.prototype.escapeHTML) div.appendChild(text);

var Template = Class.create({
  initialize: function(template, pattern) {
    this.template = template.toString();
    this.pattern = pattern || Template.Pattern;
  },

  evaluate: function(object) {
    if (Object.isFunction(object.toTemplateReplacements))
      object = object.toTemplateReplacements();

    return this.template.gsub(this.pattern, function(match) {
      if (object == null) return '';

      var before = match[1] || '';
      if (before == '\\') return match[2];

      var ctx = object, expr = match[3];
      var pattern = /^([^.[]+|\[((?:.*?[^\\])?)\])(\.|\[|$)/;
      match = pattern.exec(expr);
      if (match == null) return before;

      while (match != null) {
        var comp = match[1].startsWith('[') ? match[2].gsub('\\\\]', ']') : match[1];
        ctx = ctx[comp];
        if (null == ctx || '' == match[3]) break;
        expr = expr.substring('[' == match[3] ? match[1].length : match[0].length);
        match = pattern.exec(expr);
      }

      return before + String.interpret(ctx);
    });
  }
});
Template.Pattern = /(^|.|\r|\n)(#\{(.*?)\})/;

var $break = { };

var Enumerable = {
  each: function(iterator, context) {
    var index = 0;
    iterator = iterator.bind(context);
    try {
      this._each(function(value) {
        iterator(value, index++);
      });
    } catch (e) {
      if (e != $break) throw e;
    }
    return this;
  },

  eachSlice: function(number, iterator, context) {
    iterator = iterator ? iterator.bind(context) : Prototype.K;
    var index = -number, slices = [], array = this.toArray();
    while ((index += number) < array.length)
      slices.push(array.slice(index, index+number));
    return slices.collect(iterator, context);
  },

  all: function(iterator, context) {
    iterator = iterator ? iterator.bind(context) : Prototype.K;
    var result = true;
    this.each(function(value, index) {
      result = result && !!iterator(value, index);
      if (!result) throw $break;
    });
    return result;
  },

  any: function(iterator, context) {
    iterator = iterator ? iterator.bind(context) : Prototype.K;
    var result = false;
    this.each(function(value, index) {
      if (result = !!iterator(value, index))
        throw $break;
    });
    return result;
  },

  collect: function(iterator, context) {
    iterator = iterator ? iterator.bind(context) : Prototype.K;
    var results = [];
    this.each(function(value, index) {
      results.push(iterator(value, index));
    });
    return results;
  },

  detect: function(iterator, context) {
    iterator = iterator.bind(context);
    var result;
    this.each(function(value, index) {
      if (iterator(value, index)) {
        result = value;
        throw $break;
      }
    });
    return result;
  },

  findAll: function(iterator, context) {
    iterator = iterator.bind(context);
    var results = [];
    this.each(function(value, index) {
      if (iterator(value, index))
        results.push(value);
    });
    return results;
  },

  grep: function(filter, iterator, context) {
    iterator = iterator ? iterator.bind(context) : Prototype.K;
    var results = [];

    if (Object.isString(filter))
      filter = new RegExp(filter);

    this.each(function(value, index) {
      if (filter.match(value))
        results.push(iterator(value, index));
    });
    return results;
  },

  include: function(object) {
    if (Object.isFunction(this.indexOf))
      if (this.indexOf(object) != -1) return true;

    var found = false;
    this.each(function(value) {
      if (value == object) {
        found = true;
        throw $break;
      }
    });
    return found;
  },

  inGroupsOf: function(number, fillWith) {
    fillWith = Object.isUndefined(fillWith) ? null : fillWith;
    return this.eachSlice(number, function(slice) {
      while(slice.length < number) slice.push(fillWith);
      return slice;
    });
  },

  inject: function(memo, iterator, context) {
    iterator = iterator.bind(context);
    this.each(function(value, index) {
      memo = iterator(memo, value, index);
    });
    return memo;
  },

  invoke: function(method) {
    var args = $A(arguments).slice(1);
    return this.map(function(value) {
      return value[method].apply(value, args);
    });
  },

  max: function(iterator, context) {
    iterator = iterator ? iterator.bind(context) : Prototype.K;
    var result;
    this.each(function(value, index) {
      value = iterator(value, index);
      if (result == null || value >= result)
        result = value;
    });
    return result;
  },

  min: function(iterator, context) {
    iterator = iterator ? iterator.bind(context) : Prototype.K;
    var result;
    this.each(function(value, index) {
      value = iterator(value, index);
      if (result == null || value < result)
        result = value;
    });
    return result;
  },

  partition: function(iterator, context) {
    iterator = iterator ? iterator.bind(context) : Prototype.K;
    var trues = [], falses = [];
    this.each(function(value, index) {
      (iterator(value, index) ?
        trues : falses).push(value);
    });
    return [trues, falses];
  },

  pluck: function(property) {
    var results = [];
    this.each(function(value) {
      results.push(value[property]);
    });
    return results;
  },

  reject: function(iterator, context) {
    iterator = iterator.bind(context);
    var results = [];
    this.each(function(value, index) {
      if (!iterator(value, index))
        results.push(value);
    });
    return results;
  },

  sortBy: function(iterator, context) {
    iterator = iterator.bind(context);
    return this.map(function(value, index) {
      return {value: value, criteria: iterator(value, index)};
    }).sort(function(left, right) {
      var a = left.criteria, b = right.criteria;
      return a < b ? -1 : a > b ? 1 : 0;
    }).pluck('value');
  },

  toArray: function() {
    return this.map();
  },

  zip: function() {
    var iterator = Prototype.K, args = $A(arguments);
    if (Object.isFunction(args.last()))
      iterator = args.pop();

    var collections = [this].concat(args).map($A);
    return this.map(function(value, index) {
      return iterator(collections.pluck(index));
    });
  },

  size: function() {
    return this.toArray().length;
  },

  inspect: function() {
    return '#<Enumerable:' + this.toArray().inspect() + '>';
  }
};

Object.extend(Enumerable, {
  map:     Enumerable.collect,
  find:    Enumerable.detect,
  select:  Enumerable.findAll,
  filter:  Enumerable.findAll,
  member:  Enumerable.include,
  entries: Enumerable.toArray,
  every:   Enumerable.all,
  some:    Enumerable.any
});
function $A(iterable) {
  if (!iterable) return [];
  if (iterable.toArray) return iterable.toArray();
  var length = iterable.length || 0, results = new Array(length);
  while (length--) results[length] = iterable[length];
  return results;
}

if (Prototype.Browser.WebKit) {
  $A = function(iterable) {
    if (!iterable) return [];
    if (!(Object.isFunction(iterable) && iterable == '[object NodeList]') &&
        iterable.toArray) return iterable.toArray();
    var length = iterable.length || 0, results = new Array(length);
    while (length--) results[length] = iterable[length];
    return results;
  };
}

Array.from = $A;

Object.extend(Array.prototype, Enumerable);

if (!Array.prototype._reverse) Array.prototype._reverse = Array.prototype.reverse;

Object.extend(Array.prototype, {
  _each: function(iterator) {
    for (var i = 0, length = this.length; i < length; i++)
      iterator(this[i]);
  },

  clear: function() {
    this.length = 0;
    return this;
  },

  first: function() {
    return this[0];
  },

  last: function() {
    return this[this.length - 1];
  },

  compact: function() {
    return this.select(function(value) {
      return value != null;
    });
  },

  flatten: function() {
    return this.inject([], function(array, value) {
      return array.concat(Object.isArray(value) ?
        value.flatten() : [value]);
    });
  },

  without: function() {
    var values = $A(arguments);
    return this.select(function(value) {
      return !values.include(value);
    });
  },

  reverse: function(inline) {
    return (inline !== false ? this : this.toArray())._reverse();
  },

  reduce: function() {
    return this.length > 1 ? this : this[0];
  },

  uniq: function(sorted) {
    return this.inject([], function(array, value, index) {
      if (0 == index || (sorted ? array.last() != value : !array.include(value)))
        array.push(value);
      return array;
    });
  },

  intersect: function(array) {
    return this.uniq().findAll(function(item) {
      return array.detect(function(value) { return item === value });
    });
  },

  clone: function() {
    return [].concat(this);
  },

  size: function() {
    return this.length;
  },

  inspect: function() {
    return '[' + this.map(Object.inspect).join(', ') + ']';
  },

  toJSON: function() {
    var results = [];
    this.each(function(object) {
      var value = Object.toJSON(object);
      if (!Object.isUndefined(value)) results.push(value);
    });
    return '[' + results.join(', ') + ']';
  }
});

// use native browser JS 1.6 implementation if available
if (Object.isFunction(Array.prototype.forEach))
  Array.prototype._each = Array.prototype.forEach;

if (!Array.prototype.indexOf) Array.prototype.indexOf = function(item, i) {
  i || (i = 0);
  var length = this.length;
  if (i < 0) i = length + i;
  for (; i < length; i++)
    if (this[i] === item) return i;
  return -1;
};

if (!Array.prototype.lastIndexOf) Array.prototype.lastIndexOf = function(item, i) {
  i = isNaN(i) ? this.length : (i < 0 ? this.length + i : i) + 1;
  var n = this.slice(0, i).reverse().indexOf(item);
  return (n < 0) ? n : i - n - 1;
};

Array.prototype.toArray = Array.prototype.clone;

function $w(string) {
  if (!Object.isString(string)) return [];
  string = string.strip();
  return string ? string.split(/\s+/) : [];
}

if (Prototype.Browser.Opera){
  Array.prototype.concat = function() {
    var array = [];
    for (var i = 0, length = this.length; i < length; i++) array.push(this[i]);
    for (var i = 0, length = arguments.length; i < length; i++) {
      if (Object.isArray(arguments[i])) {
        for (var j = 0, arrayLength = arguments[i].length; j < arrayLength; j++)
          array.push(arguments[i][j]);
      } else {
        array.push(arguments[i]);
      }
    }
    return array;
  };
}
Object.extend(Number.prototype, {
  toColorPart: function() {
    return this.toPaddedString(2, 16);
  },

  succ: function() {
    return this + 1;
  },

  times: function(iterator) {
    $R(0, this, true).each(iterator);
    return this;
  },

  toPaddedString: function(length, radix) {
    var string = this.toString(radix || 10);
    return '0'.times(length - string.length) + string;
  },

  toJSON: function() {
    return isFinite(this) ? this.toString() : 'null';
  }
});

$w('abs round ceil floor').each(function(method){
  Number.prototype[method] = Math[method].methodize();
});
function $H(object) {
  return new Hash(object);
};

var Hash = Class.create(Enumerable, (function() {

  function toQueryPair(key, value) {
    if (Object.isUndefined(value)) return key;
    return key + '=' + encodeURIComponent(String.interpret(value));
  }

  return {
    initialize: function(object) {
      this._object = Object.isHash(object) ? object.toObject() : Object.clone(object);
    },

    _each: function(iterator) {
      for (var key in this._object) {
        var value = this._object[key], pair = [key, value];
        pair.key = key;
        pair.value = value;
        iterator(pair);
      }
    },

    set: function(key, value) {
      return this._object[key] = value;
    },

    get: function(key) {
      return this._object[key];
    },

    unset: function(key) {
      var value = this._object[key];
      delete this._object[key];
      return value;
    },

    toObject: function() {
      return Object.clone(this._object);
    },

    keys: function() {
      return this.pluck('key');
    },

    values: function() {
      return this.pluck('value');
    },

    index: function(value) {
      var match = this.detect(function(pair) {
        return pair.value === value;
      });
      return match && match.key;
    },

    merge: function(object) {
      return this.clone().update(object);
    },

    update: function(object) {
      return new Hash(object).inject(this, function(result, pair) {
        result.set(pair.key, pair.value);
        return result;
      });
    },

    toQueryString: function() {
      return this.map(function(pair) {
        var key = encodeURIComponent(pair.key), values = pair.value;

        if (values && typeof values == 'object') {
          if (Object.isArray(values))
            return values.map(toQueryPair.curry(key)).join('&');
        }
        return toQueryPair(key, values);
      }).join('&');
    },

    inspect: function() {
      return '#<Hash:{' + this.map(function(pair) {
        return pair.map(Object.inspect).join(': ');
      }).join(', ') + '}>';
    },

    toJSON: function() {
      return Object.toJSON(this.toObject());
    },

    clone: function() {
      return new Hash(this);
    }
  }
})());

Hash.prototype.toTemplateReplacements = Hash.prototype.toObject;
Hash.from = $H;
var ObjectRange = Class.create(Enumerable, {
  initialize: function(start, end, exclusive) {
    this.start = start;
    this.end = end;
    this.exclusive = exclusive;
  },

  _each: function(iterator) {
    var value = this.start;
    while (this.include(value)) {
      iterator(value);
      value = value.succ();
    }
  },

  include: function(value) {
    if (value < this.start)
      return false;
    if (this.exclusive)
      return value < this.end;
    return value <= this.end;
  }
});

var $R = function(start, end, exclusive) {
  return new ObjectRange(start, end, exclusive);
};

var Ajax = {
  getTransport: function() {
    return Try.these(
      function() {return new XMLHttpRequest()},
      function() {return new ActiveXObject('Msxml2.XMLHTTP')},
      function() {return new ActiveXObject('Microsoft.XMLHTTP')}
    ) || false;
  },

  activeRequestCount: 0
};

Ajax.Responders = {
  responders: [],

  _each: function(iterator) {
    this.responders._each(iterator);
  },

  register: function(responder) {
    if (!this.include(responder))
      this.responders.push(responder);
  },

  unregister: function(responder) {
    this.responders = this.responders.without(responder);
  },

  dispatch: function(callback, request, transport, json) {
    this.each(function(responder) {
      if (Object.isFunction(responder[callback])) {
        try {
          responder[callback].apply(responder, [request, transport, json]);
        } catch (e) { }
      }
    });
  }
};

Object.extend(Ajax.Responders, Enumerable);

Ajax.Responders.register({
  onCreate:   function() { Ajax.activeRequestCount++ },
  onComplete: function() { Ajax.activeRequestCount-- }
});

Ajax.Base = Class.create({
  initialize: function(options) {
    this.options = {
      method:       'post',
      asynchronous: true,
      contentType:  'application/x-www-form-urlencoded',
      encoding:     'UTF-8',
      parameters:   '',
      evalJSON:     true,
      evalJS:       true
    };
    Object.extend(this.options, options || { });

    this.options.method = this.options.method.toLowerCase();

    if (Object.isString(this.options.parameters))
      this.options.parameters = this.options.parameters.toQueryParams();
    else if (Object.isHash(this.options.parameters))
      this.options.parameters = this.options.parameters.toObject();
  }
});

Ajax.Request = Class.create(Ajax.Base, {
  _complete: false,

  initialize: function($super, url, options) {
    $super(options);
    this.transport = Ajax.getTransport();
    this.request(url);
  },

  request: function(url) {
    this.url = url;
    this.method = this.options.method;
    var params = Object.clone(this.options.parameters);

    if (!['get', 'post'].include(this.method)) {
      // simulate other verbs over post
      params['_method'] = this.method;
      this.method = 'post';
    }

    this.parameters = params;

    if (params = Object.toQueryString(params)) {
      // when GET, append parameters to URL
      if (this.method == 'get')
        this.url += (this.url.include('?') ? '&' : '?') + params;
      else if (/Konqueror|Safari|KHTML/.test(navigator.userAgent))
        params += '&_=';
    }

    try {
      var response = new Ajax.Response(this);
      if (this.options.onCreate) this.options.onCreate(response);
      Ajax.Responders.dispatch('onCreate', this, response);

      this.transport.open(this.method.toUpperCase(), this.url,
        this.options.asynchronous);

      if (this.options.asynchronous) this.respondToReadyState.bind(this).defer(1);

      this.transport.onreadystatechange = this.onStateChange.bind(this);
      this.setRequestHeaders();

      this.body = this.method == 'post' ? (this.options.postBody || params) : null;
      this.transport.send(this.body);

      /* Force Firefox to handle ready state 4 for synchronous requests */
      if (!this.options.asynchronous && this.transport.overrideMimeType)
        this.onStateChange();

    }
    catch (e) {
      this.dispatchException(e);
    }
  },

  onStateChange: function() {
    var readyState = this.transport.readyState;
    if (readyState > 1 && !((readyState == 4) && this._complete))
      this.respondToReadyState(this.transport.readyState);
  },

  setRequestHeaders: function() {
    var headers = {
      'X-Requested-With': 'XMLHttpRequest',
      'X-Prototype-Version': Prototype.Version,
      'Accept': 'text/javascript, text/html, application/xml, text/xml, */*'
    };

    if (this.method == 'post') {
      headers['Content-type'] = this.options.contentType +
        (this.options.encoding ? '; charset=' + this.options.encoding : '');

      /* Force "Connection: close" for older Mozilla browsers to work
       * around a bug where XMLHttpRequest sends an incorrect
       * Content-length header. See Mozilla Bugzilla #246651.
       */
      if (this.transport.overrideMimeType &&
          (navigator.userAgent.match(/Gecko\/(\d{4})/) || [0,2005])[1] < 2005)
            headers['Connection'] = 'close';
    }

    // user-defined headers
    if (typeof this.options.requestHeaders == 'object') {
      var extras = this.options.requestHeaders;

      if (Object.isFunction(extras.push))
        for (var i = 0, length = extras.length; i < length; i += 2)
          headers[extras[i]] = extras[i+1];
      else
        $H(extras).each(function(pair) { headers[pair.key] = pair.value });
    }

    for (var name in headers)
      this.transport.setRequestHeader(name, headers[name]);
  },

  success: function() {
    var status = this.getStatus();
    return !status || (status >= 200 && status < 300);
  },

  getStatus: function() {
    try {
      return this.transport.status || 0;
    } catch (e) { return 0 }
  },

  respondToReadyState: function(readyState) {
    var state = Ajax.Request.Events[readyState], response = new Ajax.Response(this);

    if (state == 'Complete') {
      try {
        this._complete = true;
        (this.options['on' + response.status]
         || this.options['on' + (this.success() ? 'Success' : 'Failure')]
         || Prototype.emptyFunction)(response, response.headerJSON);
      } catch (e) {
        this.dispatchException(e);
      }

      var contentType = response.getHeader('Content-type');
      if (this.options.evalJS == 'force'
          || (this.options.evalJS && this.isSameOrigin() && contentType
          && contentType.match(/^\s*(text|application)\/(x-)?(java|ecma)script(;.*)?\s*$/i)))
        this.evalResponse();
    }

    try {
      (this.options['on' + state] || Prototype.emptyFunction)(response, response.headerJSON);
      Ajax.Responders.dispatch('on' + state, this, response, response.headerJSON);
    } catch (e) {
      this.dispatchException(e);
    }

    if (state == 'Complete') {
      // avoid memory leak in MSIE: clean up
      this.transport.onreadystatechange = Prototype.emptyFunction;
    }
  },

  isSameOrigin: function() {
    var m = this.url.match(/^\s*https?:\/\/[^\/]*/);
    return !m || (m[0] == '#{protocol}//#{domain}#{port}'.interpolate({
      protocol: location.protocol,
      domain: document.domain,
      port: location.port ? ':' + location.port : ''
    }));
  },

  getHeader: function(name) {
    try {
      return this.transport.getResponseHeader(name) || null;
    } catch (e) { return null }
  },

  evalResponse: function() {
    try {
      return eval((this.transport.responseText || '').unfilterJSON());
    } catch (e) {
      this.dispatchException(e);
    }
  },

  dispatchException: function(exception) {
    (this.options.onException || Prototype.emptyFunction)(this, exception);
    Ajax.Responders.dispatch('onException', this, exception);
  }
});

Ajax.Request.Events =
  ['Uninitialized', 'Loading', 'Loaded', 'Interactive', 'Complete'];

Ajax.Response = Class.create({
  initialize: function(request){
    this.request = request;
    var transport  = this.transport  = request.transport,
        readyState = this.readyState = transport.readyState;

    if((readyState > 2 && !Prototype.Browser.IE) || readyState == 4) {
      this.status       = this.getStatus();
      this.statusText   = this.getStatusText();
      this.responseText = String.interpret(transport.responseText);
      this.headerJSON   = this._getHeaderJSON();
    }

    if(readyState == 4) {
      var xml = transport.responseXML;
      this.responseXML  = Object.isUndefined(xml) ? null : xml;
      this.responseJSON = this._getResponseJSON();
    }
  },

  status:      0,
  statusText: '',

  getStatus: Ajax.Request.prototype.getStatus,

  getStatusText: function() {
    try {
      return this.transport.statusText || '';
    } catch (e) { return '' }
  },

  getHeader: Ajax.Request.prototype.getHeader,

  getAllHeaders: function() {
    try {
      return this.getAllResponseHeaders();
    } catch (e) { return null }
  },

  getResponseHeader: function(name) {
    return this.transport.getResponseHeader(name);
  },

  getAllResponseHeaders: function() {
    return this.transport.getAllResponseHeaders();
  },

  _getHeaderJSON: function() {
    var json = this.getHeader('X-JSON');
    if (!json) return null;
    json = decodeURIComponent(escape(json));
    try {
      return json.evalJSON(this.request.options.sanitizeJSON ||
        !this.request.isSameOrigin());
    } catch (e) {
      this.request.dispatchException(e);
    }
  },

  _getResponseJSON: function() {
    var options = this.request.options;
    if (!options.evalJSON || (options.evalJSON != 'force' &&
      !(this.getHeader('Content-type') || '').include('application/json')) ||
        this.responseText.blank())
          return null;
    try {
      return this.responseText.evalJSON(options.sanitizeJSON ||
        !this.request.isSameOrigin());
    } catch (e) {
      this.request.dispatchException(e);
    }
  }
});

Ajax.Updater = Class.create(Ajax.Request, {
  initialize: function($super, container, url, options) {
    this.container = {
      success: (container.success || container),
      failure: (container.failure || (container.success ? null : container))
    };

    options = Object.clone(options);
    var onComplete = options.onComplete;
    options.onComplete = (function(response, json) {
      this.updateContent(response.responseText);
      if (Object.isFunction(onComplete)) onComplete(response, json);
    }).bind(this);

    $super(url, options);
  },

  updateContent: function(responseText) {
    var receiver = this.container[this.success() ? 'success' : 'failure'],
        options = this.options;

    if (!options.evalScripts) responseText = responseText.stripScripts();

    if (receiver = $(receiver)) {
      if (options.insertion) {
        if (Object.isString(options.insertion)) {
          var insertion = { }; insertion[options.insertion] = responseText;
          receiver.insert(insertion);
        }
        else options.insertion(receiver, responseText);
      }
      else receiver.update(responseText);
    }
  }
});

Ajax.PeriodicalUpdater = Class.create(Ajax.Base, {
  initialize: function($super, container, url, options) {
    $super(options);
    this.onComplete = this.options.onComplete;

    this.frequency = (this.options.frequency || 2);
    this.decay = (this.options.decay || 1);

    this.updater = { };
    this.container = container;
    this.url = url;

    this.start();
  },

  start: function() {
    this.options.onComplete = this.updateComplete.bind(this);
    this.onTimerEvent();
  },

  stop: function() {
    this.updater.options.onComplete = undefined;
    clearTimeout(this.timer);
    (this.onComplete || Prototype.emptyFunction).apply(this, arguments);
  },

  updateComplete: function(response) {
    if (this.options.decay) {
      this.decay = (response.responseText == this.lastText ?
        this.decay * this.options.decay : 1);

      this.lastText = response.responseText;
    }
    this.timer = this.onTimerEvent.bind(this).delay(this.decay * this.frequency);
  },

  onTimerEvent: function() {
    this.updater = new Ajax.Updater(this.container, this.url, this.options);
  }
});
function $(element) {
  if (arguments.length > 1) {
    for (var i = 0, elements = [], length = arguments.length; i < length; i++)
      elements.push($(arguments[i]));
    return elements;
  }
  if (Object.isString(element))
    element = document.getElementById(element);
  return Element.extend(element);
}

if (Prototype.BrowserFeatures.XPath) {
  document._getElementsByXPath = function(expression, parentElement) {
    var results = [];
    var query = document.evaluate(expression, $(parentElement) || document,
      null, XPathResult.ORDERED_NODE_SNAPSHOT_TYPE, null);
    for (var i = 0, length = query.snapshotLength; i < length; i++)
      results.push(Element.extend(query.snapshotItem(i)));
    return results;
  };
}

/*--------------------------------------------------------------------------*/

if (!window.Node) var Node = { };

if (!Node.ELEMENT_NODE) {
  // DOM level 2 ECMAScript Language Binding
  Object.extend(Node, {
    ELEMENT_NODE: 1,
    ATTRIBUTE_NODE: 2,
    TEXT_NODE: 3,
    CDATA_SECTION_NODE: 4,
    ENTITY_REFERENCE_NODE: 5,
    ENTITY_NODE: 6,
    PROCESSING_INSTRUCTION_NODE: 7,
    COMMENT_NODE: 8,
    DOCUMENT_NODE: 9,
    DOCUMENT_TYPE_NODE: 10,
    DOCUMENT_FRAGMENT_NODE: 11,
    NOTATION_NODE: 12
  });
}

(function() {
  var element = this.Element;
  this.Element = function(tagName, attributes) {
    attributes = attributes || { };
    tagName = tagName.toLowerCase();
    var cache = Element.cache;
    if (Prototype.Browser.IE && attributes.name) {
      tagName = '<' + tagName + ' name="' + attributes.name + '">';
      delete attributes.name;
      return Element.writeAttribute(document.createElement(tagName), attributes);
    }
    if (!cache[tagName]) cache[tagName] = Element.extend(document.createElement(tagName));
    return Element.writeAttribute(cache[tagName].cloneNode(false), attributes);
  };
  Object.extend(this.Element, element || { });
}).call(window);

Element.cache = { };

Element.Methods = {
  visible: function(element) {
    return $(element).style.display != 'none';
  },

  toggle: function(element) {
    element = $(element);
    Element[Element.visible(element) ? 'hide' : 'show'](element);
    return element;
  },

  hide: function(element) {
    $(element).style.display = 'none';
    return element;
  },

  show: function(element) {
    $(element).style.display = '';
    return element;
  },

  remove: function(element) {
    element = $(element);
    element.parentNode.removeChild(element);
    return element;
  },

  update: function(element, content) {
    element = $(element);
    if (content && content.toElement) content = content.toElement();
    if (Object.isElement(content)) return element.update().insert(content);
    content = Object.toHTML(content);
    element.innerHTML = content.stripScripts();
    content.evalScripts.bind(content).defer();
    return element;
  },

  replace: function(element, content) {
    element = $(element);
    if (content && content.toElement) content = content.toElement();
    else if (!Object.isElement(content)) {
      content = Object.toHTML(content);
      var range = element.ownerDocument.createRange();
      range.selectNode(element);
      content.evalScripts.bind(content).defer();
      content = range.createContextualFragment(content.stripScripts());
    }
    element.parentNode.replaceChild(content, element);
    return element;
  },

  insert: function(element, insertions) {
    element = $(element);

    if (Object.isString(insertions) || Object.isNumber(insertions) ||
        Object.isElement(insertions) || (insertions && (insertions.toElement || insertions.toHTML)))
          insertions = {bottom:insertions};

    var content, insert, tagName, childNodes;

    for (var position in insertions) {
      content  = insertions[position];
      position = position.toLowerCase();
      insert = Element._insertionTranslations[position];

      if (content && content.toElement) content = content.toElement();
      if (Object.isElement(content)) {
        insert(element, content);
        continue;
      }

      content = Object.toHTML(content);

      tagName = ((position == 'before' || position == 'after')
        ? element.parentNode : element).tagName.toUpperCase();

      childNodes = Element._getContentFromAnonymousElement(tagName, content.stripScripts());

      if (position == 'top' || position == 'after') childNodes.reverse();
      childNodes.each(insert.curry(element));

      content.evalScripts.bind(content).defer();
    }

    return element;
  },

  wrap: function(element, wrapper, attributes) {
    element = $(element);
    if (Object.isElement(wrapper))
      $(wrapper).writeAttribute(attributes || { });
    else if (Object.isString(wrapper)) wrapper = new Element(wrapper, attributes);
    else wrapper = new Element('div', wrapper);
    if (element.parentNode)
      element.parentNode.replaceChild(wrapper, element);
    wrapper.appendChild(element);
    return wrapper;
  },

  inspect: function(element) {
    element = $(element);
    var result = '<' + element.tagName.toLowerCase();
    $H({'id': 'id', 'className': 'class'}).each(function(pair) {
      var property = pair.first(), attribute = pair.last();
      var value = (element[property] || '').toString();
      if (value) result += ' ' + attribute + '=' + value.inspect(true);
    });
    return result + '>';
  },

  recursivelyCollect: function(element, property) {
    element = $(element);
    var elements = [];
    while (element = element[property])
      if (element.nodeType == 1)
        elements.push(Element.extend(element));
    return elements;
  },

  ancestors: function(element) {
    return $(element).recursivelyCollect('parentNode');
  },

  descendants: function(element) {
    return $(element).select("*");
  },

  firstDescendant: function(element) {
    element = $(element).firstChild;
    while (element && element.nodeType != 1) element = element.nextSibling;
    return $(element);
  },

  immediateDescendants: function(element) {
    if (!(element = $(element).firstChild)) return [];
    while (element && element.nodeType != 1) element = element.nextSibling;
    if (element) return [element].concat($(element).nextSiblings());
    return [];
  },

  previousSiblings: function(element) {
    return $(element).recursivelyCollect('previousSibling');
  },

  nextSiblings: function(element) {
    return $(element).recursivelyCollect('nextSibling');
  },

  siblings: function(element) {
    element = $(element);
    return element.previousSiblings().reverse().concat(element.nextSiblings());
  },

  match: function(element, selector) {
    if (Object.isString(selector))
      selector = new Selector(selector);
    return selector.match($(element));
  },

  up: function(element, expression, index) {
    element = $(element);
    if (arguments.length == 1) return $(element.parentNode);
    var ancestors = element.ancestors();
    return Object.isNumber(expression) ? ancestors[expression] :
      Selector.findElement(ancestors, expression, index);
  },

  down: function(element, expression, index) {
    element = $(element);
    if (arguments.length == 1) return element.firstDescendant();
    return Object.isNumber(expression) ? element.descendants()[expression] :
      element.select(expression)[index || 0];
  },

  previous: function(element, expression, index) {
    element = $(element);
    if (arguments.length == 1) return $(Selector.handlers.previousElementSibling(element));
    var previousSiblings = element.previousSiblings();
    return Object.isNumber(expression) ? previousSiblings[expression] :
      Selector.findElement(previousSiblings, expression, index);
  },

  next: function(element, expression, index) {
    element = $(element);
    if (arguments.length == 1) return $(Selector.handlers.nextElementSibling(element));
    var nextSiblings = element.nextSiblings();
    return Object.isNumber(expression) ? nextSiblings[expression] :
      Selector.findElement(nextSiblings, expression, index);
  },

  select: function() {
    var args = $A(arguments), element = $(args.shift());
    return Selector.findChildElements(element, args);
  },

  adjacent: function() {
    var args = $A(arguments), element = $(args.shift());
    return Selector.findChildElements(element.parentNode, args).without(element);
  },

  identify: function(element) {
    element = $(element);
    var id = element.readAttribute('id'), self = arguments.callee;
    if (id) return id;
    do { id = 'anonymous_element_' + self.counter++ } while ($(id));
    element.writeAttribute('id', id);
    return id;
  },

  readAttribute: function(element, name) {
    element = $(element);
    if (Prototype.Browser.IE) {
      var t = Element._attributeTranslations.read;
      if (t.values[name]) return t.values[name](element, name);
      if (t.names[name]) name = t.names[name];
      if (name.include(':')) {
        return (!element.attributes || !element.attributes[name]) ? null :
         element.attributes[name].value;
      }
    }
    return element.getAttribute(name);
  },

  writeAttribute: function(element, name, value) {
    element = $(element);
    var attributes = { }, t = Element._attributeTranslations.write;

    if (typeof name == 'object') attributes = name;
    else attributes[name] = Object.isUndefined(value) ? true : value;

    for (var attr in attributes) {
      name = t.names[attr] || attr;
      value = attributes[attr];
      if (t.values[attr]) name = t.values[attr](element, value);
      if (value === false || value === null)
        element.removeAttribute(name);
      else if (value === true)
        element.setAttribute(name, name);
      else element.setAttribute(name, value);
    }
    return element;
  },

  getHeight: function(element) {
    return $(element).getDimensions().height;
  },

  getWidth: function(element) {
    return $(element).getDimensions().width;
  },

  classNames: function(element) {
    return new Element.ClassNames(element);
  },

  hasClassName: function(element, className) {
    if (!(element = $(element))) return;
    var elementClassName = element.className;
    return (elementClassName.length > 0 && (elementClassName == className ||
      new RegExp("(^|\\s)" + className + "(\\s|$)").test(elementClassName)));
  },

  addClassName: function(element, className) {
    if (!(element = $(element))) return;
    if (!element.hasClassName(className))
      element.className += (element.className ? ' ' : '') + className;
    return element;
  },

  removeClassName: function(element, className) {
    if (!(element = $(element))) return;
    element.className = element.className.replace(
      new RegExp("(^|\\s+)" + className + "(\\s+|$)"), ' ').strip();
    return element;
  },

  toggleClassName: function(element, className) {
    if (!(element = $(element))) return;
    return element[element.hasClassName(className) ?
      'removeClassName' : 'addClassName'](className);
  },

  // removes whitespace-only text node children
  cleanWhitespace: function(element) {
    element = $(element);
    var node = element.firstChild;
    while (node) {
      var nextNode = node.nextSibling;
      if (node.nodeType == 3 && !/\S/.test(node.nodeValue))
        element.removeChild(node);
      node = nextNode;
    }
    return element;
  },

  empty: function(element) {
    return $(element).innerHTML.blank();
  },

  descendantOf: function(element, ancestor) {
    element = $(element), ancestor = $(ancestor);
    var originalAncestor = ancestor;

    if (element.compareDocumentPosition)
      return (element.compareDocumentPosition(ancestor) & 8) === 8;

    if (element.sourceIndex && !Prototype.Browser.Opera) {
      var e = element.sourceIndex, a = ancestor.sourceIndex,
       nextAncestor = ancestor.nextSibling;
      if (!nextAncestor) {
        do { ancestor = ancestor.parentNode; }
        while (!(nextAncestor = ancestor.nextSibling) && ancestor.parentNode);
      }
      if (nextAncestor && nextAncestor.sourceIndex)
       return (e > a && e < nextAncestor.sourceIndex);
    }

    while (element = element.parentNode)
      if (element == originalAncestor) return true;
    return false;
  },

  scrollTo: function(element) {
    element = $(element);
    var pos = element.cumulativeOffset();
    window.scrollTo(pos[0], pos[1]);
    return element;
  },

  getStyle: function(element, style) {
    element = $(element);
    style = style == 'float' ? 'cssFloat' : style.camelize();
    var value = element.style[style];
    if (!value) {
      var css = document.defaultView.getComputedStyle(element, null);
      value = css ? css[style] : null;
    }
    if (style == 'opacity') return value ? parseFloat(value) : 1.0;
    return value == 'auto' ? null : value;
  },

  getOpacity: function(element) {
    return $(element).getStyle('opacity');
  },

  setStyle: function(element, styles) {
    element = $(element);
    var elementStyle = element.style, match;
    if (Object.isString(styles)) {
      element.style.cssText += ';' + styles;
      return styles.include('opacity') ?
        element.setOpacity(styles.match(/opacity:\s*(\d?\.?\d*)/)[1]) : element;
    }
    for (var property in styles)
      if (property == 'opacity') element.setOpacity(styles[property]);
      else
        elementStyle[(property == 'float' || property == 'cssFloat') ?
          (Object.isUndefined(elementStyle.styleFloat) ? 'cssFloat' : 'styleFloat') :
            property] = styles[property];

    return element;
  },

  setOpacity: function(element, value) {
    element = $(element);
    element.style.opacity = (value == 1 || value === '') ? '' :
      (value < 0.00001) ? 0 : value;
    return element;
  },

  getDimensions: function(element) {
    element = $(element);
    var display = $(element).getStyle('display');
    if (display != 'none' && display != null) // Safari bug
      return {width: element.offsetWidth, height: element.offsetHeight};

    // All *Width and *Height properties give 0 on elements with display none,
    // so enable the element temporarily
    var els = element.style;
    var originalVisibility = els.visibility;
    var originalPosition = els.position;
    var originalDisplay = els.display;
    els.visibility = 'hidden';
    els.position = 'absolute';
    els.display = 'block';
    var originalWidth = element.clientWidth;
    var originalHeight = element.clientHeight;
    els.display = originalDisplay;
    els.position = originalPosition;
    els.visibility = originalVisibility;
    return {width: originalWidth, height: originalHeight};
  },

  makePositioned: function(element) {
    element = $(element);
    var pos = Element.getStyle(element, 'position');
    if (pos == 'static' || !pos) {
      element._madePositioned = true;
      element.style.position = 'relative';
      // Opera returns the offset relative to the positioning context, when an
      // element is position relative but top and left have not been defined
      if (window.opera) {
        element.style.top = 0;
        element.style.left = 0;
      }
    }
    return element;
  },

  undoPositioned: function(element) {
    element = $(element);
    if (element._madePositioned) {
      element._madePositioned = undefined;
      element.style.position =
        element.style.top =
        element.style.left =
        element.style.bottom =
        element.style.right = '';
    }
    return element;
  },

  makeClipping: function(element) {
    element = $(element);
    if (element._overflow) return element;
    element._overflow = Element.getStyle(element, 'overflow') || 'auto';
    if (element._overflow !== 'hidden')
      element.style.overflow = 'hidden';
    return element;
  },

  undoClipping: function(element) {
    element = $(element);
    if (!element._overflow) return element;
    element.style.overflow = element._overflow == 'auto' ? '' : element._overflow;
    element._overflow = null;
    return element;
  },

  cumulativeOffset: function(element) {
    var valueT = 0, valueL = 0;
    do {
      valueT += element.offsetTop  || 0;
      valueL += element.offsetLeft || 0;
      element = element.offsetParent;
    } while (element);
    return Element._returnOffset(valueL, valueT);
  },

  positionedOffset: function(element) {
    var valueT = 0, valueL = 0;
    do {
      valueT += element.offsetTop  || 0;
      valueL += element.offsetLeft || 0;
      element = element.offsetParent;
      if (element) {
        if (element.tagName == 'BODY') break;
        var p = Element.getStyle(element, 'position');
        if (p !== 'static') break;
      }
    } while (element);
    return Element._returnOffset(valueL, valueT);
  },

  absolutize: function(element) {
    element = $(element);
    if (element.getStyle('position') == 'absolute') return;
    // Position.prepare(); // To be done manually by Scripty when it needs it.

    var offsets = element.positionedOffset();
    var top     = offsets[1];
    var left    = offsets[0];
    var width   = element.clientWidth;
    var height  = element.clientHeight;

    element._originalLeft   = left - parseFloat(element.style.left  || 0);
    element._originalTop    = top  - parseFloat(element.style.top || 0);
    element._originalWidth  = element.style.width;
    element._originalHeight = element.style.height;

    element.style.position = 'absolute';
    element.style.top    = top + 'px';
    element.style.left   = left + 'px';
    element.style.width  = width + 'px';
    element.style.height = height + 'px';
    return element;
  },

  relativize: function(element) {
    element = $(element);
    if (element.getStyle('position') == 'relative') return;
    // Position.prepare(); // To be done manually by Scripty when it needs it.

    element.style.position = 'relative';
    var top  = parseFloat(element.style.top  || 0) - (element._originalTop || 0);
    var left = parseFloat(element.style.left || 0) - (element._originalLeft || 0);

    element.style.top    = top + 'px';
    element.style.left   = left + 'px';
    element.style.height = element._originalHeight;
    element.style.width  = element._originalWidth;
    return element;
  },

  cumulativeScrollOffset: function(element) {
    var valueT = 0, valueL = 0;
    do {
      valueT += element.scrollTop  || 0;
      valueL += element.scrollLeft || 0;
      element = element.parentNode;
    } while (element);
    return Element._returnOffset(valueL, valueT);
  },

  getOffsetParent: function(element) {
    if (element.offsetParent) return $(element.offsetParent);
    if (element == document.body) return $(element);

    while ((element = element.parentNode) && element != document.body)
      if (Element.getStyle(element, 'position') != 'static')
        return $(element);

    return $(document.body);
  },

  viewportOffset: function(forElement) {
    var valueT = 0, valueL = 0;

    var element = forElement;
    do {
      valueT += element.offsetTop  || 0;
      valueL += element.offsetLeft || 0;

      // Safari fix
      if (element.offsetParent == document.body &&
        Element.getStyle(element, 'position') == 'absolute') break;

    } while (element = element.offsetParent);

    element = forElement;
    do {
      if (!Prototype.Browser.Opera || element.tagName == 'BODY') {
        valueT -= element.scrollTop  || 0;
        valueL -= element.scrollLeft || 0;
      }
    } while (element = element.parentNode);

    return Element._returnOffset(valueL, valueT);
  },

  clonePosition: function(element, source) {
    var options = Object.extend({
      setLeft:    true,
      setTop:     true,
      setWidth:   true,
      setHeight:  true,
      offsetTop:  0,
      offsetLeft: 0
    }, arguments[2] || { });

    // find page position of source
    source = $(source);
    var p = source.viewportOffset();

    // find coordinate system to use
    element = $(element);
    var delta = [0, 0];
    var parent = null;
    // delta [0,0] will do fine with position: fixed elements,
    // position:absolute needs offsetParent deltas
    if (Element.getStyle(element, 'position') == 'absolute') {
      parent = element.getOffsetParent();
      delta = parent.viewportOffset();
    }

    // correct by body offsets (fixes Safari)
    if (parent == document.body) {
      delta[0] -= document.body.offsetLeft;
      delta[1] -= document.body.offsetTop;
    }

    // set position
    if (options.setLeft)   element.style.left  = (p[0] - delta[0] + options.offsetLeft) + 'px';
    if (options.setTop)    element.style.top   = (p[1] - delta[1] + options.offsetTop) + 'px';
    if (options.setWidth)  element.style.width = source.offsetWidth + 'px';
    if (options.setHeight) element.style.height = source.offsetHeight + 'px';
    return element;
  }
};

Element.Methods.identify.counter = 1;

Object.extend(Element.Methods, {
  getElementsBySelector: Element.Methods.select,
  childElements: Element.Methods.immediateDescendants
});

Element._attributeTranslations = {
  write: {
    names: {
      className: 'class',
      htmlFor:   'for'
    },
    values: { }
  }
};

if (Prototype.Browser.Opera) {
  Element.Methods.getStyle = Element.Methods.getStyle.wrap(
    function(proceed, element, style) {
      switch (style) {
        case 'left': case 'top': case 'right': case 'bottom':
          if (proceed(element, 'position') === 'static') return null;
        case 'height': case 'width':
          // returns '0px' for hidden elements; we want it to return null
          if (!Element.visible(element)) return null;

          // returns the border-box dimensions rather than the content-box
          // dimensions, so we subtract padding and borders from the value
          var dim = parseInt(proceed(element, style), 10);

          if (dim !== element['offset' + style.capitalize()])
            return dim + 'px';

          var properties;
          if (style === 'height') {
            properties = ['border-top-width', 'padding-top',
             'padding-bottom', 'border-bottom-width'];
          }
          else {
            properties = ['border-left-width', 'padding-left',
             'padding-right', 'border-right-width'];
          }
          return properties.inject(dim, function(memo, property) {
            var val = proceed(element, property);
            return val === null ? memo : memo - parseInt(val, 10);
          }) + 'px';
        default: return proceed(element, style);
      }
    }
  );

  Element.Methods.readAttribute = Element.Methods.readAttribute.wrap(
    function(proceed, element, attribute) {
      if (attribute === 'title') return element.title;
      return proceed(element, attribute);
    }
  );
}

else if (Prototype.Browser.IE) {
  // IE doesn't report offsets correctly for static elements, so we change them
  // to "relative" to get the values, then change them back.
  Element.Methods.getOffsetParent = Element.Methods.getOffsetParent.wrap(
    function(proceed, element) {
      element = $(element);
      var position = element.getStyle('position');
      if (position !== 'static') return proceed(element);
      element.setStyle({ position: 'relative' });
      var value = proceed(element);
      element.setStyle({ position: position });
      return value;
    }
  );

  $w('positionedOffset viewportOffset').each(function(method) {
    Element.Methods[method] = Element.Methods[method].wrap(
      function(proceed, element) {
        element = $(element);
        var position = element.getStyle('position');
        if (position !== 'static') return proceed(element);
        // Trigger hasLayout on the offset parent so that IE6 reports
        // accurate offsetTop and offsetLeft values for position: fixed.
        var offsetParent = element.getOffsetParent();
        if (offsetParent && offsetParent.getStyle('position') === 'fixed')
          offsetParent.setStyle({ zoom: 1 });
        element.setStyle({ position: 'relative' });
        var value = proceed(element);
        element.setStyle({ position: position });
        return value;
      }
    );
  });

  Element.Methods.getStyle = function(element, style) {
    element = $(element);
    style = (style == 'float' || style == 'cssFloat') ? 'styleFloat' : style.camelize();
    var value = element.style[style];
    if (!value && element.currentStyle) value = element.currentStyle[style];

    if (style == 'opacity') {
      if (value = (element.getStyle('filter') || '').match(/alpha\(opacity=(.*)\)/))
        if (value[1]) return parseFloat(value[1]) / 100;
      return 1.0;
    }

    if (value == 'auto') {
      if ((style == 'width' || style == 'height') && (element.getStyle('display') != 'none'))
        return element['offset' + style.capitalize()] + 'px';
      return null;
    }
    return value;
  };

  Element.Methods.setOpacity = function(element, value) {
    function stripAlpha(filter){
      return filter.replace(/alpha\([^\)]*\)/gi,'');
    }
    element = $(element);
    var currentStyle = element.currentStyle;
    if ((currentStyle && !currentStyle.hasLayout) ||
      (!currentStyle && element.style.zoom == 'normal'))
        element.style.zoom = 1;

    var filter = element.getStyle('filter'), style = element.style;
    if (value == 1 || value === '') {
      (filter = stripAlpha(filter)) ?
        style.filter = filter : style.removeAttribute('filter');
      return element;
    } else if (value < 0.00001) value = 0;
    style.filter = stripAlpha(filter) +
      'alpha(opacity=' + (value * 100) + ')';
    return element;
  };

  Element._attributeTranslations = {
    read: {
      names: {
        'class': 'className',
        'for':   'htmlFor'
      },
      values: {
        _getAttr: function(element, attribute) {
          return element.getAttribute(attribute, 2);
        },
        _getAttrNode: function(element, attribute) {
          var node = element.getAttributeNode(attribute);
          return node ? node.value : "";
        },
        _getEv: function(element, attribute) {
          attribute = element.getAttribute(attribute);
          return attribute ? attribute.toString().slice(23, -2) : null;
        },
        _flag: function(element, attribute) {
          return $(element).hasAttribute(attribute) ? attribute : null;
        },
        style: function(element) {
          return element.style.cssText.toLowerCase();
        },
        title: function(element) {
          return element.title;
        }
      }
    }
  };

  Element._attributeTranslations.write = {
    names: Object.extend({
      cellpadding: 'cellPadding',
      cellspacing: 'cellSpacing'
    }, Element._attributeTranslations.read.names),
    values: {
      checked: function(element, value) {
        element.checked = !!value;
      },

      style: function(element, value) {
        element.style.cssText = value ? value : '';
      }
    }
  };

  Element._attributeTranslations.has = {};

  $w('colSpan rowSpan vAlign dateTime accessKey tabIndex ' +
      'encType maxLength readOnly longDesc').each(function(attr) {
    Element._attributeTranslations.write.names[attr.toLowerCase()] = attr;
    Element._attributeTranslations.has[attr.toLowerCase()] = attr;
  });

  (function(v) {
    Object.extend(v, {
      href:        v._getAttr,
      src:         v._getAttr,
      type:        v._getAttr,
      action:      v._getAttrNode,
      disabled:    v._flag,
      checked:     v._flag,
      readonly:    v._flag,
      multiple:    v._flag,
      onload:      v._getEv,
      onunload:    v._getEv,
      onclick:     v._getEv,
      ondblclick:  v._getEv,
      onmousedown: v._getEv,
      onmouseup:   v._getEv,
      onmouseover: v._getEv,
      onmousemove: v._getEv,
      onmouseout:  v._getEv,
      onfocus:     v._getEv,
      onblur:      v._getEv,
      onkeypress:  v._getEv,
      onkeydown:   v._getEv,
      onkeyup:     v._getEv,
      onsubmit:    v._getEv,
      onreset:     v._getEv,
      onselect:    v._getEv,
      onchange:    v._getEv
    });
  })(Element._attributeTranslations.read.values);
}

else if (Prototype.Browser.Gecko && /rv:1\.8\.0/.test(navigator.userAgent)) {
  Element.Methods.setOpacity = function(element, value) {
    element = $(element);
    element.style.opacity = (value == 1) ? 0.999999 :
      (value === '') ? '' : (value < 0.00001) ? 0 : value;
    return element;
  };
}

else if (Prototype.Browser.WebKit) {
  Element.Methods.setOpacity = function(element, value) {
    element = $(element);
    element.style.opacity = (value == 1 || value === '') ? '' :
      (value < 0.00001) ? 0 : value;

    if (value == 1)
      if(element.tagName == 'IMG' && element.width) {
        element.width++; element.width--;
      } else try {
        var n = document.createTextNode(' ');
        element.appendChild(n);
        element.removeChild(n);
      } catch (e) { }

    return element;
  };

  // Safari returns margins on body which is incorrect if the child is absolutely
  // positioned.  For performance reasons, redefine Element#cumulativeOffset for
  // KHTML/WebKit only.
  Element.Methods.cumulativeOffset = function(element) {
    var valueT = 0, valueL = 0;
    do {
      valueT += element.offsetTop  || 0;
      valueL += element.offsetLeft || 0;
      if (element.offsetParent == document.body)
        if (Element.getStyle(element, 'position') == 'absolute') break;

      element = element.offsetParent;
    } while (element);

    return Element._returnOffset(valueL, valueT);
  };
}

if (Prototype.Browser.IE || Prototype.Browser.Opera) {
  // IE and Opera are missing .innerHTML support for TABLE-related and SELECT elements
  Element.Methods.update = function(element, content) {
    element = $(element);

    if (content && content.toElement) content = content.toElement();
    if (Object.isElement(content)) return element.update().insert(content);

    content = Object.toHTML(content);
    var tagName = element.tagName.toUpperCase();

    if (tagName in Element._insertionTranslations.tags) {
      $A(element.childNodes).each(function(node) { element.removeChild(node) });
      Element._getContentFromAnonymousElement(tagName, content.stripScripts())
        .each(function(node) { element.appendChild(node) });
    }
    else element.innerHTML = content.stripScripts();

    content.evalScripts.bind(content).defer();
    return element;
  };
}

if ('outerHTML' in document.createElement('div')) {
  Element.Methods.replace = function(element, content) {
    element = $(element);

    if (content && content.toElement) content = content.toElement();
    if (Object.isElement(content)) {
      element.parentNode.replaceChild(content, element);
      return element;
    }

    content = Object.toHTML(content);
    var parent = element.parentNode, tagName = parent.tagName.toUpperCase();

    if (Element._insertionTranslations.tags[tagName]) {
      var nextSibling = element.next();
      var fragments = Element._getContentFromAnonymousElement(tagName, content.stripScripts());
      parent.removeChild(element);
      if (nextSibling)
        fragments.each(function(node) { parent.insertBefore(node, nextSibling) });
      else
        fragments.each(function(node) { parent.appendChild(node) });
    }
    else element.outerHTML = content.stripScripts();

    content.evalScripts.bind(content).defer();
    return element;
  };
}

Element._returnOffset = function(l, t) {
  var result = [l, t];
  result.left = l;
  result.top = t;
  return result;
};

Element._getContentFromAnonymousElement = function(tagName, html) {
  var div = new Element('div'), t = Element._insertionTranslations.tags[tagName];
  if (t) {
    div.innerHTML = t[0] + html + t[1];
    t[2].times(function() { div = div.firstChild });
  } else div.innerHTML = html;
  return $A(div.childNodes);
};

Element._insertionTranslations = {
  before: function(element, node) {
    element.parentNode.insertBefore(node, element);
  },
  top: function(element, node) {
    element.insertBefore(node, element.firstChild);
  },
  bottom: function(element, node) {
    element.appendChild(node);
  },
  after: function(element, node) {
    element.parentNode.insertBefore(node, element.nextSibling);
  },
  tags: {
    TABLE:  ['<table>',                '</table>',                   1],
    TBODY:  ['<table><tbody>',         '</tbody></table>',           2],
    TR:     ['<table><tbody><tr>',     '</tr></tbody></table>',      3],
    TD:     ['<table><tbody><tr><td>', '</td></tr></tbody></table>', 4],
    SELECT: ['<select>',               '</select>',                  1]
  }
};

(function() {
  Object.extend(this.tags, {
    THEAD: this.tags.TBODY,
    TFOOT: this.tags.TBODY,
    TH:    this.tags.TD
  });
}).call(Element._insertionTranslations);

Element.Methods.Simulated = {
  hasAttribute: function(element, attribute) {
    attribute = Element._attributeTranslations.has[attribute] || attribute;
    var node = $(element).getAttributeNode(attribute);
    return node && node.specified;
  }
};

Element.Methods.ByTag = { };

Object.extend(Element, Element.Methods);

if (!Prototype.BrowserFeatures.ElementExtensions &&
    document.createElement('div').__proto__) {
  window.HTMLElement = { };
  window.HTMLElement.prototype = document.createElement('div').__proto__;
  Prototype.BrowserFeatures.ElementExtensions = true;
}

Element.extend = (function() {
  if (Prototype.BrowserFeatures.SpecificElementExtensions)
    return Prototype.K;

  var Methods = { }, ByTag = Element.Methods.ByTag;

  var extend = Object.extend(function(element) {
    if (!element || element._extendedByPrototype ||
        element.nodeType != 1 || element == window) return element;

    var methods = Object.clone(Methods),
      tagName = element.tagName, property, value;

    // extend methods for specific tags
    if (ByTag[tagName]) Object.extend(methods, ByTag[tagName]);

    for (property in methods) {
      value = methods[property];
      if (Object.isFunction(value) && !(property in element))
        element[property] = value.methodize();
    }

    element._extendedByPrototype = Prototype.emptyFunction;
    return element;

  }, {
    refresh: function() {
      // extend methods for all tags (Safari doesn't need this)
      if (!Prototype.BrowserFeatures.ElementExtensions) {
        Object.extend(Methods, Element.Methods);
        Object.extend(Methods, Element.Methods.Simulated);
      }
    }
  });

  extend.refresh();
  return extend;
})();

Element.hasAttribute = function(element, attribute) {
  if (element.hasAttribute) return element.hasAttribute(attribute);
  return Element.Methods.Simulated.hasAttribute(element, attribute);
};

Element.addMethods = function(methods) {
  var F = Prototype.BrowserFeatures, T = Element.Methods.ByTag;

  if (!methods) {
    Object.extend(Form, Form.Methods);
    Object.extend(Form.Element, Form.Element.Methods);
    Object.extend(Element.Methods.ByTag, {
      "FORM":     Object.clone(Form.Methods),
      "INPUT":    Object.clone(Form.Element.Methods),
      "SELECT":   Object.clone(Form.Element.Methods),
      "TEXTAREA": Object.clone(Form.Element.Methods)
    });
  }

  if (arguments.length == 2) {
    var tagName = methods;
    methods = arguments[1];
  }

  if (!tagName) Object.extend(Element.Methods, methods || { });
  else {
    if (Object.isArray(tagName)) tagName.each(extend);
    else extend(tagName);
  }

  function extend(tagName) {
    tagName = tagName.toUpperCase();
    if (!Element.Methods.ByTag[tagName])
      Element.Methods.ByTag[tagName] = { };
    Object.extend(Element.Methods.ByTag[tagName], methods);
  }

  function copy(methods, destination, onlyIfAbsent) {
    onlyIfAbsent = onlyIfAbsent || false;
    for (var property in methods) {
      var value = methods[property];
      if (!Object.isFunction(value)) continue;
      if (!onlyIfAbsent || !(property in destination))
        destination[property] = value.methodize();
    }
  }

  function findDOMClass(tagName) {
    var klass;
    var trans = {
      "OPTGROUP": "OptGroup", "TEXTAREA": "TextArea", "P": "Paragraph",
      "FIELDSET": "FieldSet", "UL": "UList", "OL": "OList", "DL": "DList",
      "DIR": "Directory", "H1": "Heading", "H2": "Heading", "H3": "Heading",
      "H4": "Heading", "H5": "Heading", "H6": "Heading", "Q": "Quote",
      "INS": "Mod", "DEL": "Mod", "A": "Anchor", "IMG": "Image", "CAPTION":
      "TableCaption", "COL": "TableCol", "COLGROUP": "TableCol", "THEAD":
      "TableSection", "TFOOT": "TableSection", "TBODY": "TableSection", "TR":
      "TableRow", "TH": "TableCell", "TD": "TableCell", "FRAMESET":
      "FrameSet", "IFRAME": "IFrame"
    };
    if (trans[tagName]) klass = 'HTML' + trans[tagName] + 'Element';
    if (window[klass]) return window[klass];
    klass = 'HTML' + tagName + 'Element';
    if (window[klass]) return window[klass];
    klass = 'HTML' + tagName.capitalize() + 'Element';
    if (window[klass]) return window[klass];

    window[klass] = { };
    window[klass].prototype = document.createElement(tagName).__proto__;
    return window[klass];
  }

  if (F.ElementExtensions) {
    copy(Element.Methods, HTMLElement.prototype);
    copy(Element.Methods.Simulated, HTMLElement.prototype, true);
  }

  if (F.SpecificElementExtensions) {
    for (var tag in Element.Methods.ByTag) {
      var klass = findDOMClass(tag);
      if (Object.isUndefined(klass)) continue;
      copy(T[tag], klass.prototype);
    }
  }

  Object.extend(Element, Element.Methods);
  delete Element.ByTag;

  if (Element.extend.refresh) Element.extend.refresh();
  Element.cache = { };
};

document.viewport = {
  getDimensions: function() {
    var dimensions = { };
    var B = Prototype.Browser;
    $w('width height').each(function(d) {
      var D = d.capitalize();
      dimensions[d] = (B.WebKit && !document.evaluate) ? self['inner' + D] :
        (B.Opera) ? document.body['client' + D] : document.documentElement['client' + D];
    });
    return dimensions;
  },

  getWidth: function() {
    return this.getDimensions().width;
  },

  getHeight: function() {
    return this.getDimensions().height;
  },

  getScrollOffsets: function() {
    return Element._returnOffset(
      window.pageXOffset || document.documentElement.scrollLeft || document.body.scrollLeft,
      window.pageYOffset || document.documentElement.scrollTop || document.body.scrollTop);
  }
};
/* Portions of the Selector class are derived from Jack Slocum’s DomQuery,
 * part of YUI-Ext version 0.40, distributed under the terms of an MIT-style
 * license.  Please see http://www.yui-ext.com/ for more information. */

var Selector = Class.create({
  initialize: function(expression) {
    this.expression = expression.strip();
    this.compileMatcher();
  },

  shouldUseXPath: function() {
    if (!Prototype.BrowserFeatures.XPath) return false;

    var e = this.expression;

    // Safari 3 chokes on :*-of-type and :empty
    if (Prototype.Browser.WebKit &&
     (e.include("-of-type") || e.include(":empty")))
      return false;

    // XPath can't do namespaced attributes, nor can it read
    // the "checked" property from DOM nodes
    if ((/(\[[\w-]*?:|:checked)/).test(this.expression))
      return false;

    return true;
  },

  compileMatcher: function() {
    if (this.shouldUseXPath())
      return this.compileXPathMatcher();

    var e = this.expression, ps = Selector.patterns, h = Selector.handlers,
        c = Selector.criteria, le, p, m;

    if (Selector._cache[e]) {
      this.matcher = Selector._cache[e];
      return;
    }

    this.matcher = ["this.matcher = function(root) {",
                    "var r = root, h = Selector.handlers, c = false, n;"];

    while (e && le != e && (/\S/).test(e)) {
      le = e;
      for (var i in ps) {
        p = ps[i];
        if (m = e.match(p)) {
          this.matcher.push(Object.isFunction(c[i]) ? c[i](m) :
    	      new Template(c[i]).evaluate(m));
          e = e.replace(m[0], '');
          break;
        }
      }
    }

    this.matcher.push("return h.unique(n);\n}");
    eval(this.matcher.join('\n'));
    Selector._cache[this.expression] = this.matcher;
  },

  compileXPathMatcher: function() {
    var e = this.expression, ps = Selector.patterns,
        x = Selector.xpath, le, m;

    if (Selector._cache[e]) {
      this.xpath = Selector._cache[e]; return;
    }

    this.matcher = ['.//*'];
    while (e && le != e && (/\S/).test(e)) {
      le = e;
      for (var i in ps) {
        if (m = e.match(ps[i])) {
          this.matcher.push(Object.isFunction(x[i]) ? x[i](m) :
            new Template(x[i]).evaluate(m));
          e = e.replace(m[0], '');
          break;
        }
      }
    }

    this.xpath = this.matcher.join('');
    Selector._cache[this.expression] = this.xpath;
  },

  findElements: function(root) {
    root = root || document;
    if (this.xpath) return document._getElementsByXPath(this.xpath, root);
    return this.matcher(root);
  },

  match: function(element) {
    this.tokens = [];

    var e = this.expression, ps = Selector.patterns, as = Selector.assertions;
    var le, p, m;

    while (e && le !== e && (/\S/).test(e)) {
      le = e;
      for (var i in ps) {
        p = ps[i];
        if (m = e.match(p)) {
          // use the Selector.assertions methods unless the selector
          // is too complex.
          if (as[i]) {
            this.tokens.push([i, Object.clone(m)]);
            e = e.replace(m[0], '');
          } else {
            // reluctantly do a document-wide search
            // and look for a match in the array
            return this.findElements(document).include(element);
          }
        }
      }
    }

    var match = true, name, matches;
    for (var i = 0, token; token = this.tokens[i]; i++) {
      name = token[0], matches = token[1];
      if (!Selector.assertions[name](element, matches)) {
        match = false; break;
      }
    }

    return match;
  },

  toString: function() {
    return this.expression;
  },

  inspect: function() {
    return "#<Selector:" + this.expression.inspect() + ">";
  }
});

Object.extend(Selector, {
  _cache: { },

  xpath: {
    descendant:   "//*",
    child:        "/*",
    adjacent:     "/following-sibling::*[1]",
    laterSibling: '/following-sibling::*',
    tagName:      function(m) {
      if (m[1] == '*') return '';
      return "[local-name()='" + m[1].toLowerCase() +
             "' or local-name()='" + m[1].toUpperCase() + "']";
    },
    className:    "[contains(concat(' ', @class, ' '), ' #{1} ')]",
    id:           "[@id='#{1}']",
    attrPresence: function(m) {
      m[1] = m[1].toLowerCase();
      return new Template("[@#{1}]").evaluate(m);
    },
    attr: function(m) {
      m[1] = m[1].toLowerCase();
      m[3] = m[5] || m[6];
      return new Template(Selector.xpath.operators[m[2]]).evaluate(m);
    },
    pseudo: function(m) {
      var h = Selector.xpath.pseudos[m[1]];
      if (!h) return '';
      if (Object.isFunction(h)) return h(m);
      return new Template(Selector.xpath.pseudos[m[1]]).evaluate(m);
    },
    operators: {
      '=':  "[@#{1}='#{3}']",
      '!=': "[@#{1}!='#{3}']",
      '^=': "[starts-with(@#{1}, '#{3}')]",
      '$=': "[substring(@#{1}, (string-length(@#{1}) - string-length('#{3}') + 1))='#{3}']",
      '*=': "[contains(@#{1}, '#{3}')]",
      '~=': "[contains(concat(' ', @#{1}, ' '), ' #{3} ')]",
      '|=': "[contains(concat('-', @#{1}, '-'), '-#{3}-')]"
    },
    pseudos: {
      'first-child': '[not(preceding-sibling::*)]',
      'last-child':  '[not(following-sibling::*)]',
      'only-child':  '[not(preceding-sibling::* or following-sibling::*)]',
      'empty':       "[count(*) = 0 and (count(text()) = 0 or translate(text(), ' \t\r\n', '') = '')]",
      'checked':     "[@checked]",
      'disabled':    "[@disabled]",
      'enabled':     "[not(@disabled)]",
      'not': function(m) {
        var e = m[6], p = Selector.patterns,
            x = Selector.xpath, le, v;

        var exclusion = [];
        while (e && le != e && (/\S/).test(e)) {
          le = e;
          for (var i in p) {
            if (m = e.match(p[i])) {
              v = Object.isFunction(x[i]) ? x[i](m) : new Template(x[i]).evaluate(m);
              exclusion.push("(" + v.substring(1, v.length - 1) + ")");
              e = e.replace(m[0], '');
              break;
            }
          }
        }
        return "[not(" + exclusion.join(" and ") + ")]";
      },
      'nth-child':      function(m) {
        return Selector.xpath.pseudos.nth("(count(./preceding-sibling::*) + 1) ", m);
      },
      'nth-last-child': function(m) {
        return Selector.xpath.pseudos.nth("(count(./following-sibling::*) + 1) ", m);
      },
      'nth-of-type':    function(m) {
        return Selector.xpath.pseudos.nth("position() ", m);
      },
      'nth-last-of-type': function(m) {
        return Selector.xpath.pseudos.nth("(last() + 1 - position()) ", m);
      },
      'first-of-type':  function(m) {
        m[6] = "1"; return Selector.xpath.pseudos['nth-of-type'](m);
      },
      'last-of-type':   function(m) {
        m[6] = "1"; return Selector.xpath.pseudos['nth-last-of-type'](m);
      },
      'only-of-type':   function(m) {
        var p = Selector.xpath.pseudos; return p['first-of-type'](m) + p['last-of-type'](m);
      },
      nth: function(fragment, m) {
        var mm, formula = m[6], predicate;
        if (formula == 'even') formula = '2n+0';
        if (formula == 'odd')  formula = '2n+1';
        if (mm = formula.match(/^(\d+)$/)) // digit only
          return '[' + fragment + "= " + mm[1] + ']';
        if (mm = formula.match(/^(-?\d*)?n(([+-])(\d+))?/)) { // an+b
          if (mm[1] == "-") mm[1] = -1;
          var a = mm[1] ? Number(mm[1]) : 1;
          var b = mm[2] ? Number(mm[2]) : 0;
          predicate = "[((#{fragment} - #{b}) mod #{a} = 0) and " +
          "((#{fragment} - #{b}) div #{a} >= 0)]";
          return new Template(predicate).evaluate({
            fragment: fragment, a: a, b: b });
        }
      }
    }
  },

  criteria: {
    tagName:      'n = h.tagName(n, r, "#{1}", c);      c = false;',
    className:    'n = h.className(n, r, "#{1}", c);    c = false;',
    id:           'n = h.id(n, r, "#{1}", c);           c = false;',
    attrPresence: 'n = h.attrPresence(n, r, "#{1}", c); c = false;',
    attr: function(m) {
      m[3] = (m[5] || m[6]);
      return new Template('n = h.attr(n, r, "#{1}", "#{3}", "#{2}", c); c = false;').evaluate(m);
    },
    pseudo: function(m) {
      if (m[6]) m[6] = m[6].replace(/"/g, '\\"');
      return new Template('n = h.pseudo(n, "#{1}", "#{6}", r, c); c = false;').evaluate(m);
    },
    descendant:   'c = "descendant";',
    child:        'c = "child";',
    adjacent:     'c = "adjacent";',
    laterSibling: 'c = "laterSibling";'
  },

  patterns: {
    // combinators must be listed first
    // (and descendant needs to be last combinator)
    laterSibling: /^\s*~\s*/,
    child:        /^\s*>\s*/,
    adjacent:     /^\s*\+\s*/,
    descendant:   /^\s/,

    // selectors follow
    tagName:      /^\s*(\*|[\w\-]+)(\b|$)?/,
    id:           /^#([\w\-\*]+)(\b|$)/,
    className:    /^\.([\w\-\*]+)(\b|$)/,
    pseudo:
/^:((first|last|nth|nth-last|only)(-child|-of-type)|empty|checked|(en|dis)abled|not)(\((.*?)\))?(\b|$|(?=\s|[:+~>]))/,
    attrPresence: /^\[([\w]+)\]/,
    attr:         /\[((?:[\w-]*:)?[\w-]+)\s*(?:([!^$*~|]?=)\s*((['"])([^\4]*?)\4|([^'"][^\]]*?)))?\]/
  },

  // for Selector.match and Element#match
  assertions: {
    tagName: function(element, matches) {
      return matches[1].toUpperCase() == element.tagName.toUpperCase();
    },

    className: function(element, matches) {
      return Element.hasClassName(element, matches[1]);
    },

    id: function(element, matches) {
      return element.id === matches[1];
    },

    attrPresence: function(element, matches) {
      return Element.hasAttribute(element, matches[1]);
    },

    attr: function(element, matches) {
      var nodeValue = Element.readAttribute(element, matches[1]);
      return nodeValue && Selector.operators[matches[2]](nodeValue, matches[5] || matches[6]);
    }
  },

  handlers: {
    // UTILITY FUNCTIONS
    // joins two collections
    concat: function(a, b) {
      for (var i = 0, node; node = b[i]; i++)
        a.push(node);
      return a;
    },

    // marks an array of nodes for counting
    mark: function(nodes) {
      var _true = Prototype.emptyFunction;
      for (var i = 0, node; node = nodes[i]; i++)
        node._countedByPrototype = _true;
      return nodes;
    },

    unmark: function(nodes) {
      for (var i = 0, node; node = nodes[i]; i++)
        node._countedByPrototype = undefined;
      return nodes;
    },

    // mark each child node with its position (for nth calls)
    // "ofType" flag indicates whether we're indexing for nth-of-type
    // rather than nth-child
    index: function(parentNode, reverse, ofType) {
      parentNode._countedByPrototype = Prototype.emptyFunction;
      if (reverse) {
        for (var nodes = parentNode.childNodes, i = nodes.length - 1, j = 1; i >= 0; i--) {
          var node = nodes[i];
          if (node.nodeType == 1 && (!ofType || node._countedByPrototype)) node.nodeIndex = j++;
        }
      } else {
        for (var i = 0, j = 1, nodes = parentNode.childNodes; node = nodes[i]; i++)
          if (node.nodeType == 1 && (!ofType || node._countedByPrototype)) node.nodeIndex = j++;
      }
    },

    // filters out duplicates and extends all nodes
    unique: function(nodes) {
      if (nodes.length == 0) return nodes;
      var results = [], n;
      for (var i = 0, l = nodes.length; i < l; i++)
        if (!(n = nodes[i])._countedByPrototype) {
          n._countedByPrototype = Prototype.emptyFunction;
          results.push(Element.extend(n));
        }
      return Selector.handlers.unmark(results);
    },

    // COMBINATOR FUNCTIONS
    descendant: function(nodes) {
      var h = Selector.handlers;
      for (var i = 0, results = [], node; node = nodes[i]; i++)
        h.concat(results, node.getElementsByTagName('*'));
      return results;
    },

    child: function(nodes) {
      var h = Selector.handlers;
      for (var i = 0, results = [], node; node = nodes[i]; i++) {
        for (var j = 0, child; child = node.childNodes[j]; j++)
          if (child.nodeType == 1 && child.tagName != '!') results.push(child);
      }
      return results;
    },

    adjacent: function(nodes) {
      for (var i = 0, results = [], node; node = nodes[i]; i++) {
        var next = this.nextElementSibling(node);
        if (next) results.push(next);
      }
      return results;
    },

    laterSibling: function(nodes) {
      var h = Selector.handlers;
      for (var i = 0, results = [], node; node = nodes[i]; i++)
        h.concat(results, Element.nextSiblings(node));
      return results;
    },

    nextElementSibling: function(node) {
      while (node = node.nextSibling)
	      if (node.nodeType == 1) return node;
      return null;
    },

    previousElementSibling: function(node) {
      while (node = node.previousSibling)
        if (node.nodeType == 1) return node;
      return null;
    },

    // TOKEN FUNCTIONS
    tagName: function(nodes, root, tagName, combinator) {
      var uTagName = tagName.toUpperCase();
      var results = [], h = Selector.handlers;
      if (nodes) {
        if (combinator) {
          // fastlane for ordinary descendant combinators
          if (combinator == "descendant") {
            for (var i = 0, node; node = nodes[i]; i++)
              h.concat(results, node.getElementsByTagName(tagName));
            return results;
          } else nodes = this[combinator](nodes);
          if (tagName == "*") return nodes;
        }
        for (var i = 0, node; node = nodes[i]; i++)
          if (node.tagName.toUpperCase() === uTagName) results.push(node);
        return results;
      } else return root.getElementsByTagName(tagName);
    },

    id: function(nodes, root, id, combinator) {
      var targetNode = $(id), h = Selector.handlers;
      if (!targetNode) return [];
      if (!nodes && root == document) return [targetNode];
      if (nodes) {
        if (combinator) {
          if (combinator == 'child') {
            for (var i = 0, node; node = nodes[i]; i++)
              if (targetNode.parentNode == node) return [targetNode];
          } else if (combinator == 'descendant') {
            for (var i = 0, node; node = nodes[i]; i++)
              if (Element.descendantOf(targetNode, node)) return [targetNode];
          } else if (combinator == 'adjacent') {
            for (var i = 0, node; node = nodes[i]; i++)
              if (Selector.handlers.previousElementSibling(targetNode) == node)
                return [targetNode];
          } else nodes = h[combinator](nodes);
        }
        for (var i = 0, node; node = nodes[i]; i++)
          if (node == targetNode) return [targetNode];
        return [];
      }
      return (targetNode && Element.descendantOf(targetNode, root)) ? [targetNode] : [];
    },

    className: function(nodes, root, className, combinator) {
      if (nodes && combinator) nodes = this[combinator](nodes);
      return Selector.handlers.byClassName(nodes, root, className);
    },

    byClassName: function(nodes, root, className) {
      if (!nodes) nodes = Selector.handlers.descendant([root]);
      var needle = ' ' + className + ' ';
      for (var i = 0, results = [], node, nodeClassName; node = nodes[i]; i++) {
        nodeClassName = node.className;
        if (nodeClassName.length == 0) continue;
        if (nodeClassName == className || (' ' + nodeClassName + ' ').include(needle))
          results.push(node);
      }
      return results;
    },

    attrPresence: function(nodes, root, attr, combinator) {
      if (!nodes) nodes = root.getElementsByTagName("*");
      if (nodes && combinator) nodes = this[combinator](nodes);
      var results = [];
      for (var i = 0, node; node = nodes[i]; i++)
        if (Element.hasAttribute(node, attr)) results.push(node);
      return results;
    },

    attr: function(nodes, root, attr, value, operator, combinator) {
      if (!nodes) nodes = root.getElementsByTagName("*");
      if (nodes && combinator) nodes = this[combinator](nodes);
      var handler = Selector.operators[operator], results = [];
      for (var i = 0, node; node = nodes[i]; i++) {
        var nodeValue = Element.readAttribute(node, attr);
        if (nodeValue === null) continue;
        if (handler(nodeValue, value)) results.push(node);
      }
      return results;
    },

    pseudo: function(nodes, name, value, root, combinator) {
      if (nodes && combinator) nodes = this[combinator](nodes);
      if (!nodes) nodes = root.getElementsByTagName("*");
      return Selector.pseudos[name](nodes, value, root);
    }
  },

  pseudos: {
    'first-child': function(nodes, value, root) {
      for (var i = 0, results = [], node; node = nodes[i]; i++) {
        if (Selector.handlers.previousElementSibling(node)) continue;
          results.push(node);
      }
      return results;
    },
    'last-child': function(nodes, value, root) {
      for (var i = 0, results = [], node; node = nodes[i]; i++) {
        if (Selector.handlers.nextElementSibling(node)) continue;
          results.push(node);
      }
      return results;
    },
    'only-child': function(nodes, value, root) {
      var h = Selector.handlers;
      for (var i = 0, results = [], node; node = nodes[i]; i++)
        if (!h.previousElementSibling(node) && !h.nextElementSibling(node))
          results.push(node);
      return results;
    },
    'nth-child':        function(nodes, formula, root) {
      return Selector.pseudos.nth(nodes, formula, root);
    },
    'nth-last-child':   function(nodes, formula, root) {
      return Selector.pseudos.nth(nodes, formula, root, true);
    },
    'nth-of-type':      function(nodes, formula, root) {
      return Selector.pseudos.nth(nodes, formula, root, false, true);
    },
    'nth-last-of-type': function(nodes, formula, root) {
      return Selector.pseudos.nth(nodes, formula, root, true, true);
    },
    'first-of-type':    function(nodes, formula, root) {
      return Selector.pseudos.nth(nodes, "1", root, false, true);
    },
    'last-of-type':     function(nodes, formula, root) {
      return Selector.pseudos.nth(nodes, "1", root, true, true);
    },
    'only-of-type':     function(nodes, formula, root) {
      var p = Selector.pseudos;
      return p['last-of-type'](p['first-of-type'](nodes, formula, root), formula, root);
    },

    // handles the an+b logic
    getIndices: function(a, b, total) {
      if (a == 0) return b > 0 ? [b] : [];
      return $R(1, total).inject([], function(memo, i) {
        if (0 == (i - b) % a && (i - b) / a >= 0) memo.push(i);
        return memo;
      });
    },

    // handles nth(-last)-child, nth(-last)-of-type, and (first|last)-of-type
    nth: function(nodes, formula, root, reverse, ofType) {
      if (nodes.length == 0) return [];
      if (formula == 'even') formula = '2n+0';
      if (formula == 'odd')  formula = '2n+1';
      var h = Selector.handlers, results = [], indexed = [], m;
      h.mark(nodes);
      for (var i = 0, node; node = nodes[i]; i++) {
        if (!node.parentNode._countedByPrototype) {
          h.index(node.parentNode, reverse, ofType);
          indexed.push(node.parentNode);
        }
      }
      if (formula.match(/^\d+$/)) { // just a number
        formula = Number(formula);
        for (var i = 0, node; node = nodes[i]; i++)
          if (node.nodeIndex == formula) results.push(node);
      } else if (m = formula.match(/^(-?\d*)?n(([+-])(\d+))?/)) { // an+b
        if (m[1] == "-") m[1] = -1;
        var a = m[1] ? Number(m[1]) : 1;
        var b = m[2] ? Number(m[2]) : 0;
        var indices = Selector.pseudos.getIndices(a, b, nodes.length);
        for (var i = 0, node, l = indices.length; node = nodes[i]; i++) {
          for (var j = 0; j < l; j++)
            if (node.nodeIndex == indices[j]) results.push(node);
        }
      }
      h.unmark(nodes);
      h.unmark(indexed);
      return results;
    },

    'empty': function(nodes, value, root) {
      for (var i = 0, results = [], node; node = nodes[i]; i++) {
        // IE treats comments as element nodes
        if (node.tagName == '!' || (node.firstChild && !node.innerHTML.match(/^\s*$/))) continue;
        results.push(node);
      }
      return results;
    },

    'not': function(nodes, selector, root) {
      var h = Selector.handlers, selectorType, m;
      var exclusions = new Selector(selector).findElements(root);
      h.mark(exclusions);
      for (var i = 0, results = [], node; node = nodes[i]; i++)
        if (!node._countedByPrototype) results.push(node);
      h.unmark(exclusions);
      return results;
    },

    'enabled': function(nodes, value, root) {
      for (var i = 0, results = [], node; node = nodes[i]; i++)
        if (!node.disabled) results.push(node);
      return results;
    },

    'disabled': function(nodes, value, root) {
      for (var i = 0, results = [], node; node = nodes[i]; i++)
        if (node.disabled) results.push(node);
      return results;
    },

    'checked': function(nodes, value, root) {
      for (var i = 0, results = [], node; node = nodes[i]; i++)
        if (node.checked) results.push(node);
      return results;
    }
  },

  operators: {
    '=':  function(nv, v) { return nv == v; },
    '!=': function(nv, v) { return nv != v; },
    '^=': function(nv, v) { return nv.startsWith(v); },
    '$=': function(nv, v) { return nv.endsWith(v); },
    '*=': function(nv, v) { return nv.include(v); },
    '~=': function(nv, v) { return (' ' + nv + ' ').include(' ' + v + ' '); },
    '|=': function(nv, v) { return ('-' + nv.toUpperCase() + '-').include('-' + v.toUpperCase() + '-'); }
  },

  split: function(expression) {
    var expressions = [];
    expression.scan(/(([\w#:.~>+()\s-]+|\*|\[.*?\])+)\s*(,|$)/, function(m) {
      expressions.push(m[1].strip());
    });
    return expressions;
  },

  matchElements: function(elements, expression) {
    var matches = $$(expression), h = Selector.handlers;
    h.mark(matches);
    for (var i = 0, results = [], element; element = elements[i]; i++)
      if (element._countedByPrototype) results.push(element);
    h.unmark(matches);
    return results;
  },

  findElement: function(elements, expression, index) {
    if (Object.isNumber(expression)) {
      index = expression; expression = false;
    }
    return Selector.matchElements(elements, expression || '*')[index || 0];
  },

  findChildElements: function(element, expressions) {
    expressions = Selector.split(expressions.join(','));
    var results = [], h = Selector.handlers;
    for (var i = 0, l = expressions.length, selector; i < l; i++) {
      selector = new Selector(expressions[i].strip());
      h.concat(results, selector.findElements(element));
    }
    return (l > 1) ? h.unique(results) : results;
  }
});

if (Prototype.Browser.IE) {
  Object.extend(Selector.handlers, {
    // IE returns comment nodes on getElementsByTagName("*").
    // Filter them out.
    concat: function(a, b) {
      for (var i = 0, node; node = b[i]; i++)
        if (node.tagName !== "!") a.push(node);
      return a;
    },

    // IE improperly serializes _countedByPrototype in (inner|outer)HTML.
    unmark: function(nodes) {
      for (var i = 0, node; node = nodes[i]; i++)
        node.removeAttribute('_countedByPrototype');
      return nodes;
    }
  });
}

function $$() {
  return Selector.findChildElements(document, $A(arguments));
}
var Form = {
  reset: function(form) {
    $(form).reset();
    return form;
  },

  serializeElements: function(elements, options) {
    if (typeof options != 'object') options = { hash: !!options };
    else if (Object.isUndefined(options.hash)) options.hash = true;
    var key, value, submitted = false, submit = options.submit;

    var data = elements.inject({ }, function(result, element) {
      if (!element.disabled && element.name) {
        key = element.name; value = $(element).getValue();
        if (value != null && (element.type != 'submit' || (!submitted &&
            submit !== false && (!submit || key == submit) && (submitted = true)))) {
          if (key in result) {
            // a key is already present; construct an array of values
            if (!Object.isArray(result[key])) result[key] = [result[key]];
            result[key].push(value);
          }
          else result[key] = value;
        }
      }
      return result;
    });

    return options.hash ? data : Object.toQueryString(data);
  }
};

Form.Methods = {
  serialize: function(form, options) {
    return Form.serializeElements(Form.getElements(form), options);
  },

  getElements: function(form) {
    return $A($(form).getElementsByTagName('*')).inject([],
      function(elements, child) {
        if (Form.Element.Serializers[child.tagName.toLowerCase()])
          elements.push(Element.extend(child));
        return elements;
      }
    );
  },

  getInputs: function(form, typeName, name) {
    form = $(form);
    var inputs = form.getElementsByTagName('input');

    if (!typeName && !name) return $A(inputs).map(Element.extend);

    for (var i = 0, matchingInputs = [], length = inputs.length; i < length; i++) {
      var input = inputs[i];
      if ((typeName && input.type != typeName) || (name && input.name != name))
        continue;
      matchingInputs.push(Element.extend(input));
    }

    return matchingInputs;
  },

  disable: function(form) {
    form = $(form);
    Form.getElements(form).invoke('disable');
    return form;
  },

  enable: function(form) {
    form = $(form);
    Form.getElements(form).invoke('enable');
    return form;
  },

  findFirstElement: function(form) {
    var elements = $(form).getElements().findAll(function(element) {
      return 'hidden' != element.type && !element.disabled;
    });
    var firstByIndex = elements.findAll(function(element) {
      return element.hasAttribute('tabIndex') && element.tabIndex >= 0;
    }).sortBy(function(element) { return element.tabIndex }).first();

    return firstByIndex ? firstByIndex : elements.find(function(element) {
      return ['input', 'select', 'textarea'].include(element.tagName.toLowerCase());
    });
  },

  focusFirstElement: function(form) {
    form = $(form);
    form.findFirstElement().activate();
    return form;
  },

  request: function(form, options) {
    form = $(form), options = Object.clone(options || { });

    var params = options.parameters, action = form.readAttribute('action') || '';
    if (action.blank()) action = window.location.href;
    options.parameters = form.serialize(true);

    if (params) {
      if (Object.isString(params)) params = params.toQueryParams();
      Object.extend(options.parameters, params);
    }

    if (form.hasAttribute('method') && !options.method)
      options.method = form.method;

    return new Ajax.Request(action, options);
  }
};

/*--------------------------------------------------------------------------*/

Form.Element = {
  focus: function(element) {
    $(element).focus();
    return element;
  },

  select: function(element) {
    $(element).select();
    return element;
  }
};

Form.Element.Methods = {
  serialize: function(element) {
    element = $(element);
    if (!element.disabled && element.name) {
      var value = element.getValue();
      if (value != undefined) {
        var pair = { };
        pair[element.name] = value;
        return Object.toQueryString(pair);
      }
    }
    return '';
  },

  getValue: function(element) {
    element = $(element);
    var method = element.tagName.toLowerCase();
    return Form.Element.Serializers[method](element);
  },

  setValue: function(element, value) {
    element = $(element);
    var method = element.tagName.toLowerCase();
    Form.Element.Serializers[method](element, value);
    return element;
  },

  clear: function(element) {
    $(element).value = '';
    return element;
  },

  present: function(element) {
    return $(element).value != '';
  },

  activate: function(element) {
    element = $(element);
    try {
      element.focus();
      if (element.select && (element.tagName.toLowerCase() != 'input' ||
          !['button', 'reset', 'submit'].include(element.type)))
        element.select();
    } catch (e) { }
    return element;
  },

  disable: function(element) {
    element = $(element);
    element.blur();
    element.disabled = true;
    return element;
  },

  enable: function(element) {
    element = $(element);
    element.disabled = false;
    return element;
  }
};

/*--------------------------------------------------------------------------*/

var Field = Form.Element;
var $F = Form.Element.Methods.getValue;

/*--------------------------------------------------------------------------*/

Form.Element.Serializers = {
  input: function(element, value) {
    switch (element.type.toLowerCase()) {
      case 'checkbox':
      case 'radio':
        return Form.Element.Serializers.inputSelector(element, value);
      default:
        return Form.Element.Serializers.textarea(element, value);
    }
  },

  inputSelector: function(element, value) {
    if (Object.isUndefined(value)) return element.checked ? element.value : null;
    else element.checked = !!value;
  },

  textarea: function(element, value) {
    if (Object.isUndefined(value)) return element.value;
    else element.value = value;
  },

  select: function(element, index) {
    if (Object.isUndefined(index))
      return this[element.type == 'select-one' ?
        'selectOne' : 'selectMany'](element);
    else {
      var opt, value, single = !Object.isArray(index);
      for (var i = 0, length = element.length; i < length; i++) {
        opt = element.options[i];
        value = this.optionValue(opt);
        if (single) {
          if (value == index) {
            opt.selected = true;
            return;
          }
        }
        else opt.selected = index.include(value);
      }
    }
  },

  selectOne: function(element) {
    var index = element.selectedIndex;
    return index >= 0 ? this.optionValue(element.options[index]) : null;
  },

  selectMany: function(element) {
    var values, length = element.length;
    if (!length) return null;

    for (var i = 0, values = []; i < length; i++) {
      var opt = element.options[i];
      if (opt.selected) values.push(this.optionValue(opt));
    }
    return values;
  },

  optionValue: function(opt) {
    // extend element because hasAttribute may not be native
    return Element.extend(opt).hasAttribute('value') ? opt.value : opt.text;
  }
};

/*--------------------------------------------------------------------------*/

Abstract.TimedObserver = Class.create(PeriodicalExecuter, {
  initialize: function($super, element, frequency, callback) {
    $super(callback, frequency);
    this.element   = $(element);
    this.lastValue = this.getValue();
  },

  execute: function() {
    var value = this.getValue();
    if (Object.isString(this.lastValue) && Object.isString(value) ?
        this.lastValue != value : String(this.lastValue) != String(value)) {
      this.callback(this.element, value);
      this.lastValue = value;
    }
  }
});

Form.Element.Observer = Class.create(Abstract.TimedObserver, {
  getValue: function() {
    return Form.Element.getValue(this.element);
  }
});

Form.Observer = Class.create(Abstract.TimedObserver, {
  getValue: function() {
    return Form.serialize(this.element);
  }
});

/*--------------------------------------------------------------------------*/

Abstract.EventObserver = Class.create({
  initialize: function(element, callback) {
    this.element  = $(element);
    this.callback = callback;

    this.lastValue = this.getValue();
    if (this.element.tagName.toLowerCase() == 'form')
      this.registerFormCallbacks();
    else
      this.registerCallback(this.element);
  },

  onElementEvent: function() {
    var value = this.getValue();
    if (this.lastValue != value) {
      this.callback(this.element, value);
      this.lastValue = value;
    }
  },

  registerFormCallbacks: function() {
    Form.getElements(this.element).each(this.registerCallback, this);
  },

  registerCallback: function(element) {
    if (element.type) {
      switch (element.type.toLowerCase()) {
        case 'checkbox':
        case 'radio':
          Event.observe(element, 'click', this.onElementEvent.bind(this));
          break;
        default:
          Event.observe(element, 'change', this.onElementEvent.bind(this));
          break;
      }
    }
  }
});

Form.Element.EventObserver = Class.create(Abstract.EventObserver, {
  getValue: function() {
    return Form.Element.getValue(this.element);
  }
});

Form.EventObserver = Class.create(Abstract.EventObserver, {
  getValue: function() {
    return Form.serialize(this.element);
  }
});
if (!window.Event) var Event = { };

Object.extend(Event, {
  KEY_BACKSPACE: 8,
  KEY_TAB:       9,
  KEY_RETURN:   13,
  KEY_ESC:      27,
  KEY_LEFT:     37,
  KEY_UP:       38,
  KEY_RIGHT:    39,
  KEY_DOWN:     40,
  KEY_DELETE:   46,
  KEY_HOME:     36,
  KEY_END:      35,
  KEY_PAGEUP:   33,
  KEY_PAGEDOWN: 34,
  KEY_INSERT:   45,

  cache: { },

  relatedTarget: function(event) {
    var element;
    switch(event.type) {
      case 'mouseover': element = event.fromElement; break;
      case 'mouseout':  element = event.toElement;   break;
      default: return null;
    }
    return Element.extend(element);
  }
});

Event.Methods = (function() {
  var isButton;

  if (Prototype.Browser.IE) {
    var buttonMap = { 0: 1, 1: 4, 2: 2 };
    isButton = function(event, code) {
      return event.button == buttonMap[code];
    };

  } else if (Prototype.Browser.WebKit) {
    isButton = function(event, code) {
      switch (code) {
        case 0: return event.which == 1 && !event.metaKey;
        case 1: return event.which == 1 && event.metaKey;
        default: return false;
      }
    };

  } else {
    isButton = function(event, code) {
      return event.which ? (event.which === code + 1) : (event.button === code);
    };
  }

  return {
    isLeftClick:   function(event) { return isButton(event, 0) },
    isMiddleClick: function(event) { return isButton(event, 1) },
    isRightClick:  function(event) { return isButton(event, 2) },

    element: function(event) {
      var node = Event.extend(event).target;
      return Element.extend(node.nodeType == Node.TEXT_NODE ? node.parentNode : node);
    },

    findElement: function(event, expression) {
      var element = Event.element(event);
      if (!expression) return element;
      var elements = [element].concat(element.ancestors());
      return Selector.findElement(elements, expression, 0);
    },

    pointer: function(event) {
      return {
        x: event.pageX || (event.clientX +
          (document.documentElement.scrollLeft || document.body.scrollLeft)),
        y: event.pageY || (event.clientY +
          (document.documentElement.scrollTop || document.body.scrollTop))
      };
    },

    pointerX: function(event) { return Event.pointer(event).x },
    pointerY: function(event) { return Event.pointer(event).y },

    stop: function(event) {
      Event.extend(event);
      event.preventDefault();
      event.stopPropagation();
      event.stopped = true;
    }
  };
})();

Event.extend = (function() {
  var methods = Object.keys(Event.Methods).inject({ }, function(m, name) {
    m[name] = Event.Methods[name].methodize();
    return m;
  });

  if (Prototype.Browser.IE) {
    Object.extend(methods, {
      stopPropagation: function() { this.cancelBubble = true },
      preventDefault:  function() { this.returnValue = false },
      inspect: function() { return "[object Event]" }
    });

    return function(event) {
      if (!event) return false;
      if (event._extendedByPrototype) return event;

      event._extendedByPrototype = Prototype.emptyFunction;
      var pointer = Event.pointer(event);
      Object.extend(event, {
        target: event.srcElement,
        relatedTarget: Event.relatedTarget(event),
        pageX:  pointer.x,
        pageY:  pointer.y
      });
      return Object.extend(event, methods);
    };

  } else {
    Event.prototype = Event.prototype || document.createEvent("HTMLEvents").__proto__;
    Object.extend(Event.prototype, methods);
    return Prototype.K;
  }
})();

Object.extend(Event, (function() {
  var cache = Event.cache;

  function getEventID(element) {
    if (element._prototypeEventID) return element._prototypeEventID[0];
    arguments.callee.id = arguments.callee.id || 1;
    return element._prototypeEventID = [++arguments.callee.id];
  }

  function getDOMEventName(eventName) {
    if (eventName && eventName.include(':')) return "dataavailable";
    return eventName;
  }

  function getCacheForID(id) {
    return cache[id] = cache[id] || { };
  }

  function getWrappersForEventName(id, eventName) {
    var c = getCacheForID(id);
    return c[eventName] = c[eventName] || [];
  }

  function createWrapper(element, eventName, handler) {
    var id = getEventID(element);
    var c = getWrappersForEventName(id, eventName);
    if (c.pluck("handler").include(handler)) return false;

    var wrapper = function(event) {
      if (!Event || !Event.extend ||
        (event.eventName && event.eventName != eventName))
          return false;

      Event.extend(event);
      handler.call(element, event);
    };

    wrapper.handler = handler;
    c.push(wrapper);
    return wrapper;
  }

  function findWrapper(id, eventName, handler) {
    var c = getWrappersForEventName(id, eventName);
    return c.find(function(wrapper) { return wrapper.handler == handler });
  }

  function destroyWrapper(id, eventName, handler) {
    var c = getCacheForID(id);
    if (!c[eventName]) return false;
    c[eventName] = c[eventName].without(findWrapper(id, eventName, handler));
  }

  function destroyCache() {
    for (var id in cache)
      for (var eventName in cache[id])
        cache[id][eventName] = null;
  }

  if (window.attachEvent) {
    window.attachEvent("onunload", destroyCache);
  }

  return {
    observe: function(element, eventName, handler) {
      element = $(element);
      var name = getDOMEventName(eventName);

      var wrapper = createWrapper(element, eventName, handler);
      if (!wrapper) return element;

      if (element.addEventListener) {
        element.addEventListener(name, wrapper, false);
      } else {
        element.attachEvent("on" + name, wrapper);
      }

      return element;
    },

    stopObserving: function(element, eventName, handler) {
      element = $(element);
      var id = getEventID(element), name = getDOMEventName(eventName);

      if (!handler && eventName) {
        getWrappersForEventName(id, eventName).each(function(wrapper) {
          element.stopObserving(eventName, wrapper.handler);
        });
        return element;

      } else if (!eventName) {
        Object.keys(getCacheForID(id)).each(function(eventName) {
          element.stopObserving(eventName);
        });
        return element;
      }

      var wrapper = findWrapper(id, eventName, handler);
      if (!wrapper) return element;

      if (element.removeEventListener) {
        element.removeEventListener(name, wrapper, false);
      } else {
        element.detachEvent("on" + name, wrapper);
      }

      destroyWrapper(id, eventName, handler);

      return element;
    },

    fire: function(element, eventName, memo) {
      element = $(element);
      if (element == document && document.createEvent && !element.dispatchEvent)
        element = document.documentElement;

      var event;
      if (document.createEvent) {
        event = document.createEvent("HTMLEvents");
        event.initEvent("dataavailable", true, true);
      } else {
        event = document.createEventObject();
        event.eventType = "ondataavailable";
      }

      event.eventName = eventName;
      event.memo = memo || { };

      if (document.createEvent) {
        element.dispatchEvent(event);
      } else {
        element.fireEvent(event.eventType, event);
      }

      return Event.extend(event);
    }
  };
})());

Object.extend(Event, Event.Methods);

Element.addMethods({
  fire:          Event.fire,
  observe:       Event.observe,
  stopObserving: Event.stopObserving
});

Object.extend(document, {
  fire:          Element.Methods.fire.methodize(),
  observe:       Element.Methods.observe.methodize(),
  stopObserving: Element.Methods.stopObserving.methodize(),
  loaded:        false
});

(function() {
  /* Support for the DOMContentLoaded event is based on work by Dan Webb,
     Matthias Miller, Dean Edwards and John Resig. */

  var timer;

  function fireContentLoadedEvent() {
    if (document.loaded) return;
    if (timer) window.clearInterval(timer);
    document.fire("dom:loaded");
    document.loaded = true;
  }

  if (document.addEventListener) {
    if (Prototype.Browser.WebKit) {
      timer = window.setInterval(function() {
        if (/loaded|complete/.test(document.readyState))
          fireContentLoadedEvent();
      }, 0);

      Event.observe(window, "load", fireContentLoadedEvent);

    } else {
      document.addEventListener("DOMContentLoaded",
        fireContentLoadedEvent, false);
    }

  } else {
    document.write("<script id=__onDOMContentLoaded defer src=//:><\/script>");
    $("__onDOMContentLoaded").onreadystatechange = function() {
      if (this.readyState == "complete") {
        this.onreadystatechange = null;
        fireContentLoadedEvent();
      }
    };
  }
})();
/*------------------------------- DEPRECATED -------------------------------*/

Hash.toQueryString = Object.toQueryString;

var Toggle = { display: Element.toggle };

Element.Methods.childOf = Element.Methods.descendantOf;

var Insertion = {
  Before: function(element, content) {
    return Element.insert(element, {before:content});
  },

  Top: function(element, content) {
    return Element.insert(element, {top:content});
  },

  Bottom: function(element, content) {
    return Element.insert(element, {bottom:content});
  },

  After: function(element, content) {
    return Element.insert(element, {after:content});
  }
};

var $continue = new Error('"throw $continue" is deprecated, use "return" instead');

// This should be moved to script.aculo.us; notice the deprecated methods
// further below, that map to the newer Element methods.
var Position = {
  // set to true if needed, warning: firefox performance problems
  // NOT neeeded for page scrolling, only if draggable contained in
  // scrollable elements
  includeScrollOffsets: false,

  // must be called before calling withinIncludingScrolloffset, every time the
  // page is scrolled
  prepare: function() {
    this.deltaX =  window.pageXOffset
                || document.documentElement.scrollLeft
                || document.body.scrollLeft
                || 0;
    this.deltaY =  window.pageYOffset
                || document.documentElement.scrollTop
                || document.body.scrollTop
                || 0;
  },

  // caches x/y coordinate pair to use with overlap
  within: function(element, x, y) {
    if (this.includeScrollOffsets)
      return this.withinIncludingScrolloffsets(element, x, y);
    this.xcomp = x;
    this.ycomp = y;
    this.offset = Element.cumulativeOffset(element);

    return (y >= this.offset[1] &&
            y <  this.offset[1] + element.offsetHeight &&
            x >= this.offset[0] &&
            x <  this.offset[0] + element.offsetWidth);
  },

  withinIncludingScrolloffsets: function(element, x, y) {
    var offsetcache = Element.cumulativeScrollOffset(element);

    this.xcomp = x + offsetcache[0] - this.deltaX;
    this.ycomp = y + offsetcache[1] - this.deltaY;
    this.offset = Element.cumulativeOffset(element);

    return (this.ycomp >= this.offset[1] &&
            this.ycomp <  this.offset[1] + element.offsetHeight &&
            this.xcomp >= this.offset[0] &&
            this.xcomp <  this.offset[0] + element.offsetWidth);
  },

  // within must be called directly before
  overlap: function(mode, element) {
    if (!mode) return 0;
    if (mode == 'vertical')
      return ((this.offset[1] + element.offsetHeight) - this.ycomp) /
        element.offsetHeight;
    if (mode == 'horizontal')
      return ((this.offset[0] + element.offsetWidth) - this.xcomp) /
        element.offsetWidth;
  },

  // Deprecation layer -- use newer Element methods now (1.5.2).

  cumulativeOffset: Element.Methods.cumulativeOffset,

  positionedOffset: Element.Methods.positionedOffset,

  absolutize: function(element) {
    Position.prepare();
    return Element.absolutize(element);
  },

  relativize: function(element) {
    Position.prepare();
    return Element.relativize(element);
  },

  realOffset: Element.Methods.cumulativeScrollOffset,

  offsetParent: Element.Methods.getOffsetParent,

  page: Element.Methods.viewportOffset,

  clone: function(source, target, options) {
    options = options || { };
    return Element.clonePosition(target, source, options);
  }
};

/*--------------------------------------------------------------------------*/

if (!document.getElementsByClassName) document.getElementsByClassName = function(instanceMethods){
  function iter(name) {
    return name.blank() ? null : "[contains(concat(' ', @class, ' '), ' " + name + " ')]";
  }

  instanceMethods.getElementsByClassName = Prototype.BrowserFeatures.XPath ?
  function(element, className) {
    className = className.toString().strip();
    var cond = /\s/.test(className) ? $w(className).map(iter).join('') : iter(className);
    return cond ? document._getElementsByXPath('.//*' + cond, element) : [];
  } : function(element, className) {
    className = className.toString().strip();
    var elements = [], classNames = (/\s/.test(className) ? $w(className) : null);
    if (!classNames && !className) return elements;

    var nodes = $(element).getElementsByTagName('*');
    className = ' ' + className + ' ';

    for (var i = 0, child, cn; child = nodes[i]; i++) {
      if (child.className && (cn = ' ' + child.className + ' ') && (cn.include(className) ||
          (classNames && classNames.all(function(name) {
            return !name.toString().blank() && cn.include(' ' + name + ' ');
          }))))
        elements.push(Element.extend(child));
    }
    return elements;
  };

  return function(className, parentElement) {
    return $(parentElement || document.body).getElementsByClassName(className);
  };
}(Element.Methods);

/*--------------------------------------------------------------------------*/

Element.ClassNames = Class.create();
Element.ClassNames.prototype = {
  initialize: function(element) {
    this.element = $(element);
  },

  _each: function(iterator) {
    this.element.className.split(/\s+/).select(function(name) {
      return name.length > 0;
    })._each(iterator);
  },

  set: function(className) {
    this.element.className = className;
  },

  add: function(classNameToAdd) {
    if (this.include(classNameToAdd)) return;
    this.set($A(this).concat(classNameToAdd).join(' '));
  },

  remove: function(classNameToRemove) {
    if (!this.include(classNameToRemove)) return;
    this.set($A(this).without(classNameToRemove).join(' '));
  },

  toString: function() {
    return $A(this).join(' ');
  }
};

Object.extend(Element.ClassNames.prototype, Enumerable);

/*--------------------------------------------------------------------------*/

Element.addMethods();
// script.aculo.us builder.js v1.8.1, Thu Jan 03 22:07:12 -0500 2008

// Copyright (c) 2005-2007 Thomas Fuchs (http://script.aculo.us, http://mir.aculo.us)
//
// script.aculo.us is freely distributable under the terms of an MIT-style license.
// For details, see the script.aculo.us web site: http://script.aculo.us/

var Builder = {
  NODEMAP: {
    AREA: 'map',
    CAPTION: 'table',
    COL: 'table',
    COLGROUP: 'table',
    LEGEND: 'fieldset',
    OPTGROUP: 'select',
    OPTION: 'select',
    PARAM: 'object',
    TBODY: 'table',
    TD: 'table',
    TFOOT: 'table',
    TH: 'table',
    THEAD: 'table',
    TR: 'table'
  },
  // note: For Firefox < 1.5, OPTION and OPTGROUP tags are currently broken,
  //       due to a Firefox bug
  node: function(elementName) {
    elementName = elementName.toUpperCase();
    
    // try innerHTML approach
    var parentTag = this.NODEMAP[elementName] || 'div';
    var parentElement = document.createElement(parentTag);
    try { // prevent IE "feature": http://dev.rubyonrails.org/ticket/2707
      parentElement.innerHTML = "<" + elementName + "></" + elementName + ">";
    } catch(e) {}
    var element = parentElement.firstChild || null;
      
    // see if browser added wrapping tags
    if(element && (element.tagName.toUpperCase() != elementName))
      element = element.getElementsByTagName(elementName)[0];
    
    // fallback to createElement approach
    if(!element) element = document.createElement(elementName);
    
    // abort if nothing could be created
    if(!element) return;

    // attributes (or text)
    if(arguments[1])
      if(this._isStringOrNumber(arguments[1]) ||
        (arguments[1] instanceof Array) ||
        arguments[1].tagName) {
          this._children(element, arguments[1]);
        } else {
          var attrs = this._attributes(arguments[1]);
          if(attrs.length) {
            try { // prevent IE "feature": http://dev.rubyonrails.org/ticket/2707
              parentElement.innerHTML = "<" +elementName + " " +
                attrs + "></" + elementName + ">";
            } catch(e) {}
            element = parentElement.firstChild || null;
            // workaround firefox 1.0.X bug
            if(!element) {
              element = document.createElement(elementName);
              for(attr in arguments[1]) 
                element[attr == 'class' ? 'className' : attr] = arguments[1][attr];
            }
            if(element.tagName.toUpperCase() != elementName)
              element = parentElement.getElementsByTagName(elementName)[0];
          }
        } 

    // text, or array of children
    if(arguments[2])
      this._children(element, arguments[2]);

     return element;
  },
  _text: function(text) {
     return document.createTextNode(text);
  },

  ATTR_MAP: {
    'className': 'class',
    'htmlFor': 'for'
  },

  _attributes: function(attributes) {
    var attrs = [];
    for(attribute in attributes)
      attrs.push((attribute in this.ATTR_MAP ? this.ATTR_MAP[attribute] : attribute) +
          '="' + attributes[attribute].toString().escapeHTML().gsub(/"/,'&quot;') + '"');
    return attrs.join(" ");
  },
  _children: function(element, children) {
    if(children.tagName) {
      element.appendChild(children);
      return;
    }
    if(typeof children=='object') { // array can hold nodes and text
      children.flatten().each( function(e) {
        if(typeof e=='object')
          element.appendChild(e)
        else
          if(Builder._isStringOrNumber(e))
            element.appendChild(Builder._text(e));
      });
    } else
      if(Builder._isStringOrNumber(children))
        element.appendChild(Builder._text(children));
  },
  _isStringOrNumber: function(param) {
    return(typeof param=='string' || typeof param=='number');
  },
  build: function(html) {
    var element = this.node('div');
    $(element).update(html.strip());
    return element.down();
  },
  dump: function(scope) { 
    if(typeof scope != 'object' && typeof scope != 'function') scope = window; //global scope 
  
    var tags = ("A ABBR ACRONYM ADDRESS APPLET AREA B BASE BASEFONT BDO BIG BLOCKQUOTE BODY " +
      "BR BUTTON CAPTION CENTER CITE CODE COL COLGROUP DD DEL DFN DIR DIV DL DT EM FIELDSET " +
      "FONT FORM FRAME FRAMESET H1 H2 H3 H4 H5 H6 HEAD HR HTML I IFRAME IMG INPUT INS ISINDEX "+
      "KBD LABEL LEGEND LI LINK MAP MENU META NOFRAMES NOSCRIPT OBJECT OL OPTGROUP OPTION P "+
      "PARAM PRE Q S SAMP SCRIPT SELECT SMALL SPAN STRIKE STRONG STYLE SUB SUP TABLE TBODY TD "+
      "TEXTAREA TFOOT TH THEAD TITLE TR TT U UL VAR").split(/\s+/);
  
    tags.each( function(tag){ 
      scope[tag] = function() { 
        return Builder.node.apply(Builder, [tag].concat($A(arguments)));  
      } 
    });
  }
}

/**

 * Prado base namespace

 * @namespace Prado

 */

var Prado =

{

	/**

	 * Version of Prado clientscripts

	 * @var Version

	 */

	Version: '3.1',



	/**

	 * Returns browser information. 

	 * <pre>

	 * var browser = Prado.Browser();

	 * alert(browser.ie); //should ouput true if IE, false otherwise

	 * </pre>

	 * @function {object} ?

	 * @version 1.0

	 * @returns browserinfo

	 * @... {string} agent - Reported user agent

	 * @... {string} ver - Reported agent version

	 * @... {0|1} dom - 1 for DOM browsers 

	 * @... {0|1} ns4 - 1 for Netscape 4

	 * @... {0|1} ns6 - 1 for Netscape 6 and Firefox

	 * @... {boolean} ie3 - true for IE 3

	 * @... {0|1} ie5 - 1 for IE 5

	 * @... {0|1} ie6 - 1 for IE 6

	 * @... {0|1} ie4 - 1 for IE 4

	 * @... {0|1} ie - 1 for IE 4-6

	 * @... {0|1} hotjava - 1 for HotJava

	 * @... {0|1} ver3 - 1 for IE3 and HotJava

	 * @... {0|1} opera - 1 for Opera

	 * @... {boolean} opera7 - true for Opera 7

	 * @... {0|1} operaOld - 1 for older Opera    

	 * @... {0|1} bw - 1 for IE 4-6, Netscape 4&6, Firefox and Opera

	 * @... {boolean} mac - true for mac systems 

	 * @... {static} Version - Version of returned structure (1.0)

	 */

	Browser : function()

	{

		var info = { Version : "1.0" };

		var is_major = parseInt( navigator.appVersion );

		info.nver = is_major;

		info.ver = navigator.appVersion;

		info.agent = navigator.userAgent;

		info.dom = document.getElementById ? 1 : 0;

		info.opera = window.opera ? 1 : 0;

		info.ie5 = ( info.ver.indexOf( "MSIE 5" ) > -1 && info.dom && !info.opera ) ? 1 : 0;

		info.ie6 = ( info.ver.indexOf( "MSIE 6" ) > -1 && info.dom && !info.opera ) ? 1 : 0;

		info.ie4 = ( document.all && !info.dom && !info.opera ) ? 1 : 0;

		info.ie = info.ie4 || info.ie5 || info.ie6;

		info.mac = info.agent.indexOf( "Mac" ) > -1;

		info.ns6 = ( info.dom && parseInt( info.ver ) >= 5 ) ? 1 : 0;

		info.ie3 = ( info.ver.indexOf( "MSIE" ) && ( is_major < 4 ) );

		info.hotjava = ( info.agent.toLowerCase().indexOf( 'hotjava' ) != -1 ) ? 1 : 0;

		info.ns4 = ( document.layers && !info.dom && !info.hotjava ) ? 1 : 0;

		info.bw = ( info.ie6 || info.ie5 || info.ie4 || info.ns4 || info.ns6 || info.opera );

		info.ver3 = ( info.hotjava || info.ie3 );

		info.opera7 = ( ( info.agent.toLowerCase().indexOf( 'opera 7' ) > -1 ) || ( info.agent.toLowerCase().indexOf( 'opera/7' ) > -1 ) );

		info.operaOld = info.opera && !info.opera7;

		return info;

	},



	/**

	 * Import CSS from Url.

	 * @function ?

	 * @param doc - document DOM object

	 * @param css_file - Url to CSS file

	 */

	ImportCss : function(doc, css_file)

	{

		if (Prado.Browser().ie)

			var styleSheet = doc.createStyleSheet(css_file);

		else

		{

			var elm = doc.createElement("link");



			elm.rel = "stylesheet";

			elm.href = css_file;



			if (headArr = doc.getElementsByTagName("head"))

				headArr[0].appendChild(elm);

		}

	}

};


/**

 * Utilities and extions to Prototype/Scriptaculous

 * @file scriptaculous-adapter.js

 */

 

/**

 * Extension to 

 * <a href="http://www.prototypejs.org/api/function" target="_blank">Prototype's Function</a>

 * @namespace Function

 */

/**

 * Similar to bindAsEventLister, but takes additional arguments.

 * @function Function.bindEvent

 */

Function.prototype.bindEvent = function()

{

	var __method = this, args = $A(arguments), object = args.shift();

	return function(event)

	{

		return __method.apply(object, [event || window.event].concat(args));

	}

};



/**

 * Extension to 

 * <a href="http://www.prototypejs.org/api/class" target="_blank">Prototype's Class</a>

 * @namespace Class

 */

 

/**

 * Creates a new class by copying class definition from

 * the <tt>base</tt> and optional <tt>definition</tt>.

 * @function {Class} Class.extend

 * @param {function} base - Base class to copy from.

 * @param {optional Array} - Additional definition 

 * @returns Constructor for the extended class

 */

Class.extend = function(base, definition)

{

		var component = Class.create();

		Object.extend(component.prototype, base.prototype);

		if(definition)

			Object.extend(component.prototype, definition);

		return component;

};



/**

 * Base, version 1.0.2

 * Copyright 2006, Dean Edwards

 * License: http://creativecommons.org/licenses/LGPL/2.1/

 * @class Base

 */

var Base = function() {

	if (arguments.length) {

		if (this == window) { // cast an object to this class

			Base.prototype.extend.call(arguments[0], arguments.callee.prototype);

		} else {

			this.extend(arguments[0]);

		}

	}

};



Base.version = "1.0.2";



Base.prototype = {

	extend: function(source, value) {

		var extend = Base.prototype.extend;

		if (arguments.length == 2) {

			var ancestor = this[source];

			// overriding?

			if ((ancestor instanceof Function) && (value instanceof Function) &&

				ancestor.valueOf() != value.valueOf() && /\bbase\b/.test(value)) {

				var method = value;

			//	var _prototype = this.constructor.prototype;

			//	var fromPrototype = !Base._prototyping && _prototype[source] == ancestor;

				value = function() {

					var previous = this.base;

				//	this.base = fromPrototype ? _prototype[source] : ancestor;

					this.base = ancestor;

					var returnValue = method.apply(this, arguments);

					this.base = previous;

					return returnValue;

				};

				// point to the underlying method

				value.valueOf = function() {

					return method;

				};

				value.toString = function() {

					return String(method);

				};

			}

			return this[source] = value;

		} else if (source) {

			var _prototype = {toSource: null};

			// do the "toString" and other methods manually

			var _protected = ["toString", "valueOf"];

			// if we are prototyping then include the constructor

			if (Base._prototyping) _protected[2] = "constructor";

			for (var i = 0; (name = _protected[i]); i++) {

				if (source[name] != _prototype[name]) {

					extend.call(this, name, source[name]);

				}

			}

			// copy each of the source object's properties to this object

			for (var name in source) {

				if (!_prototype[name]) {

					extend.call(this, name, source[name]);

				}

			}

		}

		return this;

	},



	base: function() {

		// call this method from any other method to invoke that method's ancestor

	}

};



Base.extend = function(_instance, _static) {

	var extend = Base.prototype.extend;

	if (!_instance) _instance = {};

	// build the prototype

	Base._prototyping = true;

	var _prototype = new this;

	extend.call(_prototype, _instance);

	var constructor = _prototype.constructor;

	_prototype.constructor = this;

	delete Base._prototyping;

	// create the wrapper for the constructor function

	var klass = function() {

		if (!Base._prototyping) constructor.apply(this, arguments);

		this.constructor = klass;

	};

	klass.prototype = _prototype;

	// build the class interface

	klass.extend = this.extend;

	klass.implement = this.implement;

	klass.toString = function() {

		return String(constructor);

	};

	extend.call(klass, _static);

	// single instance

	var object = constructor ? klass : _prototype;

	// class initialisation

	if (object.init instanceof Function) object.init();

	return object;

};



Base.implement = function(_interface) {

	if (_interface instanceof Function) _interface = _interface.prototype;

	this.prototype.extend(_interface);

};



/**

 * Performs a PostBack using javascript.

 * @function Prado.PostBack

 * @param event - Event that triggered this postback

 * @param options - Postback options

 * @... {string} FormID - Form that should be posted back

 * @... {optional boolean} CausesValidation - Validate before PostBack if true

 * @... {optional string} ValidationGroup - Group to Validate 

 * @... {optional string} ID - Validation ID 

 * @... {optional string} PostBackUrl - Postback URL

 * @... {optional boolean} TrackFocus - Keep track of focused element if true

 * @... {string} EventTarget - Id of element that triggered PostBack

 * @... {string} EventParameter - EventParameter for PostBack

 */

Prado.PostBack = function(event,options)

{

	var form = $(options['FormID']);

	var canSubmit = true;



	if(options['CausesValidation'] && typeof(Prado.Validation) != "undefined")

	{

		if(!Prado.Validation.validate(options['FormID'], options['ValidationGroup'], $(options['ID'])))

			return Event.stop(event);

	}



	if(options['PostBackUrl'] && options['PostBackUrl'].length > 0)

		form.action = options['PostBackUrl'];



	if(options['TrackFocus'])

	{

		var lastFocus = $('PRADO_LASTFOCUS');

		if(lastFocus)

		{

			var active = document.activeElement; //where did this come from

			if(active)

				lastFocus.value = active.id;

			else

				lastFocus.value = options['EventTarget'];

		}

	}



	$('PRADO_POSTBACK_TARGET').value = options['EventTarget'];

	$('PRADO_POSTBACK_PARAMETER').value = options['EventParameter'];

	/**

	 * Since google toolbar prevents browser default action,

	 * we will always disable default client-side browser action

	 */

	/*if(options['StopEvent']) */

		Event.stop(event);

	Event.fireEvent(form,"submit");

};



/**

 * Prado utilities to manipulate DOM elements.

 * @object Prado.Element

 */

Prado.Element =

{

	/**

	 * Set the value of a particular element.

	 * @function ?

	 * @param {string} element - Element id

	 * @param {string} value - New element value

	 */

	setValue : function(element, value)

	{

		var el = $(element);

		if(el && typeof(el.value) != "undefined")

			el.value = value;

	},



	/**

	 * Select options from a selectable element.

	 * @function ?

	 * @param {string} element - Element id

	 * @param {string} method - Name of any {@link Prado.Element.Selection} method

	 * @param {array|boolean|string} value - Values that should be selected

	 * @param {int} total - Number of elements 

	 */

	select : function(element, method, value, total)

	{

		var el = $(element);

		if(!el) return;

		var selection = Prado.Element.Selection;

		if(typeof(selection[method]) == "function")

		{

			control = selection.isSelectable(el) ? [el] : selection.getListElements(element,total);

			selection[method](control, value);

		}

	},



	/**

	 * Trigger a click event on a DOM element.

	 * @function ?

	 * @param {string} element - Element id

	 */

	click : function(element)

	{

		var el = $(element);

		if(el)

			Event.fireEvent(el,'click');

	},



	/**

	 * Check if an DOM element is disabled.

	 * @function {boolean} ?

	 * @param {string} element - Element id

	 * @returns true if element is disabled

	 */

	isDisabled : function(element)

	{

		if(!element.attributes['disabled']) //FF

			return false;

		var value = element.attributes['disabled'].nodeValue;

		if(typeof(value)=="string")

			return value.toLowerCase() == "disabled";

		else

			return value == true;

	},



	/**

	 * Sets an attribute of a DOM element.

	 * @function ?

	 * @param {string} element - Element id

	 * @param {string} attribute - Name of attribute

	 * @param {string} value - Value of attribute

	 */

	setAttribute : function(element, attribute, value)

	{

		var el = $(element);

		if(!el) return;

		if((attribute == "disabled" || attribute == "multiple") && value==false)

			el.removeAttribute(attribute);

		else if(attribute.match(/^on/i)) //event methods

		{

			try

			{

				eval("(func = function(event){"+value+"})");

				el[attribute] = func;

			}

			catch(e)

			{

				throw "Error in evaluating '"+value+"' for attribute "+attribute+" for element "+element.id;

			}

		}

		else

			el.setAttribute(attribute, value);

	},



	/**

	 * Sets the options for a select element. 

	 * @function ?

	 * @param {string} element - Element id

	 * @param {array[]} options - Array of options, each an array of structure 

	 *   [ "optionText" , "optionValue" , "optionGroup" ]

	 */

	setOptions : function(element, options)

	{

		var el = $(element);

		if(!el) return;

		var previousGroup = null;

		var optGroup=null;

		if(el && el.tagName.toLowerCase() == "select")

		{

			while(el.childNodes.length > 0)

				el.removeChild(el.lastChild);



			var optDom = Prado.Element.createOptions(options);

			for(var i = 0; i < optDom.length; i++)

				el.appendChild(optDom[i]);

		}

	},



	/**

	 * Create opt-group options from an array of options. 

	 * @function {array} ?

	 * @param {array[]} options - Array of options, each an array of structure 

	 *   [ "optionText" , "optionValue" , "optionGroup" ]

	 * @returns Array of option DOM elements

	 */

	createOptions : function(options)

	{

		var previousGroup = null;

		var optgroup=null;

		var result = [];

		for(var i = 0; i<options.length; i++)

		{

			var option = options[i];

			if(option.length > 2)

			{

				var group = option[2];

				if(group!=previousGroup)

				{

					if(previousGroup!=null && optgroup!=null)

					{

						result.push(optgroup);

						previousGroup=null;

						optgroup=null;

					}

					optgroup = document.createElement('optgroup');

					optgroup.label = group;

					previousGroup = group;

				}

			}

			var opt = document.createElement('option');

			opt.text = option[0];

			opt.innerText = option[0];

			opt.value = option[1];

			if(optgroup!=null)

				optgroup.appendChild(opt);

			else

				result.push(opt);

		}

		if(optgroup!=null)

			result.push(optgroup);

		return result;

	},



	/**

	 * Set focus (delayed) on a particular element.

	 * @function ?

	 * @param {string} element - Element id

	 */

	focus : function(element)

	{

		var obj = $(element);

		if(typeof(obj) != "undefined" && typeof(obj.focus) != "undefined")

			setTimeout(function(){ obj.focus(); }, 100);

		return false;

	},



	/**

	 * Replace a DOM element either with given content or

	 * with content from a CallBack response boundary

	 * using a replacement method.

	 * @function ?

	 * @param {string|element} element - DOM element or element id

	 * @param {string} method - Name of method to use for replacement

	 * @param {optional string} content - New content of element

	 * @param {optional string} boundary - Boundary of new content

	 */

	replace : function(element, method, content, boundary)

	{

		if(boundary)

		{

			result = Prado.Element.extractContent(this.transport.responseText, boundary);

			if(result != null)

				content = result;

		}

		if(typeof(element) == "string")

		{

			if($(element))

				method.toFunction().apply(this,[element,""+content]);

		}

		else

		{

			method.toFunction().apply(this,[""+content]);

		}

	},



	/**

	 * Extract content from a text by its boundary id.

	 * Boundaries have this form:

	 * <pre>

	 * &lt;!--123456--&gt;Democontent&lt;!--//123456--&gt;

	 * </pre>

	 * @function {string} ?

	 * @param {string} text - Text that contains boundaries

	 * @param {string} boundary - Boundary id

	 * @returns Content from given boundaries

	 */

	extractContent : function(text, boundary)

	{

		var tagStart = '<!--'+boundary+'-->';

		var tagEnd = '<!--//'+boundary+'-->';

		var start = text.indexOf(tagStart);

		if(start > -1)

		{

			start += tagStart.length;

			var end = text.indexOf(tagEnd,start);

			if(end > -1)

				return text.substring(start,end);

		}

		return null;

		/*var f = RegExp('(?:<!--'+boundary+'-->)((?:.|\n|\r)+?)(?:<!--//'+boundary+'-->)',"m");

		var result = text.match(f);

		if(result && result.length >= 2)

			return result[1];

		else

			return null;*/

	},



	/**

	 * Evaluate a javascript snippet from a string.

	 * @function ?

	 * @param {string} content - String containing the script

	 */

	evaluateScript : function(content)

	{

		content.evalScripts();

	},

	

	/**

	 * Set CSS style with Camelized keys.

 	 * See <a href="http://www.prototypejs.org/api/element/setstyle" target="_blank">Prototype's 

 	 * Element.setStyle</a> for details.

	 * @function ?

	 * @param {string|element} element - DOM element or element id

	 * @param {object} styles - Object with style properties/values

	 */

	setStyle : function (element, styles)

	{

		var s = {}

		// Camelize all styles keys

		for (var property in styles)

		{

			s[property.camelize()]=styles[property].camelize();

		}

		Element.setStyle(element, s);

	}

};



/**

 * Utilities for selections.

 * @object Prado.Element.Selection

 */

Prado.Element.Selection =

{

	/**

	 * Check if an DOM element can be selected.

	 * @function {boolean} ?

	 * @param {element} el - DOM elemet

	 * @returns true if element is selectable

	 */

	isSelectable : function(el)

	{

		if(el && el.type)

		{

			switch(el.type.toLowerCase())

			{

				case 'checkbox':

				case 'radio':

				case 'select':

				case 'select-multiple':

				case 'select-one':

				return true;

			}

		}

		return false;

	},



	/**

	 * Set checked attribute of a checkbox or radiobutton to value.

	 * @function {boolean} ?

	 * @param {element} el - DOM element

	 * @param {boolean} value - New value of checked attribute

	 * @returns New value of checked attribute

	 */

	inputValue : function(el, value)

	{

		switch(el.type.toLowerCase())

		{

			case 'checkbox':

			case 'radio':

			return el.checked = value;

		}

	},



	/**

	 * Set selected attribute for elements options by value.

	 * If value is boolean, all elements options selected attribute will be set

	 * to value. Otherwhise all options that have the given value will be selected. 

	 * @function ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 * @param {boolean|string} value - Value of options that should be selected or boolean value of selection status

	 */

	selectValue : function(elements, value)

	{

		elements.each(function(el)

		{

			$A(el.options).each(function(option)

			{

				if(typeof(value) == "boolean")

					options.selected = value;

				else if(option.value == value)

					option.selected = true;

			});

		})

	},



	/**

	 * Set selected attribute for elements options by array of values.

	 * @function ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 * @param {string[]} value - Array of values to select

	 */

	selectValues : function(elements, values)

	{

		selection = this;

		values.each(function(value)

		{

			selection.selectValue(elements,value);

		})

	},



	/**

	 * Set selected attribute for elements options by option index.

	 * @function ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 * @param {int} index - Index of option to select

	 */

	selectIndex : function(elements, index)

	{

		elements.each(function(el)

		{

			if(el.type.toLowerCase() == 'select-one')

				el.selectedIndex = index;

			else

			{

				for(var i = 0; i<el.length; i++)

				{

					if(i == index)

						el.options[i].selected = true;

				}

			}

		})

	},



	/**

	 * Set selected attribute to true for all elements options.

	 * @function ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 */

	selectAll : function(elements)

	{

		elements.each(function(el)

		{

			if(el.type.toLowerCase() != 'select-one')

			{

				$A(el.options).each(function(option)

				{

					option.selected = true;

				})

			}

		})

	},



	/**

	 * Toggle the selected attribute for elements options.

	 * @function ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 */

	selectInvert : function(elements)

	{

		elements.each(function(el)

		{

			if(el.type.toLowerCase() != 'select-one')

			{

				$A(el.options).each(function(option)

				{

					option.selected = !options.selected;

				})

			}

		})

	},



	/**

	 * Set selected attribute for elements options by array of option indices.

	 * @function ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 * @param {int[]} indices - Array of option indices to select

	 */

	selectIndices : function(elements, indices)

	{

		selection = this;

		indices.each(function(index)

		{

			selection.selectIndex(elements,index);

		})

	},



	/**

	 * Unselect elements.

	 * @function ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 */

	selectClear : function(elements)

	{

		elements.each(function(el)

		{

			el.selectedIndex = -1;

		})

	},



	/**

	 * Get list elements of an element.

	 * @function {element[]} ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 * @param {int} total - Number of list elements to return

	 * @returns Array of list DOM elements

	 */

	getListElements : function(element, total)

	{

		elements = new Array();

		for(i = 0; i < total; i++)

		{

			el = $(element+"_c"+i);

			if(el)

				elements.push(el);

		}

		return elements;

	},



	/**

	 * Set checked attribute of elements by value.

	 * If value is boolean, checked attribute will be set to value. 

	 * Otherwhise all elements that have the given value will be checked. 

	 * @function ?

	 * @param {element[]} elements - Array of checkable DOM elements

	 * @param {boolean|String} value - Value that should be checked or boolean value of checked status

	 * 	 

	 */

	checkValue : function(elements, value)

	{

		elements.each(function(el)

		{

			if(typeof(value) == "boolean")

				el.checked = value;

			else if(el.value == value)

				el.checked = true;

		});

	},



	/**

	 * Set checked attribute of elements by array of values.

	 * @function ?

	 * @param {element[]} elements - Array of checkable DOM elements

	 * @param {string[]} values - Values that should be checked

	 * 	 

	 */

	checkValues : function(elements, values)

	{

		selection = this;

		values.each(function(value)

		{

			selection.checkValue(elements, value);

		})

	},



	/**

	 * Set checked attribute of elements by list index.

	 * @function ?

	 * @param {element[]} elements - Array of checkable DOM elements

	 * @param {int} index - Index of element to set checked

	 */

	checkIndex : function(elements, index)

	{

		for(var i = 0; i<elements.length; i++)

		{

			if(i == index)

				elements[i].checked = true;

		}

	},



	/**

	 * Set checked attribute of elements by array of list indices.

	 * @function ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 * @param {int[]} indices - Array of list indices to set checked

	 */

	checkIndices : function(elements, indices)

	{

		selection = this;

		indices.each(function(index)

		{

			selection.checkIndex(elements, index);

		})

	},



	/**

	 * Uncheck elements.

	 * @function ?

	 * @param {element[]} elements - Array of checkable DOM elements

	 */

	checkClear : function(elements)

	{

		elements.each(function(el)

		{

			el.checked = false;

		});

	},



	/**

	 * Set checked attribute of all elements to true.

	 * @function ?

	 * @param {element[]} elements - Array of checkable DOM elements

	 */

	checkAll : function(elements)

	{

		elements.each(function(el)

		{

			el.checked = true;

		})

	},



	/**

	 * Toggle the checked attribute of elements.

	 * @function ?

	 * @param {element[]} elements - Array of selectable DOM elements

	 */

	checkInvert : function(elements)

	{

		elements.each(function(el)

		{

			el.checked != el.checked;

		})

	}

};





/**

 * Utilities for insertion.

 * @object Prado.Element.Insert

 */

Prado.Element.Insert =

{

	/**

	 * Append content to element

	 * @function ?

	 * @param {element} element - DOM element that content should be appended to

	 * @param {element} content - DOM element to append

	 */

	append: function(element, content)

	{

		$(element).insert(content);

	},



	/**

	 * Prepend content to element

	 * @function ?

	 * @param {element} element - DOM element that content should be prepended to

	 * @param {element} content - DOM element to prepend

	 */

	prepend: function(element, content)

	{

		$(element).insert({top:content});

	},



	/**

	 * Insert content after element

	 * @function ?

	 * @param {element} element - DOM element that content should be inserted after

	 * @param {element} content - DOM element to insert

	 */

	after: function(element, content)

	{

		$(element).insert({after:content});

	},



	/**

	 * Insert content before element

	 * @function ?

	 * @param {element} element - DOM element that content should be inserted before

	 * @param {element} content - DOM element to insert

	 */

	before: function(element, content)

	{

		$(element).insert({before:content});

	}

};





/**

 * Extension to 

 * <a href="http://wiki.script.aculo.us/scriptaculous/show/builder" target="_blank">Scriptaculous' Builder</a>

 * @namespace Builder

 */



Object.extend(Builder,

{

	/**

 	 * Export scriptaculous builder utilities as window[functions]

 	 * @function ?

 	 */

	exportTags:function()

	{

		var tags=["BUTTON","TT","PRE","H1","H2","H3","BR","CANVAS","HR","LABEL","TEXTAREA","FORM","STRONG","SELECT","OPTION","OPTGROUP","LEGEND","FIELDSET","P","UL","OL","LI","TD","TR","THEAD","TBODY","TFOOT","TABLE","TH","INPUT","SPAN","A","DIV","IMG", "CAPTION"];

		tags.each(function(tag)

		{

			window[tag]=function()

			{

				var args=$A(arguments);

				if(args.length==0)

					return Builder.node(tag,null);

				if(args.length==1)

					return Builder.node(tag,args[0]);

				if(args.length>1)

					return Builder.node(tag,args.shift(),args);



			};

		});

	}

});

Builder.exportTags();



/**

 * Extension to 

 * <a href="http://www.prototypejs.org/api/string" target="_blank">Prototype's String</a>

 * @namespace String

 */

Object.extend(String.prototype, {



	/**

	 * Add padding to string

	 * @function {string} ?

	 * @param {string} side - "left" to pad the string on the left, "right" to pad right.

	 * @param {int} len - Minimum string length.

	 * @param {string} chr - Character(s) to pad

	 * @returns Padded string

	 */

	pad : function(side, len, chr) {

		if (!chr) chr = ' ';

		var s = this;

		var left = side.toLowerCase()=='left';

		while (s.length<len) s = left? chr + s : s + chr;

		return s;

	},



	/**

	 * Add left padding to string

	 * @function {string} ?

	 * @param {int} len - Minimum string length.

	 * @param {string} chr - Character(s) to pad

	 * @returns Padded string

	 */

	padLeft : function(len, chr) {

		return this.pad('left',len,chr);

	},



	/**

	 * Add right padding to string

	 * @function {string} ?

	 * @param {int} len - Minimum string length.

	 * @param {string} chr - Character(s) to pad

	 * @returns Padded string

	 */

	padRight : function(len, chr) {

		return this.pad('right',len,chr);

	},



	/**

	 * Add zeros to the right of string

	 * @function {string} ?

	 * @param {int} len - Minimum string length.

	 * @returns Padded string

	 */

	zerofill : function(len) {

		return this.padLeft(len,'0');

	},



	/**

	 * Remove white spaces from both ends of string.

	 * @function {string} ?

	 * @returns Trimmed string

	 */

	trim : function() {

		return this.replace(/^\s+|\s+$/g,'');

	},



	/**

	 * Remove white spaces from the left side of string.

	 * @function {string} ?

	 * @returns Trimmed string

	 */

	trimLeft : function() {

		return this.replace(/^\s+/,'');

	},



	/**

	 * Remove white spaces from the right side of string.

	 * @function {string} ?

	 * @returns Trimmed string

	 */

	trimRight : function() {

		return this.replace(/\s+$/,'');

	},



	/**

	 * Convert period separated function names into a function reference.

	 * <br />Example:

	 * <pre> 

	 * "Prado.AJAX.Callback.Action.setValue".toFunction()

	 * </pre>

	 * @function {function} ?

	 * @returns Reference to the corresponding function

	 */

	toFunction : function()

	{

		var commands = this.split(/\./);

		var command = window;

		commands.each(function(action)

		{

			if(command[new String(action)])

				command=command[new String(action)];

		});

		if(typeof(command) == "function")

			return command;

		else

		{

			if(typeof Logger != "undefined")

				Logger.error("Missing function", this);



			throw new Error	("Missing function '"+this+"'");

		}

	},



	/**

	 * Convert string into integer, returns null if not integer.

	 * @function {int} ?

	 * @returns Integer, null if string does not represent an integer.

	 */

	toInteger : function()

	{

		var exp = /^\s*[-\+]?\d+\s*$/;

		if (this.match(exp) == null)

			return null;

		var num = parseInt(this, 10);

		return (isNaN(num) ? null : num);

	},



	/**

	 * Convert string into a double/float value. <b>Internationalization

	 * is not supported</b>

	 * @function {double} ?

	 * @param {string} decimalchar - Decimal character, defaults to "."

	 * @returns Double, null if string does not represent a float value

	 */

	toDouble : function(decimalchar)

	{

		if(this.length <= 0) return null;

		decimalchar = decimalchar || ".";

		var exp = new RegExp("^\\s*([-\\+])?(\\d+)?(\\" + decimalchar + "(\\d+))?\\s*$");

		var m = this.match(exp);



		if (m == null)

			return null;

		m[1] = m[1] || "";

		m[2] = m[2] || "0";

		m[4] = m[4] || "0";



		var cleanInput = m[1] + (m[2].length>0 ? m[2] : "0") + "." + m[4];

		var num = parseFloat(cleanInput);

		return (isNaN(num) ? null : num);

	},



	/**

	 * Convert strings that represent a currency value to float.

	 * E.g. "10,000.50" will become "10000.50". The number

	 * of dicimal digits, grouping and decimal characters can be specified.

	 * <i>The currency input format is <b>very</b> strict, null will be returned if

	 * the pattern does not match</i>.

	 * @function {double} ?

	 * @param {string} groupchar - Grouping character, defaults to ","

	 * @param {int} digits - Number of decimal digits

	 * @param {string} decimalchar - Decimal character, defaults to "."

	 * @returns Double, null if string does not represent a currency value

	 */

	toCurrency : function(groupchar, digits, decimalchar)

	{

		groupchar = groupchar || ",";

		decimalchar = decimalchar || ".";

		digits = typeof(digits) == "undefined" ? 2 : digits;



		var exp = new RegExp("^\\s*([-\\+])?(((\\d+)\\" + groupchar + ")*)(\\d+)"

			+ ((digits > 0) ? "(\\" + decimalchar + "(\\d{1," + digits + "}))?" : "")

			+ "\\s*$");

		var m = this.match(exp);

		if (m == null)

			return null;

		var intermed = m[2] + m[5] ;

		var cleanInput = m[1] + intermed.replace(

				new RegExp("(\\" + groupchar + ")", "g"), "")

								+ ((digits > 0) ? "." + m[7] : "");

		var num = parseFloat(cleanInput);

		return (isNaN(num) ? null : num);

	},



	/**

	 * Converts the string to a date by finding values that matches the

	 * date format pattern.

	 * @function {Date} ?

	 * @param {string} format - Date format pattern, e.g. MM-dd-yyyy

	 * @returns Date extracted from the string

	 */

	toDate : function(format)

	{

		return Date.SimpleParse(this, format);

	}

});



/**

 * Extension to 

 * <a href="http://www.prototypejs.org/api/event" target="_blank">Prototype's Event</a>

 * @namespace Event

 */

Object.extend(Event,

{

	/**

	 * Register a function to be executed when the page is loaded.

	 * Note that the page is only loaded if all resources (e.g. images)

	 * are loaded.

	 * <br />Example: 

	 * <br />Show an alert box with message "Page Loaded!" when the

	 * page finished loading.

	 * <pre>

	 * Event.OnLoad(function(){ alert("Page Loaded!"); });

	 * </pre>

	 * @function ?

	 * @param {function} fn - Function to execute when page is loaded.

	 */

	OnLoad : function (fn)

	{

		// opera onload is in document, not window

		var w = document.addEventListener &&

					!window.addEventListener ? document : window;

		Event.observe(w,'load',fn);

	},



	/**

	 * Returns the unicode character generated by key.

	 * @param {event} e - Keyboard event

	 * @function {int} ?

	 * @returns Unicode character code generated by the key that was struck.

	 */

	keyCode : function(e)

	{

	   return e.keyCode != null ? e.keyCode : e.charCode

	},



	/**

	 * Checks if an Event is of type HTMLEvent.

	 * @function {boolean} ?

	 * @param {string} type - Event type or event name.

	 * @return true if event is of type HTMLEvent.

	 */

	isHTMLEvent : function(type)

	{

		var events = ['abort', 'blur', 'change', 'error', 'focus',

					'load', 'reset', 'resize', 'scroll', 'select',

					'submit', 'unload'];

		return events.include(type);

	},



	/**

	 * Checks if an Event is a mouse event.

	 * @function {boolean} ?

	 * @param {string} type - Event type or event name

	 * @return true if event is of type MouseEvent.

	 */

	isMouseEvent : function(type)

	{

		var events = ['click', 'mousedown', 'mousemove', 'mouseout',

					'mouseover', 'mouseup'];

		return events.include(type);

	},



	/**

	 * Dispatch the DOM event of a given <tt>type</tt> on a DOM

	 * <tt>element</tt>. Only HTMLEvent and MouseEvent can be

	 * dispatched, keyboard events or UIEvent can not be dispatch

	 * via javascript consistently.

	 * For the "submit" event the submit() method is called.

	 * @function ?

	 * @param {element|string} element - Element id string or DOM element.

	 * @param {string} type - Event type to dispatch.

	 */

	fireEvent : function(element,type)

	{

		element = $(element);

		if(type == "submit")

			return element.submit();

		if(document.createEvent)

        {

			if(Event.isHTMLEvent(type))

			{

				var event = document.createEvent('HTMLEvents');

	            event.initEvent(type, true, true);

			}

			else if(Event.isMouseEvent(type))

			{

				var event = document.createEvent('MouseEvents');

				if (event.initMouseEvent)

		        {

					event.initMouseEvent(type,true,true,

						document.defaultView, 1, 0, 0, 0, 0, false,

								false, false, false, 0, null);

		        }

		        else

		        {

		            // Safari

		            // TODO we should be initialising other mouse-event related attributes here

		            event.initEvent(type, true, true);

		        }

			}

            element.dispatchEvent(event);

        }

        else if(document.createEventObject)

        {

        	var evObj = document.createEventObject();

            element.fireEvent('on'+type, evObj);

        }

        else if(typeof(element['on'+type]) == "function")

            element['on'+type]();

	}

});





/**

 * Extension to 

 * <a href="http://www.prototypejs.org/api/date" target="_blank">Prototype's Date</a>

 * @namespace Date

 */

Object.extend(Date.prototype,

{

	/**

	 * SimpleFormat

	 * @function ?

	 * @param {string} format - TODO

	 * @param {string} data - TODO

	 * @returns TODO

	 */

	SimpleFormat: function(format, data)

	{

		data = data || {};

		var bits = new Array();

		bits['d'] = this.getDate();

		bits['dd'] = String(this.getDate()).zerofill(2);



		bits['M'] = this.getMonth()+1;

		bits['MM'] = String(this.getMonth()+1).zerofill(2);

		if(data.AbbreviatedMonthNames)

			bits['MMM'] = data.AbbreviatedMonthNames[this.getMonth()];

		if(data.MonthNames)

			bits['MMMM'] = data.MonthNames[this.getMonth()];

		var yearStr = "" + this.getFullYear();

		yearStr = (yearStr.length == 2) ? '19' + yearStr: yearStr;

		bits['yyyy'] = yearStr;

		bits['yy'] = bits['yyyy'].toString().substr(2,2);



		// do some funky regexs to replace the format string

		// with the real values

		var frm = new String(format);

		for (var sect in bits)

		{

			var reg = new RegExp("\\b"+sect+"\\b" ,"g");

			frm = frm.replace(reg, bits[sect]);

		}

		return frm;

	},



	/**

	 * toISODate

	 * @function {string} ?

	 * @returns TODO

	 */

	toISODate : function()

	{

		var y = this.getFullYear();

		var m = String(this.getMonth() + 1).zerofill(2);

		var d = String(this.getDate()).zerofill(2);

		return String(y) + String(m) + String(d);

	}

});



Object.extend(Date,

{

	/**

	 * SimpleParse

	 * @function ?

	 * @param {string} format - TODO

	 * @param {string} data - TODO

	 * @returns TODO

	 */

	SimpleParse: function(value, format)

	{

		val=String(value);

		format=String(format);



		if(val.length <= 0) return null;



		if(format.length <= 0) return new Date(value);



		var isInteger = function (val)

		{

			var digits="1234567890";

			for (var i=0; i < val.length; i++)

			{

				if (digits.indexOf(val.charAt(i))==-1) { return false; }

			}

			return true;

		};



		var getInt = function(str,i,minlength,maxlength)

		{

			for (var x=maxlength; x>=minlength; x--)

			{

				var token=str.substring(i,i+x);

				if (token.length < minlength) { return null; }

				if (isInteger(token)) { return token; }

			}

			return null;

		};



		var i_val=0;

		var i_format=0;

		var c="";

		var token="";

		var token2="";

		var x,y;

		var now=new Date();

		var year=now.getFullYear();

		var month=now.getMonth()+1;

		var date=1;



		while (i_format < format.length)

		{

			// Get next token from format string

			c=format.charAt(i_format);

			token="";

			while ((format.charAt(i_format)==c) && (i_format < format.length))

			{

				token += format.charAt(i_format++);

			}



			// Extract contents of value based on format token

			if (token=="yyyy" || token=="yy" || token=="y")

			{

				if (token=="yyyy") { x=4;y=4; }

				if (token=="yy")   { x=2;y=2; }

				if (token=="y")    { x=2;y=4; }

				year=getInt(val,i_val,x,y);

				if (year==null) { return null; }

				i_val += year.length;

				if (year.length==2)

				{

					if (year > 70) { year=1900+(year-0); }

					else { year=2000+(year-0); }

				}

			}



			else if (token=="MM"||token=="M")

			{

				month=getInt(val,i_val,token.length,2);

				if(month==null||(month<1)||(month>12)){return null;}

				i_val+=month.length;

			}

			else if (token=="dd"||token=="d")

			{

				date=getInt(val,i_val,token.length,2);

				if(date==null||(date<1)||(date>31)){return null;}

				i_val+=date.length;

			}

			else

			{

				if (val.substring(i_val,i_val+token.length)!=token) {return null;}

				else {i_val+=token.length;}

			}

		}



		// If there are any trailing characters left in the value, it doesn't match

		if (i_val != val.length) { return null; }



		// Is date valid for month?

		if (month==2)

		{

			// Check for leap year

			if ( ( (year%4==0)&&(year%100 != 0) ) || (year%400==0) ) { // leap year

				if (date > 29){ return null; }

			}

			else { if (date > 28) { return null; } }

		}



		if ((month==4)||(month==6)||(month==9)||(month==11))

		{

			if (date > 30) { return null; }

		}



		var newdate=new Date(year,month-1,date, 0, 0, 0);

		return newdate;

	}

});



/**

 * Prado utilities for effects.

 * @object Prado.Effect

 */

Prado.Effect = 

{

	/**

	 * Highlights an element

	 * @function ?

	 * @param {element} element - DOM element to highlight

	 * @param {optional object} options - Highlight options

	 */

	Highlight : function (element,options)

	{

		new Effect.Highlight(element,options);

	}

};


Prado.WebUI = Class.create();



Prado.WebUI.PostBackControl = Class.create();



Prado.WebUI.PostBackControl.prototype =

{

	initialize : function(options)

	{

		this._elementOnClick = null, //capture the element's onclick function



		this.element = $(options.ID);

		if(this.element)

		{

			if(this.onInit)

				this.onInit(options);

		}

	},



	onInit : function(options)

	{

		if(typeof(this.element.onclick)=="function")

		{

			this._elementOnClick = this.element.onclick.bind(this.element);

			this.element.onclick = null;

		}

		Event.observe(this.element, "click", this.elementClicked.bindEvent(this,options));

	},



	elementClicked : function(event, options)

	{

		var src = Event.element(event);

		var doPostBack = true;

		var onclicked = null;



		if(this._elementOnClick)

		{

			var onclicked = this._elementOnClick(event);

			if(typeof(onclicked) == "boolean")

				doPostBack = onclicked;

		}

		if(doPostBack && !Prado.Element.isDisabled(src))

			this.onPostBack(event,options);

		if(typeof(onclicked) == "boolean" && !onclicked)

			Event.stop(event);

	},



	onPostBack : function(event, options)

	{

		Prado.PostBack(event,options);

	}

};



Prado.WebUI.TButton = Class.extend(Prado.WebUI.PostBackControl);

Prado.WebUI.TLinkButton = Class.extend(Prado.WebUI.PostBackControl);

Prado.WebUI.TCheckBox = Class.extend(Prado.WebUI.PostBackControl);

Prado.WebUI.TBulletedList = Class.extend(Prado.WebUI.PostBackControl);

Prado.WebUI.TImageMap = Class.extend(Prado.WebUI.PostBackControl);



/**

 * TImageButton client-side behaviour. With validation, Firefox needs

 * to capture the x,y point of the clicked image in hidden form fields.

 */

Prado.WebUI.TImageButton = Class.extend(Prado.WebUI.PostBackControl);

Object.extend(Prado.WebUI.TImageButton.prototype,

{

	/**

	 * Override parent onPostBack function, tried to add hidden forms

	 * inputs to capture x,y clicked point.

	 */

	onPostBack : function(event, options)

	{

		this.addXYInput(event,options);

		Prado.PostBack(event, options);

		this.removeXYInput(event,options);

	},



	/**

	 * Add hidden inputs to capture the x,y point clicked on the image.

	 * @param event DOM click event.

	 * @param array image button options.

	 */

	addXYInput : function(event,options)

	{

		imagePos = this.element.cumulativeOffset();

		clickedPos = [event.clientX, event.clientY];

		x = clickedPos[0]-imagePos[0]+1;

		y = clickedPos[1]-imagePos[1]+1;

		x = x < 0 ? 0 : x;

		y = y < 0 ? 0 : y;

		id = options['EventTarget'];

		x_input = $(id+"_x");

		y_input = $(id+"_y");

		if(x_input)

		{

			x_input.value = x;

		}

		else

		{

			x_input = INPUT({type:'hidden',name:id+'_x','id':id+'_x',value:x});

			this.element.parentNode.appendChild(x_input);

		}

		if(y_input)

		{

			y_input.value = y;

		}

		else

		{

			y_input = INPUT({type:'hidden',name:id+'_y','id':id+'_y',value:y});

			this.element.parentNode.appendChild(y_input);

		}

	},



	/**

	 * Remove hidden inputs for x,y-click capturing

	 * @param event DOM click event.

	 * @param array image button options.

	 */

	removeXYInput : function(event,options)

	{

		id = options['EventTarget'];

		this.element.parentNode.removeChild($(id+"_x"));

		this.element.parentNode.removeChild($(id+"_y"));

	}

});





/**

 * Radio button, only initialize if not already checked.

 */

Prado.WebUI.TRadioButton = Class.extend(Prado.WebUI.PostBackControl);

Prado.WebUI.TRadioButton.prototype.onRadioButtonInitialize = Prado.WebUI.TRadioButton.prototype.initialize;

Object.extend(Prado.WebUI.TRadioButton.prototype,

{

	initialize : function(options)

	{

		this.element = $(options['ID']);

		if(this.element)

		{

			if(!this.element.checked)

				this.onRadioButtonInitialize(options);

		}

	}

});





Prado.WebUI.TTextBox = Class.extend(Prado.WebUI.PostBackControl,

{

	onInit : function(options)

	{

		this.options=options;

		if(options['TextMode'] != 'MultiLine')

			Event.observe(this.element, "keydown", this.handleReturnKey.bind(this));

		if(this.options['AutoPostBack']==true)

			Event.observe(this.element, "change", Prado.PostBack.bindEvent(this,options));

	},



	handleReturnKey : function(e)

	{

		 if(Event.keyCode(e) == Event.KEY_RETURN)

        {

			var target = Event.element(e);

			if(target)

			{

				if(this.options['AutoPostBack']==true)

				{

					Event.fireEvent(target, "change");

					Event.stop(e);

				}

				else

				{

					if(this.options['CausesValidation'] && typeof(Prado.Validation) != "undefined")

					{

						if(!Prado.Validation.validate(this.options['FormID'], this.options['ValidationGroup'], $(this.options['ID'])))

							return Event.stop(e);

					}

				}

			}

		}

	}

});



Prado.WebUI.TListControl = Class.extend(Prado.WebUI.PostBackControl,

{

	onInit : function(options)

	{

		Event.observe(this.element, "change", Prado.PostBack.bindEvent(this,options));

	}

});



Prado.WebUI.TListBox = Class.extend(Prado.WebUI.TListControl);

Prado.WebUI.TDropDownList = Class.extend(Prado.WebUI.TListControl);



Prado.WebUI.DefaultButton = Class.create();

Prado.WebUI.DefaultButton.prototype =

{

	initialize : function(options)

	{

		this.options = options;

		this._event = this.triggerEvent.bindEvent(this);

		Event.observe(options['Panel'], 'keydown', this._event);

	},



	triggerEvent : function(ev, target)

	{

		var enterPressed = Event.keyCode(ev) == Event.KEY_RETURN;

		var isTextArea = Event.element(ev).tagName.toLowerCase() == "textarea";

		if(enterPressed && !isTextArea)

		{

			var defaultButton = $(this.options['Target']);

			if(defaultButton)

			{

				this.triggered = true;

				$('PRADO_POSTBACK_TARGET').value = this.options.EventTarget;

				Event.fireEvent(defaultButton, this.options['Event']);

				Event.stop(ev);

			}

		}

	}

};



Prado.WebUI.TTextHighlighter=Class.create();

Prado.WebUI.TTextHighlighter.prototype=

{

	initialize:function(id)

	{

		if(!window.clipboardData) return;

		var options =

		{

			href : 'javascript:;/'+'/copy code to clipboard',

			onclick : 'Prado.WebUI.TTextHighlighter.copy(this)',

			onmouseover : 'Prado.WebUI.TTextHighlighter.hover(this)',

			onmouseout : 'Prado.WebUI.TTextHighlighter.out(this)'

		}

		var div = DIV({className:'copycode'}, A(options, 'Copy Code'));

		document.write(DIV(null,div).innerHTML);

	}

};



Object.extend(Prado.WebUI.TTextHighlighter,

{

	copy : function(obj)

	{

		var parent = obj.parentNode.parentNode.parentNode;

		var text = '';

		for(var i = 0; i < parent.childNodes.length; i++)

		{

			var node = parent.childNodes[i];

			if(node.innerText)

				text += node.innerText == 'Copy Code' ? '' : node.innerText;

			else

				text += node.nodeValue;

		}

		if(text.length > 0)

			window.clipboardData.setData("Text", text);

	},



	hover : function(obj)

	{

		obj.parentNode.className = "copycode copycode_hover";

	},



	out : function(obj)

	{

		obj.parentNode.className = "copycode";

	}

});





Prado.WebUI.TCheckBoxList = Base.extend(

{

	constructor : function(options)

	{

		for(var i = 0; i<options.ItemCount; i++)

		{

			var checkBoxOptions = Object.extend(

			{

				ID : options.ListID+"_c"+i,

				EventTarget : options.ListName+"$c"+i

			}, options);

			new Prado.WebUI.TCheckBox(checkBoxOptions);

		}

	}

});



Prado.WebUI.TRadioButtonList = Base.extend(

{

	constructor : function(options)

	{

		for(var i = 0; i<options.ItemCount; i++)

		{

			var radioButtonOptions = Object.extend(

			{

				ID : options.ListID+"_c"+i,

				EventTarget : options.ListName+"$c"+i

			}, options);

			new Prado.WebUI.TRadioButton(radioButtonOptions);

		}

	}

});


Prado.WebUI.TRatingList = Class.create();

Prado.WebUI.TRatingList.prototype =

{

	selectedIndex : -1,



	initialize : function(options)

	{

		this.options = options;

		this.element = $(options['ID']);

		Element.addClassName(this.element,options.cssClass);

		this.radios = document.getElementsByName(options.field);

		for(var i = 0; i<this.radios.length; i++)

		{

			Event.observe(this.radios[i].parentNode.parentNode, "mouseover", this.hover.bindEvent(this,i));

			Event.observe(this.radios[i].parentNode.parentNode, "mouseout", this.recover.bindEvent(this,i));

			Event.observe(this.radios[i].parentNode.parentNode, "click", this.click.bindEvent(this, i));

		}

		this.caption = CAPTION();

		this.element.appendChild(this.caption);

		this.selectedIndex = options.selectedIndex;

		this.setRating(this.selectedIndex);

	},



	hover : function(ev,index)

	{

		for(var i = 0; i<this.radios.length; i++)

			this.radios[i].parentNode.parentNode.className = (i<=index) ? "rating_hover" : "";

		this.setCaption(index);

	},



	recover : function(ev,index)

	{

		for(var i = 0; i<=index; i++)

			Element.removeClassName(this.radios[i].parentNode.parentNode, "rating_hover");

		this.setRating(this.selectedIndex);

	},



	click : function(ev, index)

	{

		for(var i = 0; i<this.radios.length; i++)

			this.radios[i].checked = (i == index);

		this.selectedIndex = index;

		this.setRating(index);

		if(typeof(this.options.onChange)=="function")

			this.options.onChange(this,index);

	},



	setRating: function(index)

	{

		for(var i = 0; i<=index; i++)

			this.radios[i].parentNode.parentNode.className = "rating_selected";

		this.setCaption(index);

	},



	setCaption : function(index)

	{

		this.caption.innerHTML = index > -1 ?

			this.radios[index].value : this.options.caption;

	}

};


/**

 * Prado client-side javascript validation fascade.

 *

 * <p>There are 4 basic classes: {@link Prado.Validation}, 

 * {@link Prado.ValidationManager}, {@link Prado.WebUI.TValidationSummary}

 * and {@link Prado.WebUI.TBaseValidator}, 

 * that interact together to perform validation.

 * The {@link Prado.Validation} class co-ordinates together the

 * validation scheme and is responsible for maintaining references

 * to ValidationManagers.</p>

 *

 * <p>The {@link Prado.ValidationManager} class is responsible for 

 * maintaining refereneces

 * to individual validators, validation summaries and their associated

 * groupings.</p>

 *

 * <p>The {@link Prado.WebUI.TValidationSummary} takes care of displaying 

 * the validator error messages

 * as html output or an alert output.</p>

 *

 * <p>The {@link Prado.WebUI.TBaseValidator} is the base class for all 

 * validators and contains

 * methods to interact with the actual inputs, data type conversion.</p>

 *

 * <p>An instance of {@link Prado.ValidationManager} must be instantiated first for a

 * particular form before instantiating validators and summaries.</p>

 *

 * <p>Usage example: adding a required field to a text box input with

 * ID "input1" in a form with ID "form1".</p>

 * <pre>

 * &lt;script type="text/javascript" src="../prado.js"&gt;&lt;/script&gt;

 * &lt;script type="text/javascript" src="../validator.js"&gt;&lt;/script&gt;

 * &lt;form id="form1" action="..."&gt;

 * &lt;div&gt;

 * 	&lt;input type="text" id="input1" /&gt;

 *  &lt;span id="validator1" style="display:none; color:red"&gt;*&lt;/span&gt;

 *  &lt;input type="submit text="submit" /&gt;

 * &lt;script type="text/javascript"&gt;

 * new Prado.ValidationManager({FormID : 'form1'});

 * var options =

 * {

 *		ID :				'validator1',

 *		FormID :			'form1',

 *		ErrorMessage :		'*',

 *		ControlToValidate : 'input1'

 * }

 * new Prado.WebUI.TRequiredFieldValidator(options);

 * new Prado.WebUI.TValidationSummary({ID:'summary1',FormID:'form1'});

 *

 * //watch the form onsubmit event, check validators, stop if not valid.

 * Event.observe("form1", "submit" function(ev)

 * {

 * 	 if(Prado.WebUI.Validation.isValid("form1") == false)

 * 		Event.stop(ev);

 * });

 * &lt;/script&gt;

 * &lt;/div&gt;

 * &lt;/form&gt;

 * </pre>

 * 

 * @module validation

 */

 

Prado.Validation =  Class.create();



/**

 * Global Validation Object.

 * 

 * <p>To validate the inputs of a particular form, call

 * <code>{@link Prado.Validation.validate}(formID, groupID)</code>

 * where <tt>formID</tt> is the HTML form ID, and the optional

 * <tt>groupID</tt> if present will only validate the validators

 * in a particular group.</p>

 * <p>Use <code>{@link Prado.Validation.validateControl}(controlClientID)</code>

 * to trigger validation for a single control.</p>

 * 

 * @object {static} Prado.Validation

 */

Object.extend(Prado.Validation,

{

	/**

	 * Hash of registered validation managers

	 * @var managers

	 */

	managers : {},



	/**

	 * Validate the validators (those that <strong>DO NOT</strong>

	 * belong to a particular group) in the form specified by the

	 * <tt>formID</tt> parameter. If <tt>groupID</tt> is specified

	 * only validators belonging to that group will be validated.

	 * @function {boolean} ?

	 * @param {string} formID - ID of the form to validate

	 * @param {string} groupID - ID of the ValidationGroup to validate.

	 * @param {element} invoker - DOM element that calls for validation

	 * @returns true if validation succeeded

	 */

	validate : function(formID, groupID, invoker)

	{

		formID = formID || this.getForm();

		if(this.managers[formID])

		{

			return this.managers[formID].validate(groupID, invoker);

		}

		else

		{

			throw new Error("Form '"+formID+"' is not registered with Prado.Validation");

		}

	},



	/**

	 * Validate all validators of a specific control.

	 * @function {boolean} ?

	 * @param {string} id - ID of DOM element to validate 

	 * @return true if all validators are valid or no validators present, false otherwise.

	 */

    validateControl : function(id) 

    {

        var formId=this.getForm();



		if (this.managers[formId])

        {

            return this.managers[formId].validateControl(id);

        } else {

			throw new Error("A validation manager needs to be created first.");

        }

    },



	/**

	 * Return first registered form

	 * @function {string} ?

	 * @returns ID of first form.

	 */

	getForm : function()

	{

		var keys = $H(this.managers).keys();

		return keys[0];

	},



	/**

	 * Check if the validators are valid for a particular form (and group).

	 * The validators states will not be changed.

	 * The <tt>validate</tt> function should be called first.

	 * @function {boolean} ?

	 * @param {string} formID - ID of the form to validate

	 * @param {string} groupID - ID of the ValiationGroup to validate.

	 * @return true if form is valid

	 */

	isValid : function(formID, groupID)

	{

		formID = formID || this.getForm();

		if(this.managers[formID])

			return this.managers[formID].isValid(groupID);

		return true;

	},



	/**

	 * Reset the validators for a given group.

	 * The group is searched in the first registered form.

	 * @function ?

	 * @param {string} groupID - ID of the ValidationGroup to reset.

	 */

	reset : function(groupID)

	{

		var formID = this.getForm();

		if(this.managers[formID])

			this.managers[formID].reset(groupID);

	},



	/**

	 * Add a new validator to a particular form.

	 * @function {ValidationManager} ?

	 * @param {string} formID - ID of the form that the validator belongs to.

	 * @param {TBaseValidator} validator - Validator object

	 * @return ValidationManager for the form

	 */

	addValidator : function(formID, validator)

	{

		if(this.managers[formID])

			this.managers[formID].addValidator(validator);

		else

			throw new Error("A validation manager for form '"+formID+"' needs to be created first.");

		return this.managers[formID];

	},



	/**

	 * Add a new validation summary.

	 * @function {ValidationManager} ?

	 * @param {string} formID - ID of the form that the validation summary belongs to.

	 * @param {TValidationSummary} validator - TValidationSummary object

	 * @return ValidationManager for the form

	 */

	addSummary : function(formID, validator)

	{

		if(this.managers[formID])

			this.managers[formID].addSummary(validator);

		else

			throw new Error("A validation manager for form '"+formID+"' needs to be created first.");

		return this.managers[formID];

	},



	setErrorMessage : function(validatorID, message)

	{

		$H(Prado.Validation.managers).each(function(manager)

		{

			manager[1].validators.each(function(validator)

			{

				if(validator.options.ID == validatorID)

				{

					validator.options.ErrorMessage = message;

					$(validatorID).innerHTML = message;

				}

			});

		});

	}

});



/**

 * Manages validators for a particular HTML form.

 *  

 * <p>The manager contains references to all the validators

 * summaries, and their groupings for a particular form.

 * Generally, {@link Prado.Validation} methods should be called rather

 * than calling directly the ValidationManager.</p>

 * 

 * @class Prado.ValidationManager

 */

Prado.ValidationManager = Class.create();

Prado.ValidationManager.prototype =

{

	/**

	 * Hash of registered validators by control's clientID

	 * @var controls

	 */

    controls: {},



	/**

	 * Initialize ValidationManager.

	 * @constructor {protected} ?

	 * @param {object} options - Options for initialization

	 * @... {string} FormID - ID of form of this manager

	 */

	initialize : function(options)

	{

		if(!Prado.Validation.managers[options.FormID])

		{

			/**

			 * List of validators

			 * @var {TBaseValidator[]} validators

			 */

			this.validators = []; 

			/**

			 * List of validation summaries

			 * @var {TValidationSummary[]} summaries

			 */

			this.summaries = []; 

			/**

			 * List of ValidationGroups

			 * @var {string[]} groups

			 */

			this.groups = []; 

			/**

			 * Options of this ValidationManager

			 * @var {object} options 

			 */

			this.options = {};



			this.options = options;



			Prado.Validation.managers[options.FormID] = this;

		}

		else

		{

			var manager = Prado.Validation.managers[options.FormID];

			this.validators = manager.validators;

			this.summaries = manager.summaries;

			this.groups = manager.groups;

			this.options = manager.options;

		}

	},



	/**

	 * Reset all validators in the given group.

	 * If group is null, validators without a group are used.

	 * @function ?

	 * @param {string} group - ID of ValidationGroup

	 */

	reset : function(group)

	{

		this.validatorPartition(group)[0].invoke('reset');

		this.updateSummary(group, true);

	},



	/**

	 * Validate the validators managed by this validation manager.

	 * If group is set, only validate validators in that group.

	 * @function {boolean} ?

	 * @param {optional string} group - ID of ValidationGroup

	 * @param {element} source - DOM element that calls for validation

	 * @return true if all validators are valid, false otherwise.

	 */

	validate : function(group, source)

	{

		var partition = this.validatorPartition(group);

		var valid = partition[0].invoke('validate', source).all();

		this.focusOnError(partition[0]);

		partition[1].invoke('hide');

		this.updateSummary(group, true);

		return valid;

	},



	/**

	 * Perform validation for all validators of a single control.

	 * @function {boolean} ?

	 * @param {string} id - ID of DOM element to validate 

	 * @return true if all validators are valid or no validators present, false otherwise.

	 */

    validateControl : function (id) 

    {

        return this.controls[id] ? this.controls[id].invoke('validate',null).all() : true;

    },



	/**

	 * Focus on the first validator that is invalid and options.FocusOnError is true.

	 * @function ?

	 * @param {TBaseValidator[]} validators - Array of validator objects

	 */

	focusOnError : function(validators)

	{

		for(var i = 0; i < validators.length; i++)

		{

			if(!validators[i].isValid && validators[i].options.FocusOnError)

				return Prado.Element.focus(validators[i].options.FocusElementID);

		}

	},



	/**

	 * Get all validators in a group and all other validators.

	 * Returns an array with two arrays of validators. The first 

	 * array contains all validators in the group if group is given, 

	 * otherwhise all validators without a group. The second array

	 * contains all other validators.

	 * @function {[ TBaseValidator[] , TBaseValidator[] ]} ?

	 * @param {optional string} group - ID of ValidationGroup

	 * @return Array with two arrays of validators.

	 */

	validatorPartition : function(group)

	{

		return group ? this.validatorsInGroup(group) : this.validatorsWithoutGroup();

	},



	/**

	 * Get all validators in a group.

	 * Returns an array with two arrays of validators. The first 

	 * array contains all validators in the group. The second array

	 * contains all other validators.

	 * @function {[ TBaseValidator[] , TBaseValidator[] ]} ?

	 * @param {optional string} groupID - ID of ValidationGroup

	 * @return Array with two arrays of validators.

	 */

	validatorsInGroup : function(groupID)

	{

		if(this.groups.include(groupID))

		{

			return this.validators.partition(function(val)

			{

				return val.group == groupID;

			});

		}

		else

			return [[],[]];

	},



	/**

	 * Get all validators without a group.

	 * Returns an array with two arrays of validators. The first 

	 * array contains all validators without a group. The second 

	 * array contains all other validators.

	 * @function {[ TBaseValidator[] , TBaseValidator[] ]} ?

	 * @return Array with two arrays of validators: Array[0] has all

	 * validators without a group, Array[1] all other validators.

	 */

	validatorsWithoutGroup : function()

	{

		return this.validators.partition(function(val)

		{

			return !val.group;

		});

	},



	/**

	 * Get the state of validators.

	 * If group is set, only validators in that group are checked. 

	 * Otherwhise only validators without a group are checked.

	 * @function {booelan} ?

	 * @param {optional string} group - ID of ValidationGroup

	 * @return true if all validators (in a group, if supplied) are valid.

	 */

	isValid : function(group)

	{

		return this.validatorPartition(group)[0].pluck('isValid').all();

	},



	/**

	 * Add a validator to this manager.

	 * @function ?

	 * @param {TBaseValidator} validator - Validator object

	 */

	addValidator : function(validator)

	{

		// Remove previously registered validator with same ID

        // to prevent stale validators created by AJAX updates

        this.removeValidator(validator);



		this.validators.push(validator);

		if(validator.group && !this.groups.include(validator.group))

			this.groups.push(validator.group);



        if (typeof this.controls[validator.control.id] === 'undefined')

            this.controls[validator.control.id] = Array();

        this.controls[validator.control.id].push(validator);

	},



	/**

	 * Add a validation summary.

	 * @function ?

	 * @param {TValidationSummary} summary - Validation summary.

	 */

	addSummary : function(summary)

	{

		this.summaries.push(summary);

	},



	/**

	 * Remove a validator from this manager

	 * @function ?

	 * @param {TBaseValidator} validator - Validator object

	 */

    removeValidator : function(validator)

    {

		this.validators = this.validators.reject(function(v)

		{

			return (v.options.ID==validator.options.ID);

		});

        if (this.controls[validator.control.id])

            this.controls[validator.control.id].reject( function(v)

            {

                return (v.options.ID==validator.options.ID)

            });

    },



	/**

	 * Gets validators with errors.

	 * If group is set, only validators in that group are returned. 

	 * Otherwhise only validators without a group are returned.

	 * @function {TBaseValidator[]} ?

	 * @param {optional string} group - ID of ValidationGroup

	 * @return array list of validators with error.

	 */

	getValidatorsWithError : function(group)

	{

		return this.validatorPartition(group)[0].findAll(function(validator)

		{

			return !validator.isValid;

		});

	},



	/**

	 * Update the summary of a particular group.

	 * If group is set, only the summary for validators in that 

	 * group is updated. Otherwhise only the summary for validators 

	 * without a group is updated.

	 * @function ?

	 * @param {optional string} group - ID of ValidationGroup

	 * @param {boolean} refresh - Wether the summary should be refreshed

	 */

	updateSummary : function(group, refresh)

	{

		var validators = this.getValidatorsWithError(group);

		this.summaries.each(function(summary)

		{

			var inGroup = group && summary.group == group;

			var noGroup = !group && !summary.group;

			if(inGroup || noGroup)

				summary.updateSummary(validators, refresh);

			else

				summary.hideSummary(true);

		});

	}

};



/**

 * TValidationSummary displays a summary of validation errors.

 * 

 * <p>The summary is displayed inline on a Web page,

 * in a message box, or both. By default, a validation summary will collect

 * <tt>ErrorMessage</tt> of all failed validators on the page. If

 * <tt>ValidationGroup</tt> is not empty, only those validators who belong

 * to the group will show their error messages in the summary.</p>

 *

 * <p>The summary can be displayed as a list, as a bulleted list, or as a single

 * paragraph based on the <tt>DisplayMode</tt> option.

 * The messages shown can be prefixed with <tt>HeaderText</tt>.</p>

 *

 * <p>The summary can be displayed on the Web page and in a message box by setting

 * the <tt>ShowSummary</tt> and <tt>ShowMessageBox</tt>

 * options, respectively.</p>

 * 

 * @class Prado.WebUI.TValidationSummary

 */

Prado.WebUI.TValidationSummary = Class.create();

Prado.WebUI.TValidationSummary.prototype =

{

	/**

	 * Initialize TValidationSummary.

	 * @constructor {protected} ?

	 * @param {object} options - Options for initialization

	 * @... {string} ID - ID of validation summary element

	 * @... {string} FormID - ID of form of this manager

	 * @... {optional string} ValidationGroup - ID of ValidationGroup.

	 * @... {optional boolean} ShowMessageBox - true to show the summary in an alert box.

	 * @... {optional boolean} ShowSummary - true to show the inline summary.

	 * @... {optional string} HeaderText - Summary header text

	 * @... {optional string} DisplayMode - Summary display style, 'BulletList', 'List', 'SingleParagraph'

	 * @... {optional boolean} Refresh - true to update the summary upon validator state change.

	 * @... {optional string} Display - Display mode, 'None', 'Fixed', 'Dynamic'.

	 * @... {optional boolean} ScrollToSummary - true to scroll to the validation summary upon refresh.

	 * @... {optional function} OnHideSummary - Called on hide event.

	 * @... {optional function} OnShowSummary - Called on show event.

	 */

	initialize : function(options)

	{

		/**

		 * Validator options

		 * @var {object} options 

		 */

		this.options = options;

		/**

		 * ValidationGroup

		 * @var {string} group

		 */

		this.group = options.ValidationGroup;

		/**

		 * Summary DOM element

		 * @var {element} messages

		 */

		this.messages = $(options.ID);

		if(this.messages)

		{

			/**

			 * Current visibility state of summary 

			 * @var {boolean} visible 

			 */

			this.visible = this.messages.style.visibility != "hidden"

			this.visible = this.visible && this.messages.style.display != "none";

			Prado.Validation.addSummary(options.FormID, this);

		}

	},



	/**

	 * Update the validation summary.

	 * @function ?

	 * @param {TBaseValidator[]} validators - List of validators that failed validation.

	 * @param {boolean} update - true if visible summary should be updated

	 */

	updateSummary : function(validators, update)

	{

		if(validators.length <= 0)

		{

			if(update || this.options.Refresh != false)

			{

				return this.hideSummary(validators);

			}

			return;

		}



		var refresh = update || this.visible == false || this.options.Refresh != false;

		// Also, do not refresh summary if at least 1 validator is waiting for callback response.

		// This will avoid the flickering of summary if the validator passes its test

		refresh = refresh && validators.any(function(v) { return !v.requestDispatched; });



		if(this.options.ShowSummary != false && refresh)

		{

			this.updateHTMLMessages(this.getMessages(validators));

			this.showSummary(validators);

		}



		if(this.options.ScrollToSummary != false && refresh)

			window.scrollTo(this.messages.offsetLeft-20, this.messages.offsetTop-20);



		if(this.options.ShowMessageBox == true && refresh)

		{

			this.alertMessages(this.getMessages(validators));

			this.visible = true;

		}

	},



	/**

	 * Display the validator error messages as inline HTML.

	 * @function ?

	 * @param {string[]} messages - Array of error messages.

	 */

	updateHTMLMessages : function(messages)

	{

		while(this.messages.childNodes.length > 0)

			this.messages.removeChild(this.messages.lastChild);

		this.messages.insert(this.formatSummary(messages));

	},



	/**

	 * Display the validator error messages as an alert box.

	 * @function ?

	 * @param {string[]} messages - Array of error messages.

	 */

	alertMessages : function(messages)

	{

		var text = this.formatMessageBox(messages);

		setTimeout(function(){ alert(text); },20);

	},



	/**

	 * Get messages from validators.

	 * @function {string[]} ? 

	 * @param {TBaseValidator[]} validators - Array of validators.

	 * @return Array of validator error messages.

	 */

	getMessages : function(validators)

	{

		var messages = [];

		validators.each(function(validator)

		{

			var message = validator.getErrorMessage();

			if(typeof(message) == 'string' && message.length > 0)

				messages.push(message);

		})

		return messages;

	},



	/**

	 * Hide the validation summary.

	 * @function ?

	 * @param {TBaseValidator[]} validators - Array of validators.

	 */

	hideSummary : function(validators)

	{	if(typeof(this.options.OnHideSummary) == "function")

		{

			this.messages.style.visibility="visible";

			this.options.OnHideSummary(this,validators)

		}

		else

		{

			this.messages.style.visibility="hidden";

			if(this.options.Display == "None" || this.options.Display == "Dynamic")

				this.messages.hide();

		}

		this.visible = false;

	},



	/**

	 * Shows the validation summary.

	 * @function ?

	 * @param {TBaseValidator[]} validators - Array of validators.

	 */

	showSummary : function(validators)

	{

		this.messages.style.visibility="visible";

		if(typeof(this.options.OnShowSummary) == "function")

			this.options.OnShowSummary(this,validators);

		else

			this.messages.show();

		this.visible = true;

	},



	/**

	 * Return the format parameters for the summary.

	 * @function {object} ?

	 * @param {string} type - Format type: "List", "SingleParagraph" or "BulletList" (default)

	 * @return Object with format parameters:

	 * @... {string} header - Text for header

	 * @... {string} first - Text to prepend before message list

	 * @... {string} pre - Text to prepend before each message

	 * @... {string} post - Text to append after each message

	 * @... {string} first - Text to append after message list

	 */

	formats : function(type)

	{

		switch(type)

		{

			case "SimpleList":

				return { header : "<br />", first : "", pre : "", post : "<br />", last : ""};

			case "SingleParagraph":

				return { header : " ", first : "", pre : "", post : " ", last : "<br />"};

			case "BulletList":

			default:

				return { header : "", first : "<ul>", pre : "<li>", post : "</li>", last : "</ul>"};

		}

	},



	/**

	 * Format the message summary.

	 * @function {string} ?

	 * @param {string[]} messages - Array of error messages.

	 * @return Formatted message

	 */

	formatSummary : function(messages)

	{

		var format = this.formats(this.options.DisplayMode);

		var output = this.options.HeaderText ? this.options.HeaderText + format.header : "";

		output += format.first;

		messages.each(function(message)

		{

			output += message.length > 0 ? format.pre + message + format.post : "";

		});

//		for(var i = 0; i < messages.length; i++)

	//		output += (messages[i].length>0) ? format.pre + messages[i] + format.post : "";

		output += format.last;

		return output;

	},

	/**

	 * Format the message alert box.

	 * @function {string} ?

	 * @param {string[]} messages - Array of error messages.

	 * @return Formatted message for alert

	 */

	formatMessageBox : function(messages)

	{

		var output = this.options.HeaderText ? this.options.HeaderText + "\n" : "";

		for(var i = 0; i < messages.length; i++)

		{

			switch(this.options.DisplayMode)

			{

				case "List":

					output += messages[i] + "\n";

					break;

				case "BulletList":

                default:

					output += "  - " + messages[i] + "\n";

					break;

				case "SingleParagraph":

					output += messages[i] + " ";

					break;

			}

		}

		return output;

	}

};



/**

 * TBaseValidator serves as the base class for validator controls.

 *

 * <p>Validation is performed when a postback control, such as a TButton,

 * a TLinkButton or a TTextBox (under AutoPostBack mode) is submitting

 * the page and its <tt>CausesValidation</tt> option is true.

 * The input control to be validated is specified by <tt>ControlToValidate</tt>

 * option.</p>

 * 

 * @class Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TBaseValidator = Class.create();

Prado.WebUI.TBaseValidator.prototype =

{

	/**

	 * Initialize TBaseValidator.

	 * @constructor {protected} ?

	 * @param {object} options - Options for initialization.

	 * @... {string} ID - ID of validator

	 * @... {string} FormID - ID of form of this manager.

	 * @... {string} ControlToValidate - ID of control to validate.

	 * @... {optional string} InitialValue - Initial value of control to validate.

	 * @... {optional string} ErrorMessage - Validation error message.

	 * @... {optional string} ValidationGroup - ID of ValidationGroup.

	 * @... {optional string} Display - Display mode, 'None', 'Fixed', 'Dynamic'.

	 * @... {optional boolean} ObserveChanges - True to observer changes of ControlToValidate

	 * @... {optional boolean} FocusOnError - True to focus on validation error.

	 * @... {optional string} FocusElementID - ID of element to focus on error.

	 * @... {optional string} ControlCssClass - Css class to use on ControlToValidate on error

	 * @... {optional function} OnValidate - Called immediately after validation.

	 * @... {optional function} OnValidationSuccess - Called after successful validation.

	 * @... {optional function} OnValidationError - Called after validation error.

	 */

	initialize : function(options)

	{

	/*	options.OnValidate = options.OnValidate || Prototype.emptyFunction;

		options.OnSuccess = options.OnSuccess || Prototype.emptyFunction;

		options.OnError = options.OnError || Prototype.emptyFunction;

	*/



		/**

		 * Wether the validator is enabled (default true)

		 * @var {boolean} enabled

		 */

		this.enabled = true;

		/**

		 * Visibility state of validator(default false)

		 * @var {boolean} visible

		 */

		this.visible = false;

		/**

		 * State of validation (default true)

		 * @var {boolean} isValid

		 */

		this.isValid = true;

		/**

		 * DOM elements that are observed by this validator

		 * @var {private element[]} _isObserving

		 */

		this._isObserving = {};

		/**

		 * ValidationGroup

		 * @var {string} group

		 */

		this.group = null;

		/**

		 * Wether a request was dispatched (default false)

		 * @var {boolean} requestDispatched

		 */

		this.requestDispatched = false;



		/**

		 * Validator options

		 * @var {object} options 

		 */

		this.options = options;

		/**

		 * DOM element of control to validate

		 * @var {element} control

		 */

		this.control = $(options.ControlToValidate);

		/**

		 * DOM element of validator

		 * @var {element} message

		 */

		this.message = $(options.ID);

		if(this.control && this.message)

		{

			this.group = options.ValidationGroup;



			/**

			 * ValidationManager of this validator

			 * @var {ValidationManager} manager

			 */

			this.manager = Prado.Validation.addValidator(options.FormID, this);

		}

	},



	/**

	 * Get error message.

	 * @function {string} ?

	 * @return Validation error message.

	 */

	getErrorMessage : function()

	{

		return this.options.ErrorMessage;

	},



	/**

	 * Update the validator.

	 * Updating the validator control will set the validator

	 * <tt>visible</tt> property to true.

	 * @function ?

	 */

	updateControl: function()

	{

		this.refreshControlAndMessage();



		//if(this.options.FocusOnError && !this.isValid )

		//	Prado.Element.focus(this.options.FocusElementID);



		this.visible = true;

	},



	/**

	 * Updates span and input CSS class.

	 * @function ?

	 */

	refreshControlAndMessage : function()

	{

		this.visible = true;

		if(this.message)

		{

			if(this.options.Display == "Dynamic")

			{

				var msg=this.message;

				this.isValid ? setTimeout(function() { msg.hide(); }, 250) : msg.show();

			}

			this.message.style.visibility = this.isValid ? "hidden" : "visible";

		}

		if(this.control)

			this.updateControlCssClass(this.control, this.isValid);

	},



	/**

	 * Update CSS class of control to validate.

	 * Add a css class to the input control if validator is invalid,

	 * removes the css class if valid.

	 * @function ?

	 * @param {element} control - DOM element of control to validate

	 * @param {boolean} valid - Validation state of control

	 */

	updateControlCssClass : function(control, valid)

	{

		var CssClass = this.options.ControlCssClass;

		if(typeof(CssClass) == "string" && CssClass.length > 0)

		{

			if(valid)

			{

				if (control.lastValidator == this.options.ID)

				{

					control.lastValidator = null;

					control.removeClassName(CssClass);

				}

			}

			else

			{

				control.lastValidator = this.options.ID;

				control.addClassName(CssClass);

			}

		}

	},



	/**

	 * Hide the validator messages and remove any validation changes.

	 * @function ?

	 */

	hide : function()

	{

		this.reset();

		this.visible = false;

	},



	/**

	 * Reset validator.

	 * Sets isValid = true and updates the validator display.

	 * @function ?

	 */

	reset : function()

	{

		this.isValid = true;

		this.updateControl();

	},



	/**

	 * Perform validation.

	 * Calls evaluateIsValid() function to set the value of isValid property.

	 * Triggers onValidate event and onSuccess or onError event.

	 * @function {boolean} ?

	 * @param {element} invoker - DOM element that triggered validation

	 * @return Valdation state of control.

	 */

	validate : function(invoker)

	{

		//try to find the control.

		if(!this.control)

			this.control = $(this.options.ControlToValidate);



		if(!this.control || this.control.disabled)

		{

			this.isValid = true;

			return this.isValid;

		}



		if(typeof(this.options.OnValidate) == "function")

		{

			if(this.requestDispatched == false)

				this.options.OnValidate(this, invoker);

		}



		if(this.enabled && !this.control.getAttribute('disabled'))

			this.isValid = this.evaluateIsValid();

		else

			this.isValid = true;



		this.updateValidationDisplay(invoker);

		this.observeChanges(this.control);



		return this.isValid;

	},



	/**

	 * Update validation display.

	 * Updates the validation messages and the control to validate.

	 * @param {element} invoker - DOM element that triggered validation

	 */

	updateValidationDisplay : function(invoker)

	{

		if(this.isValid)

		{

			if(typeof(this.options.OnValidationSuccess) == "function")

			{

				if(this.requestDispatched == false)

				{

					this.refreshControlAndMessage();

					this.options.OnValidationSuccess(this, invoker);

				}

			}

			else

				this.updateControl();

		}

		else

		{

			if(typeof(this.options.OnValidationError) == "function")

			{

				if(this.requestDispatched == false)

				{

					this.refreshControlAndMessage();

					this.options.OnValidationError(this, invoker)

				}

			}

			else

				this.updateControl();

		}

	},



	/**

	 * Add control to observe for changes.

	 * Re-validates upon change. If the validator is not visible, 

	 * no updates are propagated.

	 * @function ?

	 * @param {element} control - DOM element of control to observe

	 */

	observeChanges : function(control)

	{

		if(!control) return;



		var canObserveChanges = this.options.ObserveChanges != false;

		var currentlyObserving = this._isObserving[control.id+this.options.ID];



		if(canObserveChanges && !currentlyObserving)

		{

			var validator = this;



			Event.observe(control, 'change', function()

			{

				if(validator.visible)

				{

					validator.validate();

					validator.manager.updateSummary(validator.group);

				}

			});

			this._isObserving[control.id+this.options.ID] = true;

		}

	},



	/**

	 * Trim a string.

	 * @function {string} ?

	 * @param {string} value - String that should be trimmed.

	 * @return Trimmed string, empty string if value is not string.

	 */

	trim : function(value)

	{

		return typeof(value) == "string" ? value.trim() : "";

	},



	/**

	 * Convert the value to a specific data type.

	 * @function {mixed|null} ?

	 * @param {string} dataType - Data type: "Integer", "Double", "Date" or "String"

	 * @param {mixed} value - Value to convert.

	 * @return Converted data value.

	 */

	convert : function(dataType, value)

	{

		if(typeof(value) == "undefined")

			value = this.getValidationValue();

		var string = new String(value);

		switch(dataType)

		{

			case "Integer":

				return string.toInteger();

			case "Double" :

			case "Float" :

				return string.toDouble(this.options.DecimalChar);

			case "Date":

				if(typeof(value) != "string")

					return value;

				else

				{

					var value = string.toDate(this.options.DateFormat);

					if(value && typeof(value.getTime) == "function")

						return value.getTime();

					else

						return null;

				}

			case "String":

				return string.toString();

		}

		return value;

	},



	/**

	 * Get value that should be validated.

	 * The ControlType property comes from TBaseValidator::getClientControlClass()

	 * Be sure to update the TBaseValidator::$_clientClass if new cases are added.

	 * @function {mixed} ?

	 * @param {optional element} control - Control to get value from (default: this.control) 

	 * @return Control value to validate

	 */

	 getValidationValue : function(control)

	 {

	 	if(!control)

	 		control = this.control

	 	switch(this.options.ControlType)

	 	{

	 		case 'TDatePicker':

	 			if(control.type == "text")

	 			{

	 				value = this.trim($F(control));



					if(this.options.DateFormat)

	 				{

	 					date = value.toDate(this.options.DateFormat);

	 					return date == null ? value : date;

	 				}

	 				else

		 				return value;

	 			}

	 			else

	 			{

	 				this.observeDatePickerChanges();



	 				return Prado.WebUI.TDatePicker.getDropDownDate(control);//.getTime();

	 			}

	 		case 'THtmlArea':

	 			if(typeof tinyMCE != "undefined")

					tinyMCE.triggerSave();

				return this.trim($F(control));

			case 'TRadioButton':

				if(this.options.GroupName)

					return this.getRadioButtonGroupValue();

	 		default:

	 			if(this.isListControlType())

	 				return this.getFirstSelectedListValue();

	 			else

		 			return this.trim($F(control));

	 	}

	 },



	/**

	 * Get value of radio button group

	 * @function {string} ?

	 * @return Value of a radio button group

	 */

	getRadioButtonGroupValue : function()

	{

		name = this.control.name;

		value = "";

		$A(document.getElementsByName(name)).each(function(el)

		{

			if(el.checked)

				value =  el.value;

		});

		return value;

	},



	 /**

	  * Observe changes in the drop down list date picker, IE only.

	  * @function ?

	  */

	 observeDatePickerChanges : function()

	 {

	 	if(Prado.Browser().ie)

	 	{

	 		var DatePicker = Prado.WebUI.TDatePicker;

	 		this.observeChanges(DatePicker.getDayListControl(this.control));

			this.observeChanges(DatePicker.getMonthListControl(this.control));

			this.observeChanges(DatePicker.getYearListControl(this.control));

	 	}

	 },



	/**

	 * Gets number of selections and their values.

	 * @function {object} ?

	 * @param {element[]} elements - Elements to get values from.

	 * @param {string} initialValue - Initial value of element

	 * @return Object:

	 * @... {mixed[]} values - Array of selected values

	 * @... {int} checks - Number of selections

	 */

	getSelectedValuesAndChecks : function(elements, initialValue)

	{

		var checked = 0;

		var values = [];

		var isSelected = this.isCheckBoxType(elements[0]) ? 'checked' : 'selected';

		elements.each(function(element)

		{

			if(element[isSelected] && element.value != initialValue)

			{

				checked++;

				values.push(element.value);

			}

		});

		return {'checks' : checked, 'values' : values};

	},



	/**

	 * Get list elements of TCheckBoxList or TListBox.

	 * Gets an array of the list control item input elements, for TCheckBoxList

	 * checkbox input elements are returned, for TListBox HTML option elements 

	 * are returned.

	 * @function {element[]} ?

	 * @return Array of list control option DOM elements.

	 */

	getListElements : function()

	{

		switch(this.options.ControlType)

		{

			case 'TCheckBoxList': case 'TRadioButtonList':

				var elements = [];

				for(var i = 0; i < this.options.TotalItems; i++)

				{

					var element = $(this.options.ControlToValidate+"_c"+i);

					if(this.isCheckBoxType(element))

						elements.push(element);

				}

				return elements;

			case 'TListBox':

				var elements = [];

				var element = $(this.options.ControlToValidate);

				if(element && (type = element.type.toLowerCase()))

				{

					if(type == "select-one" || type == "select-multiple")

						elements = $A(element.options);

				}

				return elements;

			default:

				return [];

		}

	},



	/**

	 * Check if control is of type checkbox or radio.

	 * @function {boolean} ?

	 * @param {element} element - DOM element to check.

	 * @return True if element is of checkbox or radio type.

	 */

	isCheckBoxType : function(element)

	{

		if(element && element.type)

		{

			var type = element.type.toLowerCase();

			return type == "checkbox" || type == "radio";

		}

		return false;

	},



	/**

	 * Check if control to validate is a TListControl type.

	 * @function {boolean} ?

	 * @return True if control to validate is a TListControl type.

	 */

	isListControlType : function()

	{

		var list = ['TCheckBoxList', 'TRadioButtonList', 'TListBox'];

		return list.include(this.options.ControlType);

	},



	/**

	 * Get first selected list value or initial value if none found.

	 * @function {string} ?

	 * @return First selected list value, initial value if none found.

	 */

	getFirstSelectedListValue : function()

	{

		var initial = "";

		if(typeof(this.options.InitialValue) != "undefined")

			initial = this.options.InitialValue;

		var elements = this.getListElements();

		var selection = this.getSelectedValuesAndChecks(elements, initial);

		return selection.values.length > 0 ? selection.values[0] : initial;

	}

}





/**

 * TRequiredFieldValidator makes the associated input control a required field.

 * 

 * <p>The input control fails validation if its value does not change from

 * the <tt>InitialValue</tt> option upon losing focus.</p>

 * 

 * @class Prado.WebUI.TRequiredFieldValidator

 * @extends Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TRequiredFieldValidator = Class.extend(Prado.WebUI.TBaseValidator,

{

	/**

	 * Evaluate validation state

	 * @function {boolean} ?

	 * @return True if the input value is not empty nor equal to the initial value.

	 */

	evaluateIsValid : function()

	{

    	var a = this.getValidationValue();

    	var b = this.trim(this.options.InitialValue);

    	return(a != b);

	}

});





/**

 * TCompareValidator compares the value entered by the user into an input

 * control with the value entered into another input control or a constant value.

 * 

 * <p>To compare the associated input control with another input control,

 * set the <tt>ControlToCompare</tt> option to the ID path

 * of the control to compare with. To compare the associated input control with

 * a constant value, specify the constant value to compare with by setting the

 * <tt>ValueToCompare</tt> option.</p>

 *

 * <p>The <tt>DataType</tt> property is used to specify the data type

 * of both comparison values. Both values are automatically converted to this data

 * type before the comparison operation is performed. The following value types are supported:

 * - <b>Integer</b> A 32-bit signed integer data type.

 * - <b>Float</b> A double-precision floating point number data type.

 * - <b>Date</b> A date data type. The format can be set by the <tt>DateFormat</tt> option.

 * - <b>String</b> A string data type.</p>

 *

 * Use the <tt>Operator</tt> property to specify the type of comparison

 * to perform. Valid operators include Equal, NotEqual, GreaterThan, GreaterThanEqual,

 * LessThan and LessThanEqual.

 * 

 * @class Prado.WebUI.TCompareValidator

 * @extends Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TCompareValidator = Class.extend(Prado.WebUI.TBaseValidator,

{

	/**

	 * Additional constructor options.

	 * @constructor initialize

	 * @param {object} options - Additional constructor options:

	 * @... {string} ControlToCompare - Control with compare value.

	 * @... {string} ValueToCompare - Value to compare.

	 * @... {string} Operator - Type of comparison: "Equal", "NotEqual", "GreaterThan",

	 *   "GreaterThanEqual", "LessThan" or "LessThanEqual".

	 * @... {string} Type - Type of values: "Integer", "Float", "Date" or "String".

	 * @... {string} DateFormat - Valid date format.

	 */



	//_observingComparee : false,



	/**

	 * Evaluate validation state

	 * @function {boolean} ?

	 * @return True if comparision condition is met.

	 */

	evaluateIsValid : function()

	{

		var value = this.getValidationValue();

	    if (value.length <= 0)

	    	return true;



    	var comparee = $(this.options.ControlToCompare);



		if(comparee)

			var compareTo = this.getValidationValue(comparee);

		else

			var compareTo = this.options.ValueToCompare || "";



	    var isValid =  this.compare(value, compareTo);



		if(comparee)

		{

			this.updateControlCssClass(comparee, isValid);

			this.observeChanges(comparee);

		}

		return isValid;

	},



	/**

	 * Compare two operands.

	 * The operand values are casted to type defined

	 * by <tt>DataType</tt> option. False is returned if the first

	 * operand converts to null. Returns true if the second operand

	 * converts to null. The comparision is done based on the

	 * <tt>Operator</tt> option.

	 * @function ?

	 * @param {mixed} operand1 - First operand.

	 * @param {mixed} operand2 - Second operand.

	 */

	compare : function(operand1, operand2)

	{

		var op1, op2;

		if((op1 = this.convert(this.options.DataType, operand1)) == null)

			return false;

		if ((op2 = this.convert(this.options.DataType, operand2)) == null)

        	return true;

    	switch (this.options.Operator)

		{

	        case "NotEqual":

	            return (op1 != op2);

	        case "GreaterThan":

	            return (op1 > op2);

	        case "GreaterThanEqual":

	            return (op1 >= op2);

	        case "LessThan":

	            return (op1 < op2);

	        case "LessThanEqual":

	            return (op1 <= op2);

	        default:

	            return (op1 == op2);

	    }

	}

});



/**

 * TCustomValidator performs user-defined client-side validation on an

 * input component.

 *

 * <p>To create a client-side validation function, add the client-side

 * validation javascript function to the page template.

 * The function should have the following signature:</p>

 * 

 * <pre>

 * &lt;script type="text/javascript"&gt;

 * function ValidationFunctionName(sender, parameter)

 * {

 *    if(parameter == ...)

 *       return true;

 *    else

 *       return false;

 * }

 * &lt;/script&gt;

 * </pre>

 * 

 * <p>Use the <tt>ClientValidationFunction</tt> option

 * to specify the name of the client-side validation script function associated

 * with the TCustomValidator.</p>

 * 

 * @class Prado.WebUI.TCustomValidator

 * @extends Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TCustomValidator = Class.extend(Prado.WebUI.TBaseValidator,

{

	/**

	 * Additional constructor options.

	 * @constructor initialize

	 * @param {object} options - Additional constructor options:

	 * @... {function} ClientValidationFunction - Custom validation function.

	 */



	/**

	 * Evaluate validation state

	 * Returns true if no valid custom validation function is present.

	 * @function {boolean} ?

	 * @return True if custom validation returned true.

	 */

	evaluateIsValid : function()

	{

		var value = this.getValidationValue();

		var clientFunction = this.options.ClientValidationFunction;

		if(typeof(clientFunction) == "string" && clientFunction.length > 0)

		{

			validate = clientFunction.toFunction();

			return validate(this, value);

		}

		return true;

	}

});



/**

 * Uses callback request to perform validation.

 * 

 * @class Prado.WebUI.TActiveCustomValidator

 * @extends Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TActiveCustomValidator = Class.extend(Prado.WebUI.TBaseValidator,

{

	/**

	 * Value to validate

	 * @var {string} validatingValue

	 */

	validatingValue : null,

	/**

	 * DOM element that triggered validation

	 * @var {element} invoker

	 */

	invoker : null,



	/**

	 * Override the parent implementation to store the invoker, in order to

	 * re-validate after the callback has returned

	 * Calls evaluateIsValid() function to set the value of isValid property.

	 * Triggers onValidate event and onSuccess or onError event.

	 * @function {boolean} ?

	 * @param {element} invoker - DOM element that triggered validation

	 * @return True if valid.

	 */

	validate : function(invoker)

	{

		this.invoker = invoker;



		//try to find the control.

		if(!this.control)

			this.control = $(this.options.ControlToValidate);



		if(!this.control || this.control.disabled)

		{

			this.isValid = true;

			return this.isValid;

		}



		if(typeof(this.options.OnValidate) == "function")

		{

			if(this.requestDispatched == false)

				this.options.OnValidate(this, invoker);

		}



		if(this.enabled && !this.control.getAttribute('disabled'))

			this.isValid = this.evaluateIsValid();

		else

			this.isValid = true;



		// Only update the message if the callback has already return !

		if (!this.requestDispatched)

			this.updateValidationDisplay(invoker);



		this.observeChanges(this.control);



		return this.isValid;

	},



	/**

	 * Send CallBack to start serverside validation.

	 * @function {boolean} ?

	 * @return True if valid.

	 */

	evaluateIsValid : function()

	{

		value = this.getValidationValue();

		if(!this.requestDispatched && (""+value) != (""+this.validatingValue))

		{

			this.validatingValue = value;

			request = new Prado.CallbackRequest(this.options.EventTarget, this.options);

			if(this.options.DateFormat && value instanceof Date) //change date to string with formatting.

				value = value.SimpleFormat(this.options.DateFormat);

			request.setCallbackParameter(value);

			request.setCausesValidation(false);

			request.options.onSuccess = this.callbackOnSuccess.bind(this);

			request.options.onFailure = this.callbackOnFailure.bind(this);

			request.dispatch();

			this.requestDispatched = true;

			return false;

		}

		return this.isValid;

	},



	/**

	 * Parse CallBack response data on success.

	 * @function ?

	 * @param {CallbackRequest} request - CallbackRequest.

	 * @param {string} data - Response data.

	 */

	callbackOnSuccess : function(request, data)

	{

		this.isValid = data;

		this.requestDispatched = false;

		if(typeof(this.options.onSuccess) == "function")

			this.options.onSuccess(request,data);

		this.updateValidationDisplay();

		this.manager.updateSummary(this.group);

		// Redispatch initial request if any

		if (this.invoker instanceof Prado.CallbackRequest)

		{

			this.invoker.dispatch();

		}



	},



	/**

	 * Handle callback failure.

	 * @function ?

	 * @param {CallbackRequest} request - CallbackRequest.

	 * @param {string} data - Response data.

	 */

	callbackOnFailure : function(request, data)

	{

		this.requestDispatched = false;

		if(typeof(this.options.onFailure) == "function")

			this.options.onFailure(request,data);

	}

});



/**

 * TRangeValidator tests whether an input value is within a specified range.

 *

 * <p>TRangeValidator uses three key properties to perform its validation.</p>

 * 

 * <p>The <tt>MinValue</tt> and <tt>MaxValue</tt> options specify the minimum

 * and maximum values of the valid range.</p> 

 * <p>The <tt>DataType</tt> option is

 * used to specify the data type of the value and the minimum and maximum range values.

 * The values are converted to this data type before the validation

 * operation is performed. The following value types are supported:</p>

 * 

 * - <b>Integer</b> A 32-bit signed integer data type.<br />

 * - <b>Float</b> A double-precision floating point number data type.<br />

 * - <b>Date</b> A date data type. The date format can be specified by<br />

 *   setting <tt>DateFormat</tt> option, which must be recognizable

 *   by <tt>Date.SimpleParse</tt> javascript function.

 * - <b>String</b> A string data type.

 * 

 * @class Prado.WebUI.TRangeValidator

 * @extends Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TRangeValidator = Class.extend(Prado.WebUI.TBaseValidator,

{

	/**

	 * Additional constructor options.

	 * @constructor initialize

	 * @param {object} options - Additional constructor options:

	 * @... {string} MinValue - Minimum range value

	 * @... {string} MaxValue - Maximum range value

	 * @... {string} DataType - Value data type: "Integer", "Float", "Date" or "String"

	 * @... {string} DateFormat - Date format for data type Date.

	 */



	/**

	 * Evaluate validation state

	 * @function {boolean} ?

	 * @return True if value is in range or value is empty, 

	 * false otherwhise and when type conversion failed.

	 */

	evaluateIsValid : function()

	{

		var value = this.getValidationValue();

		if(value.length <= 0)

			return true;

		if(typeof(this.options.DataType) == "undefined")

			this.options.DataType = "String";



		if(this.options.DataType != "StringLength")

		{

			var min = this.convert(this.options.DataType, this.options.MinValue || null);

			var max = this.convert(this.options.DataType, this.options.MaxValue || null);

			value = this.convert(this.options.DataType, value);

		}

		else

		{

			var min = this.options.MinValue || 0;

			var max = this.options.MaxValue || Number.POSITIVE_INFINITY;

			value = value.length;

		}



		if(value == null)

			return false;



		var valid = true;



		if(min != null)

			valid = valid && (this.options.StrictComparison ? value > min : value >= min);

		if(max != null)

			valid = valid && (this.options.StrictComparison ? value < max : value <= max);

		return valid;

	}

});



/**

 * TRegularExpressionValidator validates whether the value of an associated

 * input component matches the pattern specified by a regular expression.

 * 

 * @class Prado.WebUI.TRegularExpressionValidator

 * @extends Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TRegularExpressionValidator = Class.extend(Prado.WebUI.TBaseValidator,

{

	/**

	 * Additional constructor option.

	 * @constructor initialize

	 * @param {object} options - Additional constructor option:

	 * @... {string} ValidationExpression - Regular expression to match against.

	 * @... {string} PatternModifiers - Pattern modifiers: combinations of g, i, and m

	 */



	/**

	 * Evaluate validation state

	 * @function {boolean} ?

	 * @return True if value matches regular expression or value is empty. 

	 */

	evaluateIsValid : function()

	{

		var value = this.getValidationValue();

		if (value.length <= 0)

	    	return true;



		var rx = new RegExp(this.options.ValidationExpression,this.options.PatternModifiers);

		var matches = rx.exec(value);

		return (matches != null && value == matches[0]);

	}

});



/**

 * TEmailAddressValidator validates whether the value of an associated

 * input component is a valid email address.

 * 

 * @class Prado.WebUI.TEmailAddressValidator

 * @extends Prado.WebUI.TRegularExpressionValidator

 */

Prado.WebUI.TEmailAddressValidator = Prado.WebUI.TRegularExpressionValidator;





/**

 * TListControlValidator checks the number of selection and their values

 * for a TListControl that allows multiple selections.

 * 

 * @class Prado.WebUI.TListControlValidator

 * @extends Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TListControlValidator = Class.extend(Prado.WebUI.TBaseValidator,

{

	/**

	 * Evaluate validation state

	 * @function {boolean} ?

	 * @return True if number of selections and/or their values match requirements. 

	 */

	evaluateIsValid : function()

	{

		var elements = this.getListElements();

		if(elements && elements.length <= 0)

			return true;



		this.observeListElements(elements);



		var selection = this.getSelectedValuesAndChecks(elements);

		return this.isValidList(selection.checks, selection.values);

	},



	/**

	 * Observe list elements for of changes (only IE)

	 * @function ?

	 * @param {element[]} elements - Array of DOM elements to observe

	 */

	 observeListElements : function(elements)

	 {

		if(Prado.Browser().ie && this.isCheckBoxType(elements[0]))

		{

			var validator = this;

			elements.each(function(element)

			{

				validator.observeChanges(element);

			});

		}

	 },



	/**

	 * Check if list is valid.

	 * Determine if the number of checked values and the checked values

	 * satisfy the required number of checks and/or the checked values

	 * equal to the required values.

	 * @function {boolean} ?

	 * @param {int} checked - Number of required checked values

	 * @param {string[]} values - Array of required checked values

	 * @return True if checked values and number of checks are satisfied.

	 */

	isValidList : function(checked, values)

	{

		var exists = true;



		//check the required values

		var required = this.getRequiredValues();

		if(required.length > 0)

		{

			if(values.length < required.length)

				return false;

			required.each(function(requiredValue)

			{

				exists = exists && values.include(requiredValue);

			});

		}



		var min = typeof(this.options.Min) == "undefined" ?

					Number.NEGATIVE_INFINITY : this.options.Min;

		var max = typeof(this.options.Max) == "undefined" ?

					Number.POSITIVE_INFINITY : this.options.Max;

		return exists && checked >= min && checked <= max;

	},



	/**

	 * Get list of required values.

	 * @function {string[]} ?

	 * @return Array of required values that must be selected.

	 */

	getRequiredValues : function()

	{

		var required = [];

		if(this.options.Required && this.options.Required.length > 0)

			required = this.options.Required.split(/,\s*/);

		return required;

	}

});





/**

 * TDataTypeValidator verifies if the input data is of the type specified

 * by <tt>DataType</tt> option.

 * 

 * <p>The following data types are supported:</p>

 * 

 * - <b>Integer</b> A 32-bit signed integer data type.<br />

 * - <b>Float</b> A double-precision floating point number data type.<br />

 * - <b>Date</b> A date data type.<br />

 * - <b>String</b> A string data type.<br />

 * 

 * <p>For <b>Date</b> type, the option <tt>DateFormat</tt>

 * will be used to determine how to parse the date string.</p>

 * 

 * @class Prado.WebUI.TDataTypeValidator

 * @extends Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TDataTypeValidator = Class.extend(Prado.WebUI.TBaseValidator,

{

	/**

	 * Additional constructor option.

	 * @constructor initialize

	 * @param {object} options - Additional constructor option:

	 * @... {string} DataType - Value data type: "Integer", "Float", "Date" or "String"

	 * @... {string} DateFormat - Date format for data type Date.

	 */



	/**

	 * Evaluate validation state

	 * @function {boolean} ?

	 * @return True if value matches required data type. 

	 */

	evaluateIsValid : function()

	{

		value = this.getValidationValue();

		if(value.length <= 0)

			return true;

		return this.convert(this.options.DataType, value) != null;

	}

});



/**

 * TCaptchaValidator verifies if the input data is the same as 

 * the token shown in the associated CAPTCHA control.

 * 

 * @class Prado.WebUI.TCaptchaValidator

 * @extends Prado.WebUI.TBaseValidator

 */

Prado.WebUI.TCaptchaValidator = Class.extend(Prado.WebUI.TBaseValidator,

{

	/**

	 * Evaluate validation state

	 * @function {boolean} ?

	 * @return True if value matches captcha text 

	 */

	evaluateIsValid : function()

	{

		var a = this.getValidationValue();

		var h = 0;

		if (this.options.CaseSensitive==false)

			a = a.toUpperCase();

		for(var i = a.length-1; i >= 0; --i)

			h += a.charCodeAt(i);

		return h == this.options.TokenHash;

	},



	crc32 : function(str)

	{

	    function Utf8Encode(string)

		{

	        string = string.replace(/\r\n/g,"\n");

	        var utftext = "";



	        for (var n = 0; n < string.length; n++)

			{

	            var c = string.charCodeAt(n);



	            if (c < 128) {

	                utftext += String.fromCharCode(c);

	            }

	            else if((c > 127) && (c < 2048)) {

	                utftext += String.fromCharCode((c >> 6) | 192);

	                utftext += String.fromCharCode((c & 63) | 128);

	            }

	            else {

	                utftext += String.fromCharCode((c >> 12) | 224);

	                utftext += String.fromCharCode(((c >> 6) & 63) | 128);

	                utftext += String.fromCharCode((c & 63) | 128);

	            }

	        }



	        return utftext;

	    };



	    str = Utf8Encode(str);



	    var table = "00000000 77073096 EE0E612C 990951BA 076DC419 706AF48F E963A535 9E6495A3 0EDB8832 79DCB8A4 E0D5E91E 97D2D988 09B64C2B 7EB17CBD E7B82D07 90BF1D91 1DB71064 6AB020F2 F3B97148 84BE41DE 1ADAD47D 6DDDE4EB F4D4B551 83D385C7 136C9856 646BA8C0 FD62F97A 8A65C9EC 14015C4F 63066CD9 FA0F3D63 8D080DF5 3B6E20C8 4C69105E D56041E4 A2677172 3C03E4D1 4B04D447 D20D85FD A50AB56B 35B5A8FA 42B2986C DBBBC9D6 ACBCF940 32D86CE3 45DF5C75 DCD60DCF ABD13D59 26D930AC 51DE003A C8D75180 BFD06116 21B4F4B5 56B3C423 CFBA9599 B8BDA50F 2802B89E 5F058808 C60CD9B2 B10BE924 2F6F7C87 58684C11 C1611DAB B6662D3D 76DC4190 01DB7106 98D220BC EFD5102A 71B18589 06B6B51F 9FBFE4A5 E8B8D433 7807C9A2 0F00F934 9609A88E E10E9818 7F6A0DBB 086D3D2D 91646C97 E6635C01 6B6B51F4 1C6C6162 856530D8 F262004E 6C0695ED 1B01A57B 8208F4C1 F50FC457 65B0D9C6 12B7E950 8BBEB8EA FCB9887C 62DD1DDF 15DA2D49 8CD37CF3 FBD44C65 4DB26158 3AB551CE A3BC0074 D4BB30E2 4ADFA541 3DD895D7 A4D1C46D D3D6F4FB 4369E96A 346ED9FC AD678846 DA60B8D0 44042D73 33031DE5 AA0A4C5F DD0D7CC9 5005713C 270241AA BE0B1010 C90C2086 5768B525 206F85B3 B966D409 CE61E49F 5EDEF90E 29D9C998 B0D09822 C7D7A8B4 59B33D17 2EB40D81 B7BD5C3B C0BA6CAD EDB88320 9ABFB3B6 03B6E20C 74B1D29A EAD54739 9DD277AF 04DB2615 73DC1683 E3630B12 94643B84 0D6D6A3E 7A6A5AA8 E40ECF0B 9309FF9D 0A00AE27 7D079EB1 F00F9344 8708A3D2 1E01F268 6906C2FE F762575D 806567CB 196C3671 6E6B06E7 FED41B76 89D32BE0 10DA7A5A 67DD4ACC F9B9DF6F 8EBEEFF9 17B7BE43 60B08ED5 D6D6A3E8 A1D1937E 38D8C2C4 4FDFF252 D1BB67F1 A6BC5767 3FB506DD 48B2364B D80D2BDA AF0A1B4C 36034AF6 41047A60 DF60EFC3 A867DF55 316E8EEF 4669BE79 CB61B38C BC66831A 256FD2A0 5268E236 CC0C7795 BB0B4703 220216B9 5505262F C5BA3BBE B2BD0B28 2BB45A92 5CB36A04 C2D7FFA7 B5D0CF31 2CD99E8B 5BDEAE1D 9B64C2B0 EC63F226 756AA39C 026D930A 9C0906A9 EB0E363F 72076785 05005713 95BF4A82 E2B87A14 7BB12BAE 0CB61B38 92D28E9B E5D5BE0D 7CDCEFB7 0BDBDF21 86D3D2D4 F1D4E242 68DDB3F8 1FDA836E 81BE16CD F6B9265B 6FB077E1 18B74777 88085AE6 FF0F6A70 66063BCA 11010B5C 8F659EFF F862AE69 616BFFD3 166CCF45 A00AE278 D70DD2EE 4E048354 3903B3C2 A7672661 D06016F7 4969474D 3E6E77DB AED16A4A D9D65ADC 40DF0B66 37D83BF0 A9BCAE53 DEBB9EC5 47B2CF7F 30B5FFE9 BDBDF21C CABAC28A 53B39330 24B4A3A6 BAD03605 CDD70693 54DE5729 23D967BF B3667A2E C4614AB8 5D681B02 2A6F2B94 B40BBE37 C30C8EA1 5A05DF1B 2D02EF8D";

		var crc = 0;

	    var x = 0;

	    var y = 0;



	    crc = crc ^ (-1);

	    for( var i = 0, iTop = str.length; i < iTop; i++ )

		{

	        y = ( crc ^ str.charCodeAt( i ) ) & 0xFF;

	        x = "0x" + table.substr( y * 9, 8 );

	        crc = ( crc >>> 8 ) ^ x;

	    }

	    return crc ^ (-1);

	}

});