packages feed

rest-gen (empty) → 0.9.0.2

raw patch · 30 files changed

+8721/−0 lines, 30 filesdep +Cabaldep +HStringTemplatedep +HUnitsetup-changed

Dependencies added: Cabal, HStringTemplate, HUnit, aeson, aeson-utils, attoparsec, base, blaze-html, bytestring, code-builder, containers, directory, fclabels, filepath, generic-aeson, happstack-server, hslogger, hxt, json-schema, mtl, pretty, process, regular, rest-core, rest-gen, rest-types, safe, split, tagged, test-framework, test-framework-hunit, text, unordered-containers, utf8-string, vector

Files

+ LICENSE view
@@ -0,0 +1,30 @@+Copyright (c) 2014, Silk++All rights reserved.++Redistribution and use in source and binary forms, with or without+modification, are permitted provided that the following conditions are met:++    * Redistributions of source code must retain the above copyright+      notice, this list of conditions and the following disclaimer.++    * Redistributions in binary form must reproduce the above+      copyright notice, this list of conditions and the following+      disclaimer in the documentation and/or other materials provided+      with the distribution.++    * Neither the name of Silk nor the names of other+      contributors may be used to endorse or promote products derived+      from this software without specific prior written permission.++THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS+"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT+LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR+A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT+OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,+SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT+LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,+DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY+THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT+(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE+OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ Setup.hs view
@@ -0,0 +1,2 @@+import Distribution.Simple+main = defaultMain
+ files/Docs/api-docs-all.st view
@@ -0,0 +1,32 @@+<html>+  <head>+    <title>Silk API Documentation version $version$</title>+    <link rel="stylesheet" type="text/css" href="$static$/bootstrap.min.css">+    <link rel="stylesheet" type="text/css" href="$static$/prettify.css">+    <link rel="stylesheet" type="text/css" href="$static$/docs.css">+    <script type="text/javascript" src="$static$/jquery-nightly.js"></script>+    <script type="text/javascript" src="$static$/bootstrap-modal.js"></script>+    <script type="text/javascript" src="$static$/prettify.js"></script>+    <script type="text/javascript" src="$static$/docs.js"></script>+  </head>+  <body>+    <div class="container-fluid">+      <div class="sidebar">+        <p>Silk API $version$</p>+        <div class="page-header">+          <h1>Resources</h1>+        </div>+        <ul>+          <li>+          $listing; separator="</li><li>"$+          </li>+        </ul>+      </div>+      <div class="content">+        +        <br/><br/>  +        $resources$+      </div>+    </div>+  </body>+</html>
+ files/Docs/api-docs-resource.st view
@@ -0,0 +1,51 @@+<html>+  <head>+    <title>Silk API Documentation version $version$ for $resource; separator="/"$ </title>+    <link rel="stylesheet" type="text/css" href="$static$/bootstrap.min.css">+    <link rel="stylesheet" type="text/css" href="$static$/prettify.css">+    <link rel="stylesheet" type="text/css" href="$static$/docs.css">+    <script type="text/javascript" src="$static$/jquery-nightly.js"></script>+    <script type="text/javascript" src="$static$/bootstrap-modal.js"></script>+    <script type="text/javascript" src="$static$/prettify.js"></script>+    <script type="text/javascript" src="$static$/docs.js"></script>+  </head>+  <body>+    <div class="container-fluid">+      <div class="sidebar">+        <p>Silk API $version$</p>+        <div class="page-header">+          <h1>Navigation</h1>+        </div>+        <h3>Context</h3> $parents; separator="<span class=\"parent-separator\">></span>"$+        <h3>Sub-resources</h3>          +        <div class="span8">+          <ul>+            <li>$subresources; separator="</li><li>"$</li>+          </ul>+        </div>+      </div>+      <div class="content">+        <div class="row pageHeader resource-title"> +          <div class="span16">+            <h1>$resource; separator="/"$</h1>+          </div>+        </div>+        <div class="row">+          <div class="span8">+            <h2>Description</h2>+            <p>$description$</p>+          </div>+          <div class="span8">+            <h2>Identifiers</h2>+            <p>$identifiers; separator="<br/>"$</p>+          </div>+        </div>+        <div class="row">+          <div class="span16">+            $urls$+          </div>+        </div>+      </div>+    </div>  +  </body>+</html>
+ files/Docs/bootstrap-modal.js view
@@ -0,0 +1,260 @@+/* =========================================================+ * bootstrap-modal.js v1.4.0+ * http://twitter.github.com/bootstrap/javascript.html#modal+ * =========================================================+ * Copyright 2011 Twitter, Inc.+ *+ * Licensed under the Apache License, Version 2.0 (the "License");+ * you may not use this file except in compliance with the License.+ * You may obtain a copy of the License at+ *+ * http://www.apache.org/licenses/LICENSE-2.0+ *+ * Unless required by applicable law or agreed to in writing, software+ * distributed under the License is distributed on an "AS IS" BASIS,+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.+ * See the License for the specific language governing permissions and+ * limitations under the License.+ * ========================================================= */+++!function( $ ){++  "use strict"++ /* CSS TRANSITION SUPPORT (https://gist.github.com/373874)+  * ======================================================= */++  var transitionEnd++  $(document).ready(function () {++    $.support.transition = (function () {+      var thisBody = document.body || document.documentElement+        , thisStyle = thisBody.style+        , support = thisStyle.transition !== undefined || thisStyle.WebkitTransition !== undefined || thisStyle.MozTransition !== undefined || thisStyle.MsTransition !== undefined || thisStyle.OTransition !== undefined+      return support+    })()++    // set CSS transition event type+    if ( $.support.transition ) {+      transitionEnd = "TransitionEnd"+      if ( $.browser.webkit ) {+      	transitionEnd = "webkitTransitionEnd"+      } else if ( $.browser.mozilla ) {+      	transitionEnd = "transitionend"+      } else if ( $.browser.opera ) {+      	transitionEnd = "oTransitionEnd"+      }+    }++  })+++ /* MODAL PUBLIC CLASS DEFINITION+  * ============================= */++  var Modal = function ( content, options ) {+    this.settings = $.extend({}, $.fn.modal.defaults, options)+    this.$element = $(content)+      .delegate('.close', 'click.modal', $.proxy(this.hide, this))++    if ( this.settings.show ) {+      this.show()+    }++    return this+  }++  Modal.prototype = {++      toggle: function () {+        return this[!this.isShown ? 'show' : 'hide']()+      }++    , show: function () {+        var that = this+        this.isShown = true+        this.$element.trigger('show')++        escape.call(this)+        backdrop.call(this, function () {+          var transition = $.support.transition && that.$element.hasClass('fade')++          that.$element+            .appendTo(document.body)+            .show()++          if (transition) {+            that.$element[0].offsetWidth // force reflow+          }++          that.$element.addClass('in')++          transition ?+            that.$element.one(transitionEnd, function () { that.$element.trigger('shown') }) :+            that.$element.trigger('shown')++        })++        return this+      }++    , hide: function (e) {+        e && e.preventDefault()++        if ( !this.isShown ) {+          return this+        }++        var that = this+        this.isShown = false++        escape.call(this)++        this.$element+          .trigger('hide')+          .removeClass('in')++        $.support.transition && this.$element.hasClass('fade') ?+          hideWithTransition.call(this) :+          hideModal.call(this)++        return this+      }++  }+++ /* MODAL PRIVATE METHODS+  * ===================== */++  function hideWithTransition() {+    // firefox drops transitionEnd events :{o+    var that = this+      , timeout = setTimeout(function () {+          that.$element.unbind(transitionEnd)+          hideModal.call(that)+        }, 500)++    this.$element.one(transitionEnd, function () {+      clearTimeout(timeout)+      hideModal.call(that)+    })+  }++  function hideModal (that) {+    this.$element+      .hide()+      .trigger('hidden')++    backdrop.call(this)+  }++  function backdrop ( callback ) {+    var that = this+      , animate = this.$element.hasClass('fade') ? 'fade' : ''+    if ( this.isShown && this.settings.backdrop ) {+      var doAnimate = $.support.transition && animate++      this.$backdrop = $('<div class="modal-backdrop ' + animate + '" />')+        .appendTo(document.body)++      if ( this.settings.backdrop != 'static' ) {+        this.$backdrop.click($.proxy(this.hide, this))+      }++      if ( doAnimate ) {+        this.$backdrop[0].offsetWidth // force reflow+      }++      this.$backdrop.addClass('in')++      doAnimate ?+        this.$backdrop.one(transitionEnd, callback) :+        callback()++    } else if ( !this.isShown && this.$backdrop ) {+      this.$backdrop.removeClass('in')++      $.support.transition && this.$element.hasClass('fade')?+        this.$backdrop.one(transitionEnd, $.proxy(removeBackdrop, this)) :+        removeBackdrop.call(this)++    } else if ( callback ) {+       callback()+    }+  }++  function removeBackdrop() {+    this.$backdrop.remove()+    this.$backdrop = null+  }++  function escape() {+    var that = this+    if ( this.isShown && this.settings.keyboard ) {+      $(document).bind('keyup.modal', function ( e ) {+        if ( e.which == 27 ) {+          that.hide()+        }+      })+    } else if ( !this.isShown ) {+      $(document).unbind('keyup.modal')+    }+  }+++ /* MODAL PLUGIN DEFINITION+  * ======================= */++  $.fn.modal = function ( options ) {+    var modal = this.data('modal')++    if (!modal) {++      if (typeof options == 'string') {+        options = {+          show: /show|toggle/.test(options)+        }+      }++      return this.each(function () {+        $(this).data('modal', new Modal(this, options))+      })+    }++    if ( options === true ) {+      return modal+    }++    if ( typeof options == 'string' ) {+      modal[options]()+    } else if ( modal ) {+      modal.toggle()+    }++    return this+  }++  $.fn.modal.Modal = Modal++  $.fn.modal.defaults = {+    backdrop: false+  , keyboard: false+  , show: false+  }+++ /* MODAL DATA- IMPLEMENTATION+  * ========================== */++  $(document).ready(function () {+    $('body').delegate('[data-controls-modal]', 'click', function (e) {+      e.preventDefault()+      var $this = $(this).data('show', true)+      $('#' + $this.attr('data-controls-modal')).modal( $this.data() )+    })+  })++}( window.jQuery || window.ender );
+ files/Docs/docs.css view
@@ -0,0 +1,51 @@+/* Resources panel fixed */+.container-fluid > .sidebar {+  position: fixed;+}++/*Override some bootstrap border settings */+.data-description td, .data-description tr, .data-description th, .data-description thead th+th, .data-description tbody td+td {+  border: none;+}++/*Fix the widths of url tables*/+.Input, .Output { width: 160px; }+.Method th { width: 30px; }+.Description th { width: 30px; }+.URL { width: 400px; }+.data-description { width: 150px; }++/*Input/Output tables*/+.data-description td {+  padding: 2px;+}++.data-description tr+tr {+  border-top: 1px solid #ddd;+}++.open-modal {+  padding: 1px;+}++.parent-separator { margin: 0 3 0 3; }+/*Style url tables*/ +.stripe-1 {background-color:#f9f9f9;}++.url-data-row > td:first-child { border-top: none; }+.url-main-row > td { border-top: 1px solid #aaa} ++/* .resource-table > tbody > tr > td:first-child { border-right: 1px solid #aaa} */+/* .resource-table > thead > tr > th:first-child { border-right: 1px solid #aaa } */+.resource-table { border-color: #aaa }++h1 {+  text-align: center;+}++.resource-title h1, .resource-link {background-color:#fee9cc;cpadding:1px 3px;padding:0 3px 2px;-webkit-border-radius:3px;-moz-border-radius:3px;border-radius:3px;}++.link-block { +  display: inline-block;+  background-color:#fee9cc;+}
+ files/Docs/docs.js view
@@ -0,0 +1,8 @@+$(document).ready+(+  function ()+  {+    $(".code").modal({keyboard: true, backdrop:true});+    prettyPrint();+  }+);
+ files/Docs/jquery-nightly.js view
@@ -0,0 +1,6286 @@+/*!+ * jQuery JavaScript Library v1.4.3pre+ * http://jquery.com/+ *+ * Copyright 2010, John Resig+ * Dual licensed under the MIT or GPL Version 2 licenses.+ * http://jquery.org/license+ *+ * Includes Sizzle.js+ * http://sizzlejs.com/+ * Copyright 2010, The Dojo Foundation+ * Released under the MIT, BSD, and GPL Licenses.+ *+ * Date: Sun Feb 28 10:55:59 2010 -0600+ */+(function( window, undefined ) {++// Define a local copy of jQuery+var jQuery = function( selector, context ) {+		// The jQuery object is actually just the init constructor 'enhanced'+		return new jQuery.fn.init( selector, context );+	},++	// Map over jQuery in case of overwrite+	_jQuery = window.jQuery,++	// Map over the $ in case of overwrite+	_$ = window.$,++	// Use the correct document accordingly with window argument (sandbox)+	document = window.document,++	// A central reference to the root jQuery(document)+	rootjQuery,++	// A simple way to check for HTML strings or ID strings+	// (both of which we optimize for)+	quickExpr = /^[^<]*(<[\w\W]+>)[^>]*$|^#([\w-]+)$/,++	// Is it a simple selector+	isSimple = /^.[^:#\[\.,]*$/,++	// Check if a string has a non-whitespace character in it+	rnotwhite = /\S/,++	// Used for trimming whitespace+	rtrim = /^(\s|\u00A0)+|(\s|\u00A0)+$/g,++	// Match a standalone tag+	rsingleTag = /^<(\w+)\s*\/?>(?:<\/\1>)?$/,++	// Keep a UserAgent string for use with jQuery.browser+	userAgent = navigator.userAgent,++	// For matching the engine and version of the browser+	browserMatch,+	+	// Has the ready events already been bound?+	readyBound = false,+	+	// The functions to execute on DOM ready+	readyList = [],++	// The ready event handler+	DOMContentLoaded,++	// Save a reference to some core methods+	toString = Object.prototype.toString,+	hasOwnProperty = Object.prototype.hasOwnProperty,+	push = Array.prototype.push,+	slice = Array.prototype.slice,+	indexOf = Array.prototype.indexOf;++jQuery.fn = jQuery.prototype = {+	init: function( selector, context ) {+		var match, elem, ret, doc;++		// Handle $(""), $(null), or $(undefined)+		if ( !selector ) {+			return this;+		}++		// Handle $(DOMElement)+		if ( selector.nodeType ) {+			this.context = this[0] = selector;+			this.length = 1;+			return this;+		}+		+		// The body element only exists once, optimize finding it+		if ( selector === "body" && !context ) {+			this.context = document;+			this[0] = document.body;+			this.selector = "body";+			this.length = 1;+			return this;+		}++		// Handle HTML strings+		if ( typeof selector === "string" ) {+			// Are we dealing with HTML string or an ID?+			match = quickExpr.exec( selector );++			// Verify a match, and that no context was specified for #id+			if ( match && (match[1] || !context) ) {++				// HANDLE: $(html) -> $(array)+				if ( match[1] ) {+					doc = (context ? context.ownerDocument || context : document);++					// If a single string is passed in and it's a single tag+					// just do a createElement and skip the rest+					ret = rsingleTag.exec( selector );++					if ( ret ) {+						if ( jQuery.isPlainObject( context ) ) {+							selector = [ document.createElement( ret[1] ) ];+							jQuery.fn.attr.call( selector, context, true );++						} else {+							selector = [ doc.createElement( ret[1] ) ];+						}++					} else {+						ret = buildFragment( [ match[1] ], [ doc ] );+						selector = (ret.cacheable ? ret.fragment.cloneNode(true) : ret.fragment).childNodes;+					}+					+					return jQuery.merge( this, selector );+					+				// HANDLE: $("#id")+				} else {+					elem = document.getElementById( match[2] );++					if ( elem ) {+						// Handle the case where IE and Opera return items+						// by name instead of ID+						if ( elem.id !== match[2] ) {+							return rootjQuery.find( selector );+						}++						// Otherwise, we inject the element directly into the jQuery object+						this.length = 1;+						this[0] = elem;+					}++					this.context = document;+					this.selector = selector;+					return this;+				}++			// HANDLE: $("TAG")+			} else if ( !context && /^\w+$/.test( selector ) ) {+				this.selector = selector;+				this.context = document;+				selector = document.getElementsByTagName( selector );+				return jQuery.merge( this, selector );++			// HANDLE: $(expr, $(...))+			} else if ( !context || context.jquery ) {+				return (context || rootjQuery).find( selector );++			// HANDLE: $(expr, context)+			// (which is just equivalent to: $(context).find(expr)+			} else {+				return jQuery( context ).find( selector );+			}++		// HANDLE: $(function)+		// Shortcut for document ready+		} else if ( jQuery.isFunction( selector ) ) {+			return rootjQuery.ready( selector );+		}++		if (selector.selector !== undefined) {+			this.selector = selector.selector;+			this.context = selector.context;+		}++		return jQuery.makeArray( selector, this );+	},++	// Start with an empty selector+	selector: "",++	// The current version of jQuery being used+	jquery: "1.4.3pre",++	// The default length of a jQuery object is 0+	length: 0,++	// The number of elements contained in the matched element set+	size: function() {+		return this.length;+	},++	toArray: function() {+		return slice.call( this, 0 );+	},++	// Get the Nth element in the matched element set OR+	// Get the whole matched element set as a clean array+	get: function( num ) {+		return num == null ?++			// Return a 'clean' array+			this.toArray() :++			// Return just the object+			( num < 0 ? this.slice(num)[ 0 ] : this[ num ] );+	},++	// Take an array of elements and push it onto the stack+	// (returning the new matched element set)+	pushStack: function( elems, name, selector ) {+		// Build a new jQuery matched element set+		var ret = jQuery();++		if ( jQuery.isArray( elems ) ) {+			push.apply( ret, elems );+		+		} else {+			jQuery.merge( ret, elems );+		}++		// Add the old object onto the stack (as a reference)+		ret.prevObject = this;++		ret.context = this.context;++		if ( name === "find" ) {+			ret.selector = this.selector + (this.selector ? " " : "") + selector;+		} else if ( name ) {+			ret.selector = this.selector + "." + name + "(" + selector + ")";+		}++		// Return the newly-formed element set+		return ret;+	},++	// Execute a callback for every element in the matched set.+	// (You can seed the arguments with an array of args, but this is+	// only used internally.)+	each: function( callback, args ) {+		return jQuery.each( this, callback, args );+	},+	+	ready: function( fn ) {+		// Attach the listeners+		jQuery.bindReady();++		// If the DOM is already ready+		if ( jQuery.isReady ) {+			// Execute the function immediately+			fn.call( document, jQuery );++		// Otherwise, remember the function for later+		} else if ( readyList ) {+			// Add the function to the wait list+			readyList.push( fn );+		}++		return this;+	},+	+	eq: function( i ) {+		return i === -1 ?+			this.slice( i ) :+			this.slice( i, +i + 1 );+	},++	first: function() {+		return this.eq( 0 );+	},++	last: function() {+		return this.eq( -1 );+	},++	slice: function() {+		return this.pushStack( slice.apply( this, arguments ),+			"slice", slice.call(arguments).join(",") );+	},++	map: function( callback ) {+		return this.pushStack( jQuery.map(this, function( elem, i ) {+			return callback.call( elem, i, elem );+		}));+	},+	+	end: function() {+		return this.prevObject || jQuery(null);+	},++	// For internal use only.+	// Behaves like an Array's method, not like a jQuery method.+	push: push,+	sort: [].sort,+	splice: [].splice+};++// Give the init function the jQuery prototype for later instantiation+jQuery.fn.init.prototype = jQuery.fn;++jQuery.extend = jQuery.fn.extend = function() {+	// copy reference to target object+	var target = arguments[0] || {}, i = 1, length = arguments.length, deep = false, options, name, src, copy;++	// Handle a deep copy situation+	if ( typeof target === "boolean" ) {+		deep = target;+		target = arguments[1] || {};+		// skip the boolean and the target+		i = 2;+	}++	// Handle case when target is a string or something (possible in deep copy)+	if ( typeof target !== "object" && !jQuery.isFunction(target) ) {+		target = {};+	}++	// extend jQuery itself if only one argument is passed+	if ( length === i ) {+		target = this;+		--i;+	}++	for ( ; i < length; i++ ) {+		// Only deal with non-null/undefined values+		if ( (options = arguments[ i ]) != null ) {+			// Extend the base object+			for ( name in options ) {+				src = target[ name ];+				copy = options[ name ];++				// Prevent never-ending loop+				if ( target === copy ) {+					continue;+				}++				// Recurse if we're merging object literal values or arrays+				if ( deep && copy && ( jQuery.isPlainObject(copy) || jQuery.isArray(copy) ) ) {+					var clone = src && ( jQuery.isPlainObject(src) || jQuery.isArray(src) ) ? src+						: jQuery.isArray(copy) ? [] : {};++					// Never move original objects, clone them+					target[ name ] = jQuery.extend( deep, clone, copy );++				// Don't bring in undefined values+				} else if ( copy !== undefined ) {+					target[ name ] = copy;+				}+			}+		}+	}++	// Return the modified object+	return target;+};++jQuery.extend({+	noConflict: function( deep ) {+		window.$ = _$;++		if ( deep ) {+			window.jQuery = _jQuery;+		}++		return jQuery;+	},+	+	// Is the DOM ready to be used? Set to true once it occurs.+	isReady: false,+	+	// Handle when the DOM is ready+	ready: function() {+		// Make sure that the DOM is not already loaded+		if ( !jQuery.isReady ) {+			// Make sure body exists, at least, in case IE gets a little overzealous (ticket #5443).+			if ( !document.body ) {+				return setTimeout( jQuery.ready, 13 );+			}++			// Remember that the DOM is ready+			jQuery.isReady = true;++			// If there are functions bound, to execute+			if ( readyList ) {+				// Execute all of them+				var fn, i = 0;+				while ( (fn = readyList[ i++ ]) ) {+					fn.call( document, jQuery );+				}++				// Reset the list of functions+				readyList = null;+			}++			// Trigger any bound ready events+			if ( jQuery.fn.triggerHandler ) {+				jQuery( document ).triggerHandler( "ready" );+			}+		}+	},+	+	bindReady: function() {+		if ( readyBound ) {+			return;+		}++		readyBound = true;++		// Catch cases where $(document).ready() is called after the+		// browser event has already occurred.+		if ( document.readyState === "complete" ) {+			return jQuery.ready();+		}++		// Mozilla, Opera and webkit nightlies currently support this event+		if ( document.addEventListener ) {+			// Use the handy event callback+			document.addEventListener( "DOMContentLoaded", DOMContentLoaded, false );+			+			// A fallback to window.onload, that will always work+			window.addEventListener( "load", jQuery.ready, false );++		// If IE event model is used+		} else if ( document.attachEvent ) {+			// ensure firing before onload,+			// maybe late but safe also for iframes+			document.attachEvent("onreadystatechange", DOMContentLoaded);+			+			// A fallback to window.onload, that will always work+			window.attachEvent( "onload", jQuery.ready );++			// If IE and not a frame+			// continually check to see if the document is ready+			var toplevel = false;++			try {+				toplevel = window.frameElement == null;+			} catch(e) {}++			if ( document.documentElement.doScroll && toplevel ) {+				doScrollCheck();+			}+		}+	},++	// See test/unit/core.js for details concerning isFunction.+	// Since version 1.3, DOM methods and functions like alert+	// aren't supported. They return false on IE (#2968).+	isFunction: function( obj ) {+		return toString.call(obj) === "[object Function]";+	},++	isArray: function( obj ) {+		return toString.call(obj) === "[object Array]";+	},++	isPlainObject: function( obj ) {+		// Must be an Object.+		// Because of IE, we also have to check the presence of the constructor property.+		// Make sure that DOM nodes and window objects don't pass through, as well+		if ( !obj || toString.call(obj) !== "[object Object]" || obj.nodeType || obj.setInterval ) {+			return false;+		}+		+		// Not own constructor property must be Object+		if ( obj.constructor+			&& !hasOwnProperty.call(obj, "constructor")+			&& !hasOwnProperty.call(obj.constructor.prototype, "isPrototypeOf") ) {+			return false;+		}+		+		// Own properties are enumerated firstly, so to speed up,+		// if last one is own, then all properties are own.+	+		var key;+		for ( key in obj ) {}+		+		return key === undefined || hasOwnProperty.call( obj, key );+	},++	isEmptyObject: function( obj ) {+		for ( var name in obj ) {+			return false;+		}+		return true;+	},+	+	error: function( msg ) {+		throw msg;+	},+	+	parseJSON: function( data ) {+		if ( typeof data !== "string" || !data ) {+			return null;+		}++		// Make sure leading/trailing whitespace is removed (IE can't handle it)+		data = jQuery.trim( data );+		+		// Make sure the incoming data is actual JSON+		// Logic borrowed from http://json.org/json2.js+		if ( /^[\],:{}\s]*$/.test(data.replace(/\\(?:["\\\/bfnrt]|u[0-9a-fA-F]{4})/g, "@")+			.replace(/"[^"\\\n\r]*"|true|false|null|-?\d+(?:\.\d*)?(?:[eE][+\-]?\d+)?/g, "]")+			.replace(/(?:^|:|,)(?:\s*\[)+/g, "")) ) {++			// Try to use the native JSON parser first+			return window.JSON && window.JSON.parse ?+				window.JSON.parse( data ) :+				(new Function("return " + data))();++		} else {+			jQuery.error( "Invalid JSON: " + data );+		}+	},++	noop: function() {},++	// Evalulates a script in a global context+	globalEval: function( data ) {+		if ( data && rnotwhite.test(data) ) {+			// Inspired by code by Andrea Giammarchi+			// http://webreflection.blogspot.com/2007/08/global-scope-evaluation-and-dom.html+			var head = document.getElementsByTagName("head")[0] || document.documentElement,+				script = document.createElement("script");++			script.type = "text/javascript";++			if ( jQuery.support.scriptEval ) {+				script.appendChild( document.createTextNode( data ) );+			} else {+				script.text = data;+			}++			// Use insertBefore instead of appendChild to circumvent an IE6 bug.+			// This arises when a base node is used (#2709).+			head.insertBefore( script, head.firstChild );+			head.removeChild( script );+		}+	},++	nodeName: function( elem, name ) {+		return elem.nodeName && elem.nodeName.toUpperCase() === name.toUpperCase();+	},++	// args is for internal usage only+	each: function( object, callback, args ) {+		var name, i = 0,+			length = object.length,+			isObj = length === undefined || jQuery.isFunction(object);++		if ( args ) {+			if ( isObj ) {+				for ( name in object ) {+					if ( callback.apply( object[ name ], args ) === false ) {+						break;+					}+				}+			} else {+				for ( ; i < length; ) {+					if ( callback.apply( object[ i++ ], args ) === false ) {+						break;+					}+				}+			}++		// A special, fast, case for the most common use of each+		} else {+			if ( isObj ) {+				for ( name in object ) {+					if ( callback.call( object[ name ], name, object[ name ] ) === false ) {+						break;+					}+				}+			} else {+				for ( var value = object[0];+					i < length && callback.call( value, i, value ) !== false; value = object[++i] ) {}+			}+		}++		return object;+	},++	trim: function( text ) {+		return (text || "").replace( rtrim, "" );+	},++	// results is for internal usage only+	makeArray: function( array, results ) {+		var ret = results || [];++		if ( array != null ) {+			// The window, strings (and functions) also have 'length'+			// The extra typeof function check is to prevent crashes+			// in Safari 2 (See: #3039)+			if ( array.length == null || typeof array === "string" || jQuery.isFunction(array) || (typeof array !== "function" && array.setInterval) ) {+				push.call( ret, array );+			} else {+				jQuery.merge( ret, array );+			}+		}++		return ret;+	},++	inArray: function( elem, array ) {+		if ( array.indexOf ) {+			return array.indexOf( elem );+		}++		for ( var i = 0, length = array.length; i < length; i++ ) {+			if ( array[ i ] === elem ) {+				return i;+			}+		}++		return -1;+	},++	merge: function( first, second ) {+		var i = first.length, j = 0;++		if ( typeof second.length === "number" ) {+			for ( var l = second.length; j < l; j++ ) {+				first[ i++ ] = second[ j ];+			}+		+		} else {+			while ( second[j] !== undefined ) {+				first[ i++ ] = second[ j++ ];+			}+		}++		first.length = i;++		return first;+	},++	grep: function( elems, callback, inv ) {+		var ret = [];++		// Go through the array, only saving the items+		// that pass the validator function+		for ( var i = 0, length = elems.length; i < length; i++ ) {+			if ( !inv !== !callback( elems[ i ], i ) ) {+				ret.push( elems[ i ] );+			}+		}++		return ret;+	},++	// arg is for internal usage only+	map: function( elems, callback, arg ) {+		var ret = [], value;++		// Go through the array, translating each of the items to their+		// new value (or values).+		for ( var i = 0, length = elems.length; i < length; i++ ) {+			value = callback( elems[ i ], i, arg );++			if ( value != null ) {+				ret[ ret.length ] = value;+			}+		}++		return ret.concat.apply( [], ret );+	},++	// A global GUID counter for objects+	guid: 1,++	proxy: function( fn, proxy, thisObject ) {+		if ( arguments.length === 2 ) {+			if ( typeof proxy === "string" ) {+				thisObject = fn;+				fn = thisObject[ proxy ];+				proxy = undefined;++			} else if ( proxy && !jQuery.isFunction( proxy ) ) {+				thisObject = proxy;+				proxy = undefined;+			}+		}++		if ( !proxy && fn ) {+			proxy = function() {+				return fn.apply( thisObject || this, arguments );+			};+		}++		// Set the guid of unique handler to the same of original handler, so it can be removed+		if ( fn ) {+			proxy.guid = fn.guid = fn.guid || proxy.guid || jQuery.guid++;+		}++		// So proxy can be declared as an argument+		return proxy;+	},++	// Use of jQuery.browser is frowned upon.+	// More details: http://docs.jquery.com/Utilities/jQuery.browser+	uaMatch: function( ua ) {+		ua = ua.toLowerCase();++		var match = /(webkit)[ \/]([\w.]+)/.exec( ua ) ||+			/(opera)(?:.*version)?[ \/]([\w.]+)/.exec( ua ) ||+			/(msie) ([\w.]+)/.exec( ua ) ||+			!/compatible/.test( ua ) && /(mozilla)(?:.*? rv:([\w.]+))?/.exec( ua ) ||+		  	[];++		return { browser: match[1] || "", version: match[2] || "0" };+	},++	browser: {}+});++browserMatch = jQuery.uaMatch( userAgent );+if ( browserMatch.browser ) {+	jQuery.browser[ browserMatch.browser ] = true;+	jQuery.browser.version = browserMatch.version;+}++// Deprecated, use jQuery.browser.webkit instead+if ( jQuery.browser.webkit ) {+	jQuery.browser.safari = true;+}++if ( indexOf ) {+	jQuery.inArray = function( elem, array ) {+		return indexOf.call( array, elem );+	};+}++// All jQuery objects should point back to these+rootjQuery = jQuery(document);++// Cleanup functions for the document ready method+if ( document.addEventListener ) {+	DOMContentLoaded = function() {+		document.removeEventListener( "DOMContentLoaded", DOMContentLoaded, false );+		jQuery.ready();+	};++} else if ( document.attachEvent ) {+	DOMContentLoaded = function() {+		// Make sure body exists, at least, in case IE gets a little overzealous (ticket #5443).+		if ( document.readyState === "complete" ) {+			document.detachEvent( "onreadystatechange", DOMContentLoaded );+			jQuery.ready();+		}+	};+}++// The DOM ready check for Internet Explorer+function doScrollCheck() {+	if ( jQuery.isReady ) {+		return;+	}++	try {+		// If IE is used, use the trick by Diego Perini+		// http://javascript.nwbox.com/IEContentLoaded/+		document.documentElement.doScroll("left");+	} catch( error ) {+		setTimeout( doScrollCheck, 1 );+		return;+	}++	// and execute any waiting functions+	jQuery.ready();+}++function evalScript( i, elem ) {+	if ( elem.src ) {+		jQuery.ajax({+			url: elem.src,+			async: false,+			dataType: "script"+		});+	} else {+		jQuery.globalEval( elem.text || elem.textContent || elem.innerHTML || "" );+	}++	if ( elem.parentNode ) {+		elem.parentNode.removeChild( elem );+	}+}++// Mutifunctional method to get and set values to a collection+// The value/s can be optionally by executed if its a function+function access( elems, key, value, exec, fn, pass ) {+	var length = elems.length;+	+	// Setting many attributes+	if ( typeof key === "object" ) {+		for ( var k in key ) {+			access( elems, k, key[k], exec, fn, value );+		}+		return elems;+	}+	+	// Setting one attribute+	if ( value !== undefined ) {+		// Optionally, function values get executed if exec is true+		exec = !pass && exec && jQuery.isFunction(value);+		+		for ( var i = 0; i < length; i++ ) {+			fn( elems[i], key, exec ? value.call( elems[i], i, fn( elems[i], key ) ) : value, pass );+		}+		+		return elems;+	}+	+	// Getting an attribute+	return length ? fn( elems[0], key ) : undefined;+}++function now() {+	return (new Date).getTime();+}+(function() {++	jQuery.support = {};++	var root = document.documentElement,+		script = document.createElement("script"),+		div = document.createElement("div"),+		id = "script" + now();++	div.style.display = "none";+	div.innerHTML = "   <link/><table></table><a href='/a' style='color:red;float:left;opacity:.55;'>a</a><input type='checkbox'/>";++	var all = div.getElementsByTagName("*"),+		a = div.getElementsByTagName("a")[0];++	// Can't get basic test support+	if ( !all || !all.length || !a ) {+		return;+	}++	jQuery.support = {+		// IE strips leading whitespace when .innerHTML is used+		leadingWhitespace: div.firstChild.nodeType === 3,++		// Make sure that tbody elements aren't automatically inserted+		// IE will insert them into empty tables+		tbody: !div.getElementsByTagName("tbody").length,++		// Make sure that link elements get serialized correctly by innerHTML+		// This requires a wrapper element in IE+		htmlSerialize: !!div.getElementsByTagName("link").length,++		// Get the style information from getAttribute+		// (IE uses .cssText insted)+		style: /red/.test( a.getAttribute("style") ),++		// Make sure that URLs aren't manipulated+		// (IE normalizes it by default)+		hrefNormalized: a.getAttribute("href") === "/a",++		// Make sure that element opacity exists+		// (IE uses filter instead)+		// Use a regex to work around a WebKit issue. See #5145+		opacity: /^0.55$/.test( a.style.opacity ),++		// Verify style float existence+		// (IE uses styleFloat instead of cssFloat)+		cssFloat: !!a.style.cssFloat,++		// Make sure that if no value is specified for a checkbox+		// that it defaults to "on".+		// (WebKit defaults to "" instead)+		checkOn: div.getElementsByTagName("input")[0].value === "on",++		// Make sure that a selected-by-default option has a working selected property.+		// (WebKit defaults to false instead of true, IE too, if it's in an optgroup)+		optSelected: document.createElement("select").appendChild( document.createElement("option") ).selected,++		parentNode: div.removeChild( div.appendChild( document.createElement("div") ) ).parentNode === null,++		// Will be defined later+		deleteExpando: true,+		checkClone: false,+		scriptEval: false,+		noCloneEvent: true,+		boxModel: null+	};++	script.type = "text/javascript";+	try {+		script.appendChild( document.createTextNode( "window." + id + "=1;" ) );+	} catch(e) {}++	root.insertBefore( script, root.firstChild );++	// Make sure that the execution of code works by injecting a script+	// tag with appendChild/createTextNode+	// (IE doesn't support this, fails, and uses .text instead)+	if ( window[ id ] ) {+		jQuery.support.scriptEval = true;+		delete window[ id ];+	}++	// Test to see if it's possible to delete an expando from an element+	// Fails in Internet Explorer+	try {+		delete script.test;+	+	} catch(e) {+		jQuery.support.deleteExpando = false;+	}++	root.removeChild( script );++	if ( div.attachEvent && div.fireEvent ) {+		div.attachEvent("onclick", function click() {+			// Cloning a node shouldn't copy over any+			// bound event handlers (IE does this)+			jQuery.support.noCloneEvent = false;+			div.detachEvent("onclick", click);+		});+		div.cloneNode(true).fireEvent("onclick");+	}++	div = document.createElement("div");+	div.innerHTML = "<input type='radio' name='radiotest' checked='checked'/>";++	var fragment = document.createDocumentFragment();+	fragment.appendChild( div.firstChild );++	// WebKit doesn't clone checked state correctly in fragments+	jQuery.support.checkClone = fragment.cloneNode(true).cloneNode(true).lastChild.checked;++	// Figure out if the W3C box model works as expected+	// document.body must exist before we can do this+	jQuery(function() {+		var div = document.createElement("div");+		div.style.width = div.style.paddingLeft = "1px";++		document.body.appendChild( div );+		jQuery.boxModel = jQuery.support.boxModel = div.offsetWidth === 2;+		document.body.removeChild( div ).style.display = 'none';++		div = null;+	});++	// Technique from Juriy Zaytsev+	// http://thinkweb2.com/projects/prototype/detecting-event-support-without-browser-sniffing/+	var eventSupported = function( eventName ) { +		var el = document.createElement("div"); +		eventName = "on" + eventName; ++		var isSupported = (eventName in el); +		if ( !isSupported ) { +			el.setAttribute(eventName, "return;"); +			isSupported = typeof el[eventName] === "function"; +		} +		el = null; ++		return isSupported; +	};+	+	jQuery.support.submitBubbles = eventSupported("submit");+	jQuery.support.changeBubbles = eventSupported("change");++	// release memory in IE+	root = script = div = all = a = null;+})();++jQuery.props = {+	"for": "htmlFor",+	"class": "className",+	readonly: "readOnly",+	maxlength: "maxLength",+	cellspacing: "cellSpacing",+	rowspan: "rowSpan",+	colspan: "colSpan",+	tabindex: "tabIndex",+	usemap: "useMap",+	frameborder: "frameBorder"+};+var expando = "jQuery" + now(), uuid = 0, windowData = {};++jQuery.extend({+	cache: {},+	+	expando: expando,++	// The following elements throw uncatchable exceptions if you+	// attempt to add expando properties to them.+	noData: {+		"embed": true,+		"object": true,+		"applet": true+	},++	data: function( elem, name, data ) {+		if ( elem.nodeName && jQuery.noData[elem.nodeName.toLowerCase()] ) {+			return;+		}++		elem = elem == window ?+			windowData :+			elem;++		var id = elem[ jQuery.expando ], cache = jQuery.cache, thisCache,+			isNode = elem.nodeType;++		if ( !id && typeof name === "string" && data === undefined ) {+			return;+		}++		// Get the data from the object directly+		if ( !isNode ) {+			cache = elem;+			id = jQuery.expando;++		// Compute a unique ID for the element+		} else if ( !id ) {+			elem[ jQuery.expando ] = id = ++uuid;+		}++		// Avoid generating a new cache unless none exists and we+		// want to manipulate it.+		if ( typeof name === "object" ) {+			cache[ id ] = jQuery.extend(true, {}, name);++		} else if ( !cache[ id ] ) {+			cache[ id ] = {};+		}++		thisCache = cache[ id ];++		// Prevent overriding the named cache with undefined values+		if ( data !== undefined ) {+			thisCache[ name ] = data;+		}++		return typeof name === "string" ? thisCache[ name ] : thisCache;+	},++	removeData: function( elem, name ) {+		if ( elem.nodeName && jQuery.noData[elem.nodeName.toLowerCase()] ) {+			return;+		}++		elem = elem == window ?+			windowData :+			elem;++		var id = elem[ jQuery.expando ], cache = jQuery.cache,+			isNode = elem.nodeType, thisCache = isNode ? cache[ id ] : id;++		// If we want to remove a specific section of the element's data+		if ( name ) {+			if ( thisCache ) {+				// Remove the section of cache data+				delete thisCache[ name ];++				// If we've removed all the data, remove the element's cache+				if ( jQuery.isEmptyObject(thisCache) ) {+					jQuery.removeData( elem );+				}+			}++		// Otherwise, we want to remove all of the element's data+		} else {+			if ( jQuery.support.deleteExpando || !isNode ) {+				delete elem[ jQuery.expando ];++			} else if ( elem.removeAttribute ) {+				elem.removeAttribute( jQuery.expando );+			}++			// Completely remove the data cache+			if ( isNode ) {+				delete cache[ id ];+			}+		}+	}+});++jQuery.fn.extend({+	data: function( key, value ) {+		if ( typeof key === "undefined" && this.length ) {+			return jQuery.data( this[0] );++		} else if ( typeof key === "object" ) {+			return this.each(function() {+				jQuery.data( this, key );+			});+		}++		var parts = key.split(".");+		parts[1] = parts[1] ? "." + parts[1] : "";++		if ( value === undefined ) {+			var data = this.triggerHandler("getData" + parts[1] + "!", [parts[0]]);++			if ( data === undefined && this.length ) {+				data = jQuery.data( this[0], key );+			}+			return data === undefined && parts[1] ?+				this.data( parts[0] ) :+				data;+		} else {+			return this.trigger("setData" + parts[1] + "!", [parts[0], value]).each(function() {+				jQuery.data( this, key, value );+			});+		}+	},++	removeData: function( key ) {+		return this.each(function() {+			jQuery.removeData( this, key );+		});+	}+});+jQuery.extend({+	queue: function( elem, type, data ) {+		if ( !elem ) {+			return;+		}++		type = (type || "fx") + "queue";+		var q = jQuery.data( elem, type );++		// Speed up dequeue by getting out quickly if this is just a lookup+		if ( !data ) {+			return q || [];+		}++		if ( !q || jQuery.isArray(data) ) {+			q = jQuery.data( elem, type, jQuery.makeArray(data) );++		} else {+			q.push( data );+		}++		return q;+	},++	dequeue: function( elem, type ) {+		type = type || "fx";++		var queue = jQuery.queue( elem, type ), fn = queue.shift();++		// If the fx queue is dequeued, always remove the progress sentinel+		if ( fn === "inprogress" ) {+			fn = queue.shift();+		}++		if ( fn ) {+			// Add a progress sentinel to prevent the fx queue from being+			// automatically dequeued+			if ( type === "fx" ) {+				queue.unshift("inprogress");+			}++			fn.call(elem, function() {+				jQuery.dequeue(elem, type);+			});+		}+	}+});++jQuery.fn.extend({+	queue: function( type, data ) {+		if ( typeof type !== "string" ) {+			data = type;+			type = "fx";+		}++		if ( data === undefined ) {+			return jQuery.queue( this[0], type );+		}+		return this.each(function( i, elem ) {+			var queue = jQuery.queue( this, type, data );++			if ( type === "fx" && queue[0] !== "inprogress" ) {+				jQuery.dequeue( this, type );+			}+		});+	},+	dequeue: function( type ) {+		return this.each(function() {+			jQuery.dequeue( this, type );+		});+	},++	// Based off of the plugin by Clint Helfers, with permission.+	// http://blindsignals.com/index.php/2009/07/jquery-delay/+	delay: function( time, type ) {+		time = jQuery.fx ? jQuery.fx.speeds[time] || time : time;+		type = type || "fx";++		return this.queue( type, function() {+			var elem = this;+			setTimeout(function() {+				jQuery.dequeue( elem, type );+			}, time );+		});+	},++	clearQueue: function( type ) {+		return this.queue( type || "fx", [] );+	}+});+var rclass = /[\n\t]/g,+	rspace = /\s+/,+	rreturn = /\r/g,+	rspecialurl = /href|src|style/,+	rtype = /(button|input)/i,+	rfocusable = /(button|input|object|select|textarea)/i,+	rclickable = /^(a|area)$/i,+	rradiocheck = /radio|checkbox/;++jQuery.fn.extend({+	attr: function( name, value ) {+		return access( this, name, value, true, jQuery.attr );+	},++	removeAttr: function( name, fn ) {+		return this.each(function(){+			jQuery.attr( this, name, "" );+			if ( this.nodeType === 1 ) {+				this.removeAttribute( name );+			}+		});+	},++	addClass: function( value ) {+		if ( jQuery.isFunction(value) ) {+			return this.each(function(i) {+				var self = jQuery(this);+				self.addClass( value.call(this, i, self.attr("class")) );+			});+		}++		if ( value && typeof value === "string" ) {+			var classNames = (value || "").split( rspace );++			for ( var i = 0, l = this.length; i < l; i++ ) {+				var elem = this[i];++				if ( elem.nodeType === 1 ) {+					if ( !elem.className ) {+						elem.className = value;++					} else {+						var className = " " + elem.className + " ", setClass = elem.className;+						for ( var c = 0, cl = classNames.length; c < cl; c++ ) {+							if ( className.indexOf( " " + classNames[c] + " " ) < 0 ) {+								setClass += " " + classNames[c];+							}+						}+						elem.className = jQuery.trim( setClass );+					}+				}+			}+		}++		return this;+	},++	removeClass: function( value ) {+		if ( jQuery.isFunction(value) ) {+			return this.each(function(i) {+				var self = jQuery(this);+				self.removeClass( value.call(this, i, self.attr("class")) );+			});+		}++		if ( (value && typeof value === "string") || value === undefined ) {+			var classNames = (value || "").split(rspace);++			for ( var i = 0, l = this.length; i < l; i++ ) {+				var elem = this[i];++				if ( elem.nodeType === 1 && elem.className ) {+					if ( value ) {+						var className = (" " + elem.className + " ").replace(rclass, " ");+						for ( var c = 0, cl = classNames.length; c < cl; c++ ) {+							className = className.replace(" " + classNames[c] + " ", " ");+						}+						elem.className = jQuery.trim( className );++					} else {+						elem.className = "";+					}+				}+			}+		}++		return this;+	},++	toggleClass: function( value, stateVal ) {+		var type = typeof value, isBool = typeof stateVal === "boolean";++		if ( jQuery.isFunction( value ) ) {+			return this.each(function(i) {+				var self = jQuery(this);+				self.toggleClass( value.call(this, i, self.attr("class"), stateVal), stateVal );+			});+		}++		return this.each(function() {+			if ( type === "string" ) {+				// toggle individual class names+				var className, i = 0, self = jQuery(this),+					state = stateVal,+					classNames = value.split( rspace );++				while ( (className = classNames[ i++ ]) ) {+					// check each className given, space seperated list+					state = isBool ? state : !self.hasClass( className );+					self[ state ? "addClass" : "removeClass" ]( className );+				}++			} else if ( type === "undefined" || type === "boolean" ) {+				if ( this.className ) {+					// store className if set+					jQuery.data( this, "__className__", this.className );+				}++				// toggle whole className+				this.className = this.className || value === false ? "" : jQuery.data( this, "__className__" ) || "";+			}+		});+	},++	hasClass: function( selector ) {+		var className = " " + selector + " ";+		for ( var i = 0, l = this.length; i < l; i++ ) {+			if ( (" " + this[i].className + " ").replace(rclass, " ").indexOf( className ) > -1 ) {+				return true;+			}+		}++		return false;+	},++	val: function( value ) {+		if ( value === undefined ) {+			var elem = this[0];++			if ( elem ) {+				if ( jQuery.nodeName( elem, "option" ) ) {+					return (elem.attributes.value || {}).specified ? elem.value : elem.text;+				}++				// We need to handle select boxes special+				if ( jQuery.nodeName( elem, "select" ) ) {+					var index = elem.selectedIndex,+						values = [],+						options = elem.options,+						one = elem.type === "select-one";++					// Nothing was selected+					if ( index < 0 ) {+						return null;+					}++					// Loop through all the selected options+					for ( var i = one ? index : 0, max = one ? index + 1 : options.length; i < max; i++ ) {+						var option = options[ i ];++						if ( option.selected ) {+							// Get the specifc value for the option+							value = jQuery(option).val();++							// We don't need an array for one selects+							if ( one ) {+								return value;+							}++							// Multi-Selects return an array+							values.push( value );+						}+					}++					return values;+				}++				// Handle the case where in Webkit "" is returned instead of "on" if a value isn't specified+				if ( rradiocheck.test( elem.type ) && !jQuery.support.checkOn ) {+					return elem.getAttribute("value") === null ? "on" : elem.value;+				}+				++				// Everything else, we just grab the value+				return (elem.value || "").replace(rreturn, "");++			}++			return undefined;+		}++		var isFunction = jQuery.isFunction(value);++		return this.each(function(i) {+			var self = jQuery(this), val = value;++			if ( this.nodeType !== 1 ) {+				return;+			}++			if ( isFunction ) {+				val = value.call(this, i, self.val());+			}++			// Typecast each time if the value is a Function and the appended+			// value is therefore different each time.+			if ( typeof val === "number" ) {+				val += "";+			}++			if ( jQuery.isArray(val) && rradiocheck.test( this.type ) ) {+				this.checked = jQuery.inArray( self.val(), val ) >= 0;++			} else if ( jQuery.nodeName( this, "select" ) ) {+				var values = jQuery.makeArray(val);++				jQuery( "option", this ).each(function() {+					this.selected = jQuery.inArray( jQuery(this).val(), values ) >= 0;+				});++				if ( !values.length ) {+					this.selectedIndex = -1;+				}++			} else {+				this.value = val;+			}+		});+	}+});++jQuery.extend({+	attrFn: {+		val: true,+		css: true,+		html: true,+		text: true,+		data: true,+		width: true,+		height: true,+		offset: true+	},+		+	attr: function( elem, name, value, pass ) {+		// don't set attributes on text and comment nodes+		if ( !elem || elem.nodeType === 3 || elem.nodeType === 8 ) {+			return undefined;+		}++		if ( pass && name in jQuery.attrFn ) {+			return jQuery(elem)[name](value);+		}++		var notxml = elem.nodeType !== 1 || !jQuery.isXMLDoc( elem ),+			// Whether we are setting (or getting)+			set = value !== undefined;++		// Try to normalize/fix the name+		name = notxml && jQuery.props[ name ] || name;++		// Only do all the following if this is a node (faster for style)+		if ( elem.nodeType === 1 ) {+			// These attributes require special treatment+			var special = rspecialurl.test( name );++			// Safari mis-reports the default selected property of an option+			// Accessing the parent's selectedIndex property fixes it+			if ( name === "selected" && !jQuery.support.optSelected ) {+				var parent = elem.parentNode;+				if ( parent ) {+					parent.selectedIndex;+	+					// Make sure that it also works with optgroups, see #5701+					if ( parent.parentNode ) {+						parent.parentNode.selectedIndex;+					}+				}+			}++			// If applicable, access the attribute via the DOM 0 way+			if ( name in elem && notxml && !special ) {+				if ( set ) {+					// We can't allow the type property to be changed (since it causes problems in IE)+					if ( name === "type" && rtype.test( elem.nodeName ) && elem.parentNode ) {+						jQuery.error( "type property can't be changed" );+					}++					elem[ name ] = value;+				}++				// browsers index elements by id/name on forms, give priority to attributes.+				if ( jQuery.nodeName( elem, "form" ) && elem.getAttributeNode(name) ) {+					return elem.getAttributeNode( name ).nodeValue;+				}++				// elem.tabIndex doesn't always return the correct value when it hasn't been explicitly set+				// http://fluidproject.org/blog/2008/01/09/getting-setting-and-removing-tabindex-values-with-javascript/+				if ( name === "tabIndex" ) {+					var attributeNode = elem.getAttributeNode( "tabIndex" );++					return attributeNode && attributeNode.specified ?+						attributeNode.value :+						rfocusable.test( elem.nodeName ) || rclickable.test( elem.nodeName ) && elem.href ?+							0 :+							undefined;+				}++				return elem[ name ];+			}++			if ( !jQuery.support.style && notxml && name === "style" ) {+				if ( set ) {+					elem.style.cssText = "" + value;+				}++				return elem.style.cssText;+			}++			if ( set ) {+				// convert the value to a string (all browsers do this but IE) see #1070+				elem.setAttribute( name, "" + value );+			}++			var attr = !jQuery.support.hrefNormalized && notxml && special ?+					// Some attributes require a special call on IE+					elem.getAttribute( name, 2 ) :+					elem.getAttribute( name );++			// Non-existent attributes return null, we normalize to undefined+			return attr === null ? undefined : attr;+		}++		// elem is actually elem.style ... set the style+		// Using attr for specific style information is now deprecated. Use style instead.+		return jQuery.style( elem, name, value );+	}+});+var rnamespaces = /\.(.*)$/,+	fcleanup = function( nm ) {+		return nm.replace(/[^\w\s\.\|`]/g, function( ch ) {+			return "\\" + ch;+		});+	};++/*+ * A number of helper functions used for managing events.+ * Many of the ideas behind this code originated from+ * Dean Edwards' addEvent library.+ */+jQuery.event = {++	// Bind an event to an element+	// Original by Dean Edwards+	add: function( elem, types, handler, data ) {+		if ( elem.nodeType === 3 || elem.nodeType === 8 ) {+			return;+		}++		// For whatever reason, IE has trouble passing the window object+		// around, causing it to be cloned in the process+		if ( elem.setInterval && ( elem !== window && !elem.frameElement ) ) {+			elem = window;+		}++		if ( handler === false ) {+			handler = returnFalse;+		}++		var handleObjIn, handleObj;++		if ( handler.handler ) {+			handleObjIn = handler;+			handler = handleObjIn.handler;+		}++		// Make sure that the function being executed has a unique ID+		if ( !handler.guid ) {+			handler.guid = jQuery.guid++;+		}++		// Init the element's event structure+		var elemData = jQuery.data( elem );++		// If no elemData is found then we must be trying to bind to one of the+		// banned noData elements+		if ( !elemData ) {+			return;+		}++		var events = elemData.events = elemData.events || {},+			eventHandle = elemData.handle, eventHandle;++		if ( !eventHandle ) {+			elemData.handle = eventHandle = function() {+				// Handle the second event of a trigger and when+				// an event is called after a page has unloaded+				return typeof jQuery !== "undefined" && !jQuery.event.triggered ?+					jQuery.event.handle.apply( eventHandle.elem, arguments ) :+					undefined;+			};+		}++		// Add elem as a property of the handle function+		// This is to prevent a memory leak with non-native events in IE.+		eventHandle.elem = elem;++		// Handle multiple events separated by a space+		// jQuery(...).bind("mouseover mouseout", fn);+		types = types.split(" ");++		var type, i = 0, namespaces;++		while ( (type = types[ i++ ]) ) {+			handleObj = handleObjIn ?+				jQuery.extend({}, handleObjIn) :+				{ handler: handler, data: data };++			// Namespaced event handlers+			if ( type.indexOf(".") > -1 ) {+				namespaces = type.split(".");+				type = namespaces.shift();+				handleObj.namespace = namespaces.slice(0).sort().join(".");++			} else {+				namespaces = [];+				handleObj.namespace = "";+			}++			handleObj.type = type;+			handleObj.guid = handler.guid;++			// Get the current list of functions bound to this event+			var handlers = events[ type ],+				special = jQuery.event.special[ type ] || {};++			// Init the event handler queue+			if ( !handlers ) {+				handlers = events[ type ] = [];++				// Check for a special event handler+				// Only use addEventListener/attachEvent if the special+				// events handler returns false+				if ( !special.setup || special.setup.call( elem, data, namespaces, eventHandle ) === false ) {+					// Bind the global event handler to the element+					if ( elem.addEventListener ) {+						elem.addEventListener( type, eventHandle, false );++					} else if ( elem.attachEvent ) {+						elem.attachEvent( "on" + type, eventHandle );+					}+				}+			}+			+			if ( special.add ) { +				special.add.call( elem, handleObj ); ++				if ( !handleObj.handler.guid ) {+					handleObj.handler.guid = handler.guid;+				}+			}++			// Add the function to the element's handler list+			handlers.push( handleObj );++			// Keep track of which events have been used, for global triggering+			jQuery.event.global[ type ] = true;+		}++		// Nullify elem to prevent memory leaks in IE+		elem = null;+	},++	global: {},++	// Detach an event or set of events from an element+	remove: function( elem, types, handler, pos ) {+		// don't do events on text and comment nodes+		if ( elem.nodeType === 3 || elem.nodeType === 8 ) {+			return;+		}++		if ( handler === false ) {+			handler = returnFalse;+		}++		var ret, type, fn, i = 0, all, namespaces, namespace, special, eventType, handleObj, origType,+			elemData = jQuery.data( elem ),+			events = elemData && elemData.events;++		if ( !elemData || !events ) {+			return;+		}++		// types is actually an event object here+		if ( types && types.type ) {+			handler = types.handler;+			types = types.type;+		}++		// Unbind all events for the element+		if ( !types || typeof types === "string" && types.charAt(0) === "." ) {+			types = types || "";++			for ( type in events ) {+				jQuery.event.remove( elem, type + types );+			}++			return;+		}++		// Handle multiple events separated by a space+		// jQuery(...).unbind("mouseover mouseout", fn);+		types = types.split(" ");++		while ( (type = types[ i++ ]) ) {+			origType = type;+			handleObj = null;+			all = type.indexOf(".") < 0;+			namespaces = [];++			if ( !all ) {+				// Namespaced event handlers+				namespaces = type.split(".");+				type = namespaces.shift();++				namespace = new RegExp("(^|\\.)" + +					jQuery.map( namespaces.slice(0).sort(), fcleanup ).join("\\.(?:.*\\.)?") + "(\\.|$)")+			}++			eventType = events[ type ];++			if ( !eventType ) {+				continue;+			}++			if ( !handler ) {+				for ( var j = 0; j < eventType.length; j++ ) {+					handleObj = eventType[ j ];++					if ( all || namespace.test( handleObj.namespace ) ) {+						jQuery.event.remove( elem, origType, handleObj.handler, j );+						eventType.splice( j--, 1 );+					}+				}++				continue;+			}++			special = jQuery.event.special[ type ] || {};++			for ( var j = pos || 0; j < eventType.length; j++ ) {+				handleObj = eventType[ j ];++				if ( handler.guid === handleObj.guid ) {+					// remove the given handler for the given type+					if ( all || namespace.test( handleObj.namespace ) ) {+						if ( pos == null ) {+							eventType.splice( j--, 1 );+						}++						if ( special.remove ) {+							special.remove.call( elem, handleObj );+						}+					}++					if ( pos != null ) {+						break;+					}+				}+			}++			// remove generic event handler if no more handlers exist+			if ( eventType.length === 0 || pos != null && eventType.length === 1 ) {+				if ( !special.teardown || special.teardown.call( elem, namespaces ) === false ) {+					removeEvent( elem, type, elemData.handle );+				}++				ret = null;+				delete events[ type ];+			}+		}++		// Remove the expando if it's no longer used+		if ( jQuery.isEmptyObject( events ) ) {+			var handle = elemData.handle;+			if ( handle ) {+				handle.elem = null;+			}++			delete elemData.events;+			delete elemData.handle;++			if ( jQuery.isEmptyObject( elemData ) ) {+				jQuery.removeData( elem );+			}+		}+	},++	// bubbling is internal+	trigger: function( event, data, elem /*, bubbling */ ) {+		// Event object or event type+		var type = event.type || event,+			bubbling = arguments[3];++		if ( !bubbling ) {+			event = typeof event === "object" ?+				// jQuery.Event object+				event[expando] ? event :+				// Object literal+				jQuery.extend( jQuery.Event(type), event ) :+				// Just the event type (string)+				jQuery.Event(type);++			if ( type.indexOf("!") >= 0 ) {+				event.type = type = type.slice(0, -1);+				event.exclusive = true;+			}++			// Handle a global trigger+			if ( !elem ) {+				// Don't bubble custom events when global (to avoid too much overhead)+				event.stopPropagation();++				// Only trigger if we've ever bound an event for it+				if ( jQuery.event.global[ type ] ) {+					jQuery.each( jQuery.cache, function() {+						if ( this.events && this.events[type] ) {+							jQuery.event.trigger( event, data, this.handle.elem );+						}+					});+				}+			}++			// Handle triggering a single element++			// don't do events on text and comment nodes+			if ( !elem || elem.nodeType === 3 || elem.nodeType === 8 ) {+				return undefined;+			}++			// Clean up in case it is reused+			event.result = undefined;+			event.target = elem;++			// Clone the incoming data, if any+			data = jQuery.makeArray( data );+			data.unshift( event );+		}++		event.currentTarget = elem;++		// Trigger the event, it is assumed that "handle" is a function+		var handle = jQuery.data( elem, "handle" );+		if ( handle ) {+			handle.apply( elem, data );+		}++		var parent = elem.parentNode || elem.ownerDocument;++		// Trigger an inline bound script+		try {+			if ( !(elem && elem.nodeName && jQuery.noData[elem.nodeName.toLowerCase()]) ) {+				if ( elem[ "on" + type ] && elem[ "on" + type ].apply( elem, data ) === false ) {+					event.result = false;+				}+			}++		// prevent IE from throwing an error for some elements with some event types, see #3533+		} catch (e) {}++		if ( !event.isPropagationStopped() && parent ) {+			jQuery.event.trigger( event, data, parent, true );++		} else if ( !event.isDefaultPrevented() ) {+			var target = event.target, old,+				isClick = jQuery.nodeName(target, "a") && type === "click",+				special = jQuery.event.special[ type ] || {};++			if ( (!special._default || special._default.call( elem, event ) === false) && +				!isClick && !(target && target.nodeName && jQuery.noData[target.nodeName.toLowerCase()]) ) {++				try {+					if ( target[ type ] ) {+						// Make sure that we don't accidentally re-trigger the onFOO events+						old = target[ "on" + type ];++						if ( old ) {+							target[ "on" + type ] = null;+						}++						jQuery.event.triggered = true;+						target[ type ]();+					}++				// prevent IE from throwing an error for some elements with some event types, see #3533+				} catch (e) {}++				if ( old ) {+					target[ "on" + type ] = old;+				}++				jQuery.event.triggered = false;+			}+		}+	},++	handle: function( event ) {+		var all, handlers, namespaces, namespace, events;++		event = arguments[0] = jQuery.event.fix( event || window.event );+		event.currentTarget = this;++		// Namespaced event handlers+		all = event.type.indexOf(".") < 0 && !event.exclusive;++		if ( !all ) {+			namespaces = event.type.split(".");+			event.type = namespaces.shift();+			namespace = new RegExp("(^|\\.)" + namespaces.slice(0).sort().join("\\.(?:.*\\.)?") + "(\\.|$)");+		}++		events = jQuery.data(this, "events");+		handlers = (events || {})[ event.type ];++		if ( events && handlers ) {+			// Clone the handlers to prevent manipulation+			handlers = handlers.slice(0);++			for ( var j = 0, l = handlers.length; j < l; j++ ) {+				var handleObj = handlers[ j ];++				// Filter the functions by class+				if ( all || namespace.test( handleObj.namespace ) ) {+					// Pass in a reference to the handler function itself+					// So that we can later remove it+					event.handler = handleObj.handler;+					event.data = handleObj.data;+					event.handleObj = handleObj;+	+					var ret = handleObj.handler.apply( this, arguments );++					if ( ret !== undefined ) {+						event.result = ret;+						if ( ret === false ) {+							event.preventDefault();+							event.stopPropagation();+						}+					}++					if ( event.isImmediatePropagationStopped() ) {+						break;+					}+				}+			}+		}++		return event.result;+	},++	props: "altKey attrChange attrName bubbles button cancelable charCode clientX clientY ctrlKey currentTarget data detail eventPhase fromElement handler keyCode layerX layerY metaKey newValue offsetX offsetY originalTarget pageX pageY prevValue relatedNode relatedTarget screenX screenY shiftKey srcElement target toElement view wheelDelta which".split(" "),++	fix: function( event ) {+		if ( event[ expando ] ) {+			return event;+		}++		// store a copy of the original event object+		// and "clone" to set read-only properties+		var originalEvent = event;+		event = jQuery.Event( originalEvent );++		for ( var i = this.props.length, prop; i; ) {+			prop = this.props[ --i ];+			event[ prop ] = originalEvent[ prop ];+		}++		// Fix target property, if necessary+		if ( !event.target ) {+			event.target = event.srcElement || document; // Fixes #1925 where srcElement might not be defined either+		}++		// check if target is a textnode (safari)+		if ( event.target.nodeType === 3 ) {+			event.target = event.target.parentNode;+		}++		// Add relatedTarget, if necessary+		if ( !event.relatedTarget && event.fromElement ) {+			event.relatedTarget = event.fromElement === event.target ? event.toElement : event.fromElement;+		}++		// Calculate pageX/Y if missing and clientX/Y available+		if ( event.pageX == null && event.clientX != null ) {+			var doc = document.documentElement, body = document.body;+			event.pageX = event.clientX + (doc && doc.scrollLeft || body && body.scrollLeft || 0) - (doc && doc.clientLeft || body && body.clientLeft || 0);+			event.pageY = event.clientY + (doc && doc.scrollTop  || body && body.scrollTop  || 0) - (doc && doc.clientTop  || body && body.clientTop  || 0);+		}++		// Add which for key events+		if ( !event.which && ((event.charCode || event.charCode === 0) ? event.charCode : event.keyCode) ) {+			event.which = event.charCode || event.keyCode;+		}++		// Add metaKey to non-Mac browsers (use ctrl for PC's and Meta for Macs)+		if ( !event.metaKey && event.ctrlKey ) {+			event.metaKey = event.ctrlKey;+		}++		// Add which for click: 1 === left; 2 === middle; 3 === right+		// Note: button is not normalized, so don't use it+		if ( !event.which && event.button !== undefined ) {+			event.which = (event.button & 1 ? 1 : ( event.button & 2 ? 3 : ( event.button & 4 ? 2 : 0 ) ));+		}++		return event;+	},++	// Deprecated, use jQuery.guid instead+	guid: 1E8,++	// Deprecated, use jQuery.proxy instead+	proxy: jQuery.proxy,++	special: {+		ready: {+			// Make sure the ready event is setup+			setup: jQuery.bindReady,+			teardown: jQuery.noop+		},++		live: {+			add: function( handleObj ) {+				jQuery.event.add( this, handleObj.origType, jQuery.extend({}, handleObj, {handler: liveHandler}) ); +			},++			remove: function( handleObj ) {+				var remove = true,+					type = handleObj.origType.replace(rnamespaces, "");+				+				jQuery.each( jQuery.data(this, "events").live || [], function() {+					if ( type === this.origType.replace(rnamespaces, "") ) {+						remove = false;+						return false;+					}+				});++				if ( remove ) {+					jQuery.event.remove( this, handleObj.origType, liveHandler );+				}+			}++		},++		beforeunload: {+			setup: function( data, namespaces, eventHandle ) {+				// We only want to do this special case on windows+				if ( this.setInterval ) {+					this.onbeforeunload = eventHandle;+				}+			},++			teardown: function( namespaces, eventHandle ) {+				if ( this.onbeforeunload === eventHandle ) {+					this.onbeforeunload = null;+				}+			}+		}+	}+};++var removeEvent = document.removeEventListener ?+	function( elem, type, handle ) {+		if ( elem.removeEventListener ) {+			elem.removeEventListener( type, handle, false );+		}+	} : +	function( elem, type, handle ) {+		if ( elem.detachEvent ) {+			elem.detachEvent( "on" + type, handle );+		}+	};++jQuery.Event = function( src ) {+	// Allow instantiation without the 'new' keyword+	if ( !this.preventDefault ) {+		return new jQuery.Event( src );+	}++	// Event object+	if ( src && src.type ) {+		this.originalEvent = src;+		this.type = src.type;+	// Event type+	} else {+		this.type = src;+	}++	// timeStamp is buggy for some events on Firefox(#3843)+	// So we won't rely on the native value+	this.timeStamp = now();++	// Mark it as fixed+	this[ expando ] = true;+};++function returnFalse() {+	return false;+}+function returnTrue() {+	return true;+}++// jQuery.Event is based on DOM3 Events as specified by the ECMAScript Language Binding+// http://www.w3.org/TR/2003/WD-DOM-Level-3-Events-20030331/ecma-script-binding.html+jQuery.Event.prototype = {+	preventDefault: function() {+		this.isDefaultPrevented = returnTrue;++		var e = this.originalEvent;+		if ( !e ) {+			return;+		}+		+		// if preventDefault exists run it on the original event+		if ( e.preventDefault ) {+			e.preventDefault();+		}+		// otherwise set the returnValue property of the original event to false (IE)+		e.returnValue = false;+	},+	stopPropagation: function() {+		this.isPropagationStopped = returnTrue;++		var e = this.originalEvent;+		if ( !e ) {+			return;+		}+		// if stopPropagation exists run it on the original event+		if ( e.stopPropagation ) {+			e.stopPropagation();+		}+		// otherwise set the cancelBubble property of the original event to true (IE)+		e.cancelBubble = true;+	},+	stopImmediatePropagation: function() {+		this.isImmediatePropagationStopped = returnTrue;+		this.stopPropagation();+	},+	isDefaultPrevented: returnFalse,+	isPropagationStopped: returnFalse,+	isImmediatePropagationStopped: returnFalse+};++// Checks if an event happened on an element within another element+// Used in jQuery.event.special.mouseenter and mouseleave handlers+var withinElement = function( event ) {+	// Check if mouse(over|out) are still within the same parent element+	var parent = event.relatedTarget;++	// Firefox sometimes assigns relatedTarget a XUL element+	// which we cannot access the parentNode property of+	try {+		// Traverse up the tree+		while ( parent && parent !== this ) {+			parent = parent.parentNode;+		}++		if ( parent !== this ) {+			// set the correct event type+			event.type = event.data;++			// handle event if we actually just moused on to a non sub-element+			jQuery.event.handle.apply( this, arguments );+		}++	// assuming we've left the element since we most likely mousedover a xul element+	} catch(e) { }+},++// In case of event delegation, we only need to rename the event.type,+// liveHandler will take care of the rest.+delegate = function( event ) {+	event.type = event.data;+	jQuery.event.handle.apply( this, arguments );+};++// Create mouseenter and mouseleave events+jQuery.each({+	mouseenter: "mouseover",+	mouseleave: "mouseout"+}, function( orig, fix ) {+	jQuery.event.special[ orig ] = {+		setup: function( data ) {+			jQuery.event.add( this, fix, data && data.selector ? delegate : withinElement, orig );+		},+		teardown: function( data ) {+			jQuery.event.remove( this, fix, data && data.selector ? delegate : withinElement );+		}+	};+});++// submit delegation+if ( !jQuery.support.submitBubbles ) {++	jQuery.event.special.submit = {+		setup: function( data, namespaces ) {+			if ( this.nodeName.toLowerCase() !== "form" ) {+				jQuery.event.add(this, "click.specialSubmit", function( e ) {+					var elem = e.target, type = elem.type;++					if ( (type === "submit" || type === "image") && jQuery( elem ).closest("form").length ) {+						return trigger( "submit", this, arguments );+					}+				});+	 +				jQuery.event.add(this, "keypress.specialSubmit", function( e ) {+					var elem = e.target, type = elem.type;++					if ( (type === "text" || type === "password") && jQuery( elem ).closest("form").length && e.keyCode === 13 ) {+						return trigger( "submit", this, arguments );+					}+				});++			} else {+				return false;+			}+		},++		teardown: function( namespaces ) {+			jQuery.event.remove( this, ".specialSubmit" );+		}+	};++}++// change delegation, happens here so we have bind.+if ( !jQuery.support.changeBubbles ) {++	var formElems = /textarea|input|select/i,++	changeFilters,++	getVal = function( elem ) {+		var type = elem.type, val = elem.value;++		if ( type === "radio" || type === "checkbox" ) {+			val = elem.checked;++		} else if ( type === "select-multiple" ) {+			val = elem.selectedIndex > -1 ?+				jQuery.map( elem.options, function( elem ) {+					return elem.selected;+				}).join("-") :+				"";++		} else if ( elem.nodeName.toLowerCase() === "select" ) {+			val = elem.selectedIndex;+		}++		return val;+	},++	testChange = function testChange( e ) {+		var elem = e.target, data, val;++		if ( !formElems.test( elem.nodeName ) || elem.readOnly ) {+			return;+		}++		data = jQuery.data( elem, "_change_data" );+		val = getVal(elem);++		// the current data will be also retrieved by beforeactivate+		if ( e.type !== "focusout" || elem.type !== "radio" ) {+			jQuery.data( elem, "_change_data", val );+		}+		+		if ( data === undefined || val === data ) {+			return;+		}++		if ( data != null || val ) {+			e.type = "change";+			return jQuery.event.trigger( e, arguments[1], elem );+		}+	};++	jQuery.event.special.change = {+		filters: {+			focusout: testChange, ++			click: function( e ) {+				var elem = e.target, type = elem.type;++				if ( type === "radio" || type === "checkbox" || elem.nodeName.toLowerCase() === "select" ) {+					return testChange.call( this, e );+				}+			},++			// Change has to be called before submit+			// Keydown will be called before keypress, which is used in submit-event delegation+			keydown: function( e ) {+				var elem = e.target, type = elem.type;++				if ( (e.keyCode === 13 && elem.nodeName.toLowerCase() !== "textarea") ||+					(e.keyCode === 32 && (type === "checkbox" || type === "radio")) ||+					type === "select-multiple" ) {+					return testChange.call( this, e );+				}+			},++			// Beforeactivate happens also before the previous element is blurred+			// with this event you can't trigger a change event, but you can store+			// information/focus[in] is not needed anymore+			beforeactivate: function( e ) {+				var elem = e.target;+				jQuery.data( elem, "_change_data", getVal(elem) );+			}+		},++		setup: function( data, namespaces ) {+			if ( this.type === "file" ) {+				return false;+			}++			for ( var type in changeFilters ) {+				jQuery.event.add( this, type + ".specialChange", changeFilters[type] );+			}++			return formElems.test( this.nodeName );+		},++		teardown: function( namespaces ) {+			jQuery.event.remove( this, ".specialChange" );++			return formElems.test( this.nodeName );+		}+	};++	changeFilters = jQuery.event.special.change.filters;+}++function trigger( type, elem, args ) {+	args[0].type = type;+	return jQuery.event.handle.apply( elem, args );+}++// Create "bubbling" focus and blur events+if ( document.addEventListener ) {+	jQuery.each({ focus: "focusin", blur: "focusout" }, function( orig, fix ) {+		jQuery.event.special[ fix ] = {+			setup: function() {+				this.addEventListener( orig, handler, true );+			}, +			teardown: function() { +				this.removeEventListener( orig, handler, true );+			}+		};++		function handler( e ) { +			e = jQuery.event.fix( e );+			e.type = fix;+			return jQuery.event.handle.call( this, e );+		}+	});+}++jQuery.each(["bind", "one"], function( i, name ) {+	jQuery.fn[ name ] = function( type, data, fn ) {+		// Handle object literals+		if ( typeof type === "object" ) {+			for ( var key in type ) {+				this[ name ](key, data, type[key], fn);+			}+			return this;+		}+		+		if ( jQuery.isFunction( data ) || data === false ) {+			fn = data;+			data = undefined;+		}++		var handler = name === "one" ? jQuery.proxy( fn, function( event ) {+			jQuery( this ).unbind( event, handler );+			return fn.apply( this, arguments );+		}) : fn;++		if ( type === "unload" && name !== "one" ) {+			this.one( type, data, fn );++		} else {+			for ( var i = 0, l = this.length; i < l; i++ ) {+				jQuery.event.add( this[i], type, handler, data );+			}+		}++		return this;+	};+});++jQuery.fn.extend({+	unbind: function( type, fn ) {+		// Handle object literals+		if ( typeof type === "object" && !type.preventDefault ) {+			for ( var key in type ) {+				this.unbind(key, type[key]);+			}++		} else {+			for ( var i = 0, l = this.length; i < l; i++ ) {+				jQuery.event.remove( this[i], type, fn );+			}+		}++		return this;+	},+	+	delegate: function( selector, types, data, fn ) {+		return this.live( types, data, fn, selector );+	},+	+	undelegate: function( selector, types, fn ) {+		if ( arguments.length === 0 ) {+				return this.unbind( "live" );+		+		} else {+			return this.die( types, null, fn, selector );+		}+	},+	+	trigger: function( type, data ) {+		return this.each(function() {+			jQuery.event.trigger( type, data, this );+		});+	},++	triggerHandler: function( type, data ) {+		if ( this[0] ) {+			var event = jQuery.Event( type );+			event.preventDefault();+			event.stopPropagation();+			jQuery.event.trigger( event, data, this[0] );+			return event.result;+		}+	},++	toggle: function( fn ) {+		// Save reference to arguments for access in closure+		var args = arguments, i = 1;++		// link all the functions, so any of them can unbind this click handler+		while ( i < args.length ) {+			jQuery.proxy( fn, args[ i++ ] );+		}++		return this.click( jQuery.proxy( fn, function( event ) {+			// Figure out which function to execute+			var lastToggle = ( jQuery.data( this, "lastToggle" + fn.guid ) || 0 ) % i;+			jQuery.data( this, "lastToggle" + fn.guid, lastToggle + 1 );++			// Make sure that clicks stop+			event.preventDefault();++			// and execute the function+			return args[ lastToggle ].apply( this, arguments ) || false;+		}));+	},++	hover: function( fnOver, fnOut ) {+		return this.mouseenter( fnOver ).mouseleave( fnOut || fnOver );+	}+});++var liveMap = {+	focus: "focusin",+	blur: "focusout",+	mouseenter: "mouseover",+	mouseleave: "mouseout"+};++jQuery.each(["live", "die"], function( i, name ) {+	jQuery.fn[ name ] = function( types, data, fn, origSelector /* Internal Use Only */ ) {+		var type, i = 0, match, namespaces, preType,+			selector = origSelector || this.selector,+			context = origSelector ? this : jQuery( this.context );++		if ( jQuery.isFunction( data ) ) {+			fn = data;+			data = undefined;+		}++		types = (types || "").split(" ");++		while ( (type = types[ i++ ]) != null ) {+			match = rnamespaces.exec( type );+			namespaces = "";++			if ( match )  {+				namespaces = match[0];+				type = type.replace( rnamespaces, "" );+			}++			if ( type === "hover" ) {+				types.push( "mouseenter" + namespaces, "mouseleave" + namespaces );+				continue;+			}++			preType = type;++			if ( type === "focus" || type === "blur" ) {+				types.push( liveMap[ type ] + namespaces );+				type = type + namespaces;++			} else {+				type = (liveMap[ type ] || type) + namespaces;+			}++			if ( name === "live" ) {+				// bind live handler+				context.each(function(){+					jQuery.event.add( this, liveConvert( type, selector ),+						{ data: data, selector: selector, handler: fn, origType: type, origHandler: fn, preType: preType } );+				});++			} else {+				// unbind live handler+				context.unbind( liveConvert( type, selector ), fn );+			}+		}+		+		return this;+	}+});++function liveHandler( event ) {+	var stop, maxLevel, elems = [], selectors = [],+		related, match, handleObj, elem, j, i, l, data, close,+		events = jQuery.data( this, "events" );++	// Make sure we avoid non-left-click bubbling in Firefox (#3861)+	if ( event.liveFired === this || !events || !events.live || event.button && event.type === "click" ) {+		return;+	}++	event.liveFired = this;++	var live = events.live.slice(0);++	for ( j = 0; j < live.length; j++ ) {+		handleObj = live[j];++		if ( handleObj.origType.replace( rnamespaces, "" ) === event.type ) {+			selectors.push( handleObj.selector );++		} else {+			live.splice( j--, 1 );+		}+	}++	match = jQuery( event.target ).closest( selectors, event.currentTarget );++	for ( i = 0, l = match.length; i < l; i++ ) {+		close = match[i];++		for ( j = 0; j < live.length; j++ ) {+			handleObj = live[j];++			if ( close.selector === handleObj.selector ) {+				elem = close.elem;+				related = null;++				// Those two events require additional checking+				if ( handleObj.preType === "mouseenter" || handleObj.preType === "mouseleave" ) {+					event.type = handleObj.preType;+					related = jQuery( event.relatedTarget ).closest( handleObj.selector )[0];+				}++				if ( !related || related !== elem ) {+					elems.push({ elem: elem, handleObj: handleObj, level: close.level });+				}+			}+		}+	}++	for ( i = 0, l = elems.length; i < l; i++ ) {+		match = elems[i];++		if ( maxLevel && match.level > maxLevel ) {+			break;+		}++		event.currentTarget = match.elem;+		event.data = match.handleObj.data;+		event.handleObj = match.handleObj;++		ret = match.handleObj.origHandler.apply( match.elem, arguments );++		if ( ret === false || event.isPropagationStopped() ) {+			maxLevel = match.level;++			if ( ret === false ) {+				stop = false;+			}+		}+	}++	return stop;+}++function liveConvert( type, selector ) {+	return "live." + (type && type !== "*" ? type + "." : "") + selector.replace(/\./g, "`").replace(/ /g, "&");+}++jQuery.each( ("blur focus focusin focusout load resize scroll unload click dblclick " ++	"mousedown mouseup mousemove mouseover mouseout mouseenter mouseleave " ++	"change select submit keydown keypress keyup error").split(" "), function( i, name ) {++	// Handle event binding+	jQuery.fn[ name ] = function( data, fn ) {+		if ( fn == undefined ) {+			fn = data;+			data = null;+		}++		return arguments.length > 0 ?+			this.bind( name, data, fn ) :+			this.trigger( name );+	};++	if ( jQuery.attrFn ) {+		jQuery.attrFn[ name ] = true;+	}+});++// Prevent memory leaks in IE+// Window isn't included so as not to unbind existing unload events+// More info:+//  - http://isaacschlueter.com/2006/10/msie-memory-leaks/+if ( window.attachEvent && !window.addEventListener ) {+	window.attachEvent("onunload", function() {+		for ( var id in jQuery.cache ) {+			if ( jQuery.cache[ id ].handle ) {+				// Try/Catch is to handle iframes being unloaded, see #4280+				try {+					jQuery.event.remove( jQuery.cache[ id ].handle.elem );+				} catch(e) {}+			}+		}+	});+}+/*!+ * Sizzle CSS Selector Engine - v1.0+ *  Copyright 2009, The Dojo Foundation+ *  Released under the MIT, BSD, and GPL Licenses.+ *  More information: http://sizzlejs.com/+ */+(function(){++var chunker = /((?:\((?:\([^()]+\)|[^()]+)+\)|\[(?:\[[^[\]]*\]|['"][^'"]*['"]|[^[\]'"]+)+\]|\\.|[^ >+~,(\[\\]+)+|[>+~])(\s*,\s*)?((?:.|\r|\n)*)/g,+	done = 0,+	toString = Object.prototype.toString,+	hasDuplicate = false,+	baseHasDuplicate = true;++// Here we check if the JavaScript engine is using some sort of+// optimization where it does not always call our comparision+// function. If that is the case, discard the hasDuplicate value.+//   Thus far that includes Google Chrome.+[0, 0].sort(function(){+	baseHasDuplicate = false;+	return 0;+});++var Sizzle = function(selector, context, results, seed) {+	results = results || [];+	var origContext = context = context || document;++	if ( context.nodeType !== 1 && context.nodeType !== 9 ) {+		return [];+	}+	+	if ( !selector || typeof selector !== "string" ) {+		return results;+	}++	var parts = [], m, set, checkSet, extra, prune = true, contextXML = isXML(context),+		soFar = selector;+	+	// Reset the position of the chunker regexp (start from head)+	while ( (chunker.exec(""), m = chunker.exec(soFar)) !== null ) {+		soFar = m[3];+		+		parts.push( m[1] );+		+		if ( m[2] ) {+			extra = m[3];+			break;+		}+	}++	if ( parts.length > 1 && origPOS.exec( selector ) ) {+		if ( parts.length === 2 && Expr.relative[ parts[0] ] ) {+			set = posProcess( parts[0] + parts[1], context );+		} else {+			set = Expr.relative[ parts[0] ] ?+				[ context ] :+				Sizzle( parts.shift(), context );++			while ( parts.length ) {+				selector = parts.shift();++				if ( Expr.relative[ selector ] ) {+					selector += parts.shift();+				}+				+				set = posProcess( selector, set );+			}+		}+	} else {+		// Take a shortcut and set the context if the root selector is an ID+		// (but not if it'll be faster if the inner selector is an ID)+		if ( !seed && parts.length > 1 && context.nodeType === 9 && !contextXML &&+				Expr.match.ID.test(parts[0]) && !Expr.match.ID.test(parts[parts.length - 1]) ) {+			var ret = Sizzle.find( parts.shift(), context, contextXML );+			context = ret.expr ? Sizzle.filter( ret.expr, ret.set )[0] : ret.set[0];+		}++		if ( context ) {+			var ret = seed ?+				{ expr: parts.pop(), set: makeArray(seed) } :+				Sizzle.find( parts.pop(), parts.length === 1 && (parts[0] === "~" || parts[0] === "+") && context.parentNode ? context.parentNode : context, contextXML );+			set = ret.expr ? Sizzle.filter( ret.expr, ret.set ) : ret.set;++			if ( parts.length > 0 ) {+				checkSet = makeArray(set);+			} else {+				prune = false;+			}++			while ( parts.length ) {+				var cur = parts.pop(), pop = cur;++				if ( !Expr.relative[ cur ] ) {+					cur = "";+				} else {+					pop = parts.pop();+				}++				if ( pop == null ) {+					pop = context;+				}++				Expr.relative[ cur ]( checkSet, pop, contextXML );+			}+		} else {+			checkSet = parts = [];+		}+	}++	if ( !checkSet ) {+		checkSet = set;+	}++	if ( !checkSet ) {+		Sizzle.error( cur || selector );+	}++	if ( toString.call(checkSet) === "[object Array]" ) {+		if ( !prune ) {+			results.push.apply( results, checkSet );+		} else if ( context && context.nodeType === 1 ) {+			for ( var i = 0; checkSet[i] != null; i++ ) {+				if ( checkSet[i] && (checkSet[i] === true || checkSet[i].nodeType === 1 && contains(context, checkSet[i])) ) {+					results.push( set[i] );+				}+			}+		} else {+			for ( var i = 0; checkSet[i] != null; i++ ) {+				if ( checkSet[i] && checkSet[i].nodeType === 1 ) {+					results.push( set[i] );+				}+			}+		}+	} else {+		makeArray( checkSet, results );+	}++	if ( extra ) {+		Sizzle( extra, origContext, results, seed );+		Sizzle.uniqueSort( results );+	}++	return results;+};++Sizzle.uniqueSort = function(results){+	if ( sortOrder ) {+		hasDuplicate = baseHasDuplicate;+		results.sort(sortOrder);++		if ( hasDuplicate ) {+			for ( var i = 1; i < results.length; i++ ) {+				if ( results[i] === results[i-1] ) {+					results.splice(i--, 1);+				}+			}+		}+	}++	return results;+};++Sizzle.matches = function(expr, set){+	return Sizzle(expr, null, null, set);+};++Sizzle.find = function(expr, context, isXML){+	var set, match;++	if ( !expr ) {+		return [];+	}++	for ( var i = 0, l = Expr.order.length; i < l; i++ ) {+		var type = Expr.order[i], match;+		+		if ( (match = Expr.leftMatch[ type ].exec( expr )) ) {+			var left = match[1];+			match.splice(1,1);++			if ( left.substr( left.length - 1 ) !== "\\" ) {+				match[1] = (match[1] || "").replace(/\\/g, "");+				set = Expr.find[ type ]( match, context, isXML );+				if ( set != null ) {+					expr = expr.replace( Expr.match[ type ], "" );+					break;+				}+			}+		}+	}++	if ( !set ) {+		set = context.getElementsByTagName("*");+	}++	return {set: set, expr: expr};+};++Sizzle.filter = function(expr, set, inplace, not){+	var old = expr, result = [], curLoop = set, match, anyFound,+		isXMLFilter = set && set[0] && isXML(set[0]);++	while ( expr && set.length ) {+		for ( var type in Expr.filter ) {+			if ( (match = Expr.leftMatch[ type ].exec( expr )) != null && match[2] ) {+				var filter = Expr.filter[ type ], found, item, left = match[1];+				anyFound = false;++				match.splice(1,1);++				if ( left.substr( left.length - 1 ) === "\\" ) {+					continue;+				}++				if ( curLoop === result ) {+					result = [];+				}++				if ( Expr.preFilter[ type ] ) {+					match = Expr.preFilter[ type ]( match, curLoop, inplace, result, not, isXMLFilter );++					if ( !match ) {+						anyFound = found = true;+					} else if ( match === true ) {+						continue;+					}+				}++				if ( match ) {+					for ( var i = 0; (item = curLoop[i]) != null; i++ ) {+						if ( item ) {+							found = filter( item, match, i, curLoop );+							var pass = not ^ !!found;++							if ( inplace && found != null ) {+								if ( pass ) {+									anyFound = true;+								} else {+									curLoop[i] = false;+								}+							} else if ( pass ) {+								result.push( item );+								anyFound = true;+							}+						}+					}+				}++				if ( found !== undefined ) {+					if ( !inplace ) {+						curLoop = result;+					}++					expr = expr.replace( Expr.match[ type ], "" );++					if ( !anyFound ) {+						return [];+					}++					break;+				}+			}+		}++		// Improper expression+		if ( expr === old ) {+			if ( anyFound == null ) {+				Sizzle.error( expr );+			} else {+				break;+			}+		}++		old = expr;+	}++	return curLoop;+};++Sizzle.error = function( msg ) {+	throw "Syntax error, unrecognized expression: " + msg;+};++var Expr = Sizzle.selectors = {+	order: [ "ID", "NAME", "TAG" ],+	match: {+		ID: /#((?:[\w\u00c0-\uFFFF-]|\\.)+)/,+		CLASS: /\.((?:[\w\u00c0-\uFFFF-]|\\.)+)/,+		NAME: /\[name=['"]*((?:[\w\u00c0-\uFFFF-]|\\.)+)['"]*\]/,+		ATTR: /\[\s*((?:[\w\u00c0-\uFFFF-]|\\.)+)\s*(?:(\S?=)\s*(['"]*)(.*?)\3|)\s*\]/,+		TAG: /^((?:[\w\u00c0-\uFFFF\*-]|\\.)+)/,+		CHILD: /:(only|nth|last|first)-child(?:\((even|odd|[\dn+-]*)\))?/,+		POS: /:(nth|eq|gt|lt|first|last|even|odd)(?:\((\d*)\))?(?=[^-]|$)/,+		PSEUDO: /:((?:[\w\u00c0-\uFFFF-]|\\.)+)(?:\((['"]?)((?:\([^\)]+\)|[^\(\)]*)+)\2\))?/+	},+	leftMatch: {},+	attrMap: {+		"class": "className",+		"for": "htmlFor"+	},+	attrHandle: {+		href: function(elem){+			return elem.getAttribute("href");+		}+	},+	relative: {+		"+": function(checkSet, part){+			var isPartStr = typeof part === "string",+				isTag = isPartStr && !/\W/.test(part),+				isPartStrNotTag = isPartStr && !isTag;++			if ( isTag ) {+				part = part.toLowerCase();+			}++			for ( var i = 0, l = checkSet.length, elem; i < l; i++ ) {+				if ( (elem = checkSet[i]) ) {+					while ( (elem = elem.previousSibling) && elem.nodeType !== 1 ) {}++					checkSet[i] = isPartStrNotTag || elem && elem.nodeName.toLowerCase() === part ?+						elem || false :+						elem === part;+				}+			}++			if ( isPartStrNotTag ) {+				Sizzle.filter( part, checkSet, true );+			}+		},+		">": function(checkSet, part){+			var isPartStr = typeof part === "string";++			if ( isPartStr && !/\W/.test(part) ) {+				part = part.toLowerCase();++				for ( var i = 0, l = checkSet.length; i < l; i++ ) {+					var elem = checkSet[i];+					if ( elem ) {+						var parent = elem.parentNode;+						checkSet[i] = parent.nodeName.toLowerCase() === part ? parent : false;+					}+				}+			} else {+				for ( var i = 0, l = checkSet.length; i < l; i++ ) {+					var elem = checkSet[i];+					if ( elem ) {+						checkSet[i] = isPartStr ?+							elem.parentNode :+							elem.parentNode === part;+					}+				}++				if ( isPartStr ) {+					Sizzle.filter( part, checkSet, true );+				}+			}+		},+		"": function(checkSet, part, isXML){+			var doneName = done++, checkFn = dirCheck;++			if ( typeof part === "string" && !/\W/.test(part) ) {+				var nodeCheck = part = part.toLowerCase();+				checkFn = dirNodeCheck;+			}++			checkFn("parentNode", part, doneName, checkSet, nodeCheck, isXML);+		},+		"~": function(checkSet, part, isXML){+			var doneName = done++, checkFn = dirCheck;++			if ( typeof part === "string" && !/\W/.test(part) ) {+				var nodeCheck = part = part.toLowerCase();+				checkFn = dirNodeCheck;+			}++			checkFn("previousSibling", part, doneName, checkSet, nodeCheck, isXML);+		}+	},+	find: {+		ID: function(match, context, isXML){+			if ( typeof context.getElementById !== "undefined" && !isXML ) {+				var m = context.getElementById(match[1]);+				return m ? [m] : [];+			}+		},+		NAME: function(match, context){+			if ( typeof context.getElementsByName !== "undefined" ) {+				var ret = [], results = context.getElementsByName(match[1]);++				for ( var i = 0, l = results.length; i < l; i++ ) {+					if ( results[i].getAttribute("name") === match[1] ) {+						ret.push( results[i] );+					}+				}++				return ret.length === 0 ? null : ret;+			}+		},+		TAG: function(match, context){+			return context.getElementsByTagName(match[1]);+		}+	},+	preFilter: {+		CLASS: function(match, curLoop, inplace, result, not, isXML){+			match = " " + match[1].replace(/\\/g, "") + " ";++			if ( isXML ) {+				return match;+			}++			for ( var i = 0, elem; (elem = curLoop[i]) != null; i++ ) {+				if ( elem ) {+					if ( not ^ (elem.className && (" " + elem.className + " ").replace(/[\t\n]/g, " ").indexOf(match) >= 0) ) {+						if ( !inplace ) {+							result.push( elem );+						}+					} else if ( inplace ) {+						curLoop[i] = false;+					}+				}+			}++			return false;+		},+		ID: function(match){+			return match[1].replace(/\\/g, "");+		},+		TAG: function(match, curLoop){+			return match[1].toLowerCase();+		},+		CHILD: function(match){+			if ( match[1] === "nth" ) {+				// parse equations like 'even', 'odd', '5', '2n', '3n+2', '4n-1', '-n+6'+				var test = /(-?)(\d*)n((?:\+|-)?\d*)/.exec(+					match[2] === "even" && "2n" || match[2] === "odd" && "2n+1" ||+					!/\D/.test( match[2] ) && "0n+" + match[2] || match[2]);++				// calculate the numbers (first)n+(last) including if they are negative+				match[2] = (test[1] + (test[2] || 1)) - 0;+				match[3] = test[3] - 0;+			}++			// TODO: Move to normal caching system+			match[0] = done++;++			return match;+		},+		ATTR: function(match, curLoop, inplace, result, not, isXML){+			var name = match[1].replace(/\\/g, "");+			+			if ( !isXML && Expr.attrMap[name] ) {+				match[1] = Expr.attrMap[name];+			}++			if ( match[2] === "~=" ) {+				match[4] = " " + match[4] + " ";+			}++			return match;+		},+		PSEUDO: function(match, curLoop, inplace, result, not){+			if ( match[1] === "not" ) {+				// If we're dealing with a complex expression, or a simple one+				if ( ( chunker.exec(match[3]) || "" ).length > 1 || /^\w/.test(match[3]) ) {+					match[3] = Sizzle(match[3], null, null, curLoop);+				} else {+					var ret = Sizzle.filter(match[3], curLoop, inplace, true ^ not);+					if ( !inplace ) {+						result.push.apply( result, ret );+					}+					return false;+				}+			} else if ( Expr.match.POS.test( match[0] ) || Expr.match.CHILD.test( match[0] ) ) {+				return true;+			}+			+			return match;+		},+		POS: function(match){+			match.unshift( true );+			return match;+		}+	},+	filters: {+		enabled: function(elem){+			return elem.disabled === false && elem.type !== "hidden";+		},+		disabled: function(elem){+			return elem.disabled === true;+		},+		checked: function(elem){+			return elem.checked === true;+		},+		selected: function(elem){+			// Accessing this property makes selected-by-default+			// options in Safari work properly+			elem.parentNode.selectedIndex;+			return elem.selected === true;+		},+		parent: function(elem){+			return !!elem.firstChild;+		},+		empty: function(elem){+			return !elem.firstChild;+		},+		has: function(elem, i, match){+			return !!Sizzle( match[3], elem ).length;+		},+		header: function(elem){+			return /h\d/i.test( elem.nodeName );+		},+		text: function(elem){+			return "text" === elem.type;+		},+		radio: function(elem){+			return "radio" === elem.type;+		},+		checkbox: function(elem){+			return "checkbox" === elem.type;+		},+		file: function(elem){+			return "file" === elem.type;+		},+		password: function(elem){+			return "password" === elem.type;+		},+		submit: function(elem){+			return "submit" === elem.type;+		},+		image: function(elem){+			return "image" === elem.type;+		},+		reset: function(elem){+			return "reset" === elem.type;+		},+		button: function(elem){+			return "button" === elem.type || elem.nodeName.toLowerCase() === "button";+		},+		input: function(elem){+			return /input|select|textarea|button/i.test(elem.nodeName);+		}+	},+	setFilters: {+		first: function(elem, i){+			return i === 0;+		},+		last: function(elem, i, match, array){+			return i === array.length - 1;+		},+		even: function(elem, i){+			return i % 2 === 0;+		},+		odd: function(elem, i){+			return i % 2 === 1;+		},+		lt: function(elem, i, match){+			return i < match[3] - 0;+		},+		gt: function(elem, i, match){+			return i > match[3] - 0;+		},+		nth: function(elem, i, match){+			return match[3] - 0 === i;+		},+		eq: function(elem, i, match){+			return match[3] - 0 === i;+		}+	},+	filter: {+		PSEUDO: function(elem, match, i, array){+			var name = match[1], filter = Expr.filters[ name ];++			if ( filter ) {+				return filter( elem, i, match, array );+			} else if ( name === "contains" ) {+				return (elem.textContent || elem.innerText || getText([ elem ]) || "").indexOf(match[3]) >= 0;+			} else if ( name === "not" ) {+				var not = match[3];++				for ( var i = 0, l = not.length; i < l; i++ ) {+					if ( not[i] === elem ) {+						return false;+					}+				}++				return true;+			} else {+				Sizzle.error( "Syntax error, unrecognized expression: " + name );+			}+		},+		CHILD: function(elem, match){+			var type = match[1], node = elem;+			switch (type) {+				case 'only':+				case 'first':+					while ( (node = node.previousSibling) )	 {+						if ( node.nodeType === 1 ) { +							return false; +						}+					}+					if ( type === "first" ) { +						return true; +					}+					node = elem;+				case 'last':+					while ( (node = node.nextSibling) )	 {+						if ( node.nodeType === 1 ) { +							return false; +						}+					}+					return true;+				case 'nth':+					var first = match[2], last = match[3];++					if ( first === 1 && last === 0 ) {+						return true;+					}+					+					var doneName = match[0],+						parent = elem.parentNode;+	+					if ( parent && (parent.sizcache !== doneName || !elem.nodeIndex) ) {+						var count = 0;+						for ( node = parent.firstChild; node; node = node.nextSibling ) {+							if ( node.nodeType === 1 ) {+								node.nodeIndex = ++count;+							}+						} +						parent.sizcache = doneName;+					}+					+					var diff = elem.nodeIndex - last;+					if ( first === 0 ) {+						return diff === 0;+					} else {+						return ( diff % first === 0 && diff / first >= 0 );+					}+			}+		},+		ID: function(elem, match){+			return elem.nodeType === 1 && elem.getAttribute("id") === match;+		},+		TAG: function(elem, match){+			return (match === "*" && elem.nodeType === 1) || elem.nodeName.toLowerCase() === match;+		},+		CLASS: function(elem, match){+			return (" " + (elem.className || elem.getAttribute("class")) + " ")+				.indexOf( match ) > -1;+		},+		ATTR: function(elem, match){+			var name = match[1],+				result = Expr.attrHandle[ name ] ?+					Expr.attrHandle[ name ]( elem ) :+					elem[ name ] != null ?+						elem[ name ] :+						elem.getAttribute( name ),+				value = result + "",+				type = match[2],+				check = match[4];++			return result == null ?+				type === "!=" :+				type === "=" ?+				value === check :+				type === "*=" ?+				value.indexOf(check) >= 0 :+				type === "~=" ?+				(" " + value + " ").indexOf(check) >= 0 :+				!check ?+				value && result !== false :+				type === "!=" ?+				value !== check :+				type === "^=" ?+				value.indexOf(check) === 0 :+				type === "$=" ?+				value.substr(value.length - check.length) === check :+				type === "|=" ?+				value === check || value.substr(0, check.length + 1) === check + "-" :+				false;+		},+		POS: function(elem, match, i, array){+			var name = match[2], filter = Expr.setFilters[ name ];++			if ( filter ) {+				return filter( elem, i, match, array );+			}+		}+	}+};++var origPOS = Expr.match.POS;++for ( var type in Expr.match ) {+	Expr.match[ type ] = new RegExp( Expr.match[ type ].source + /(?![^\[]*\])(?![^\(]*\))/.source );+	Expr.leftMatch[ type ] = new RegExp( /(^(?:.|\r|\n)*?)/.source + Expr.match[ type ].source.replace(/\\(\d+)/g, function(all, num){+		return "\\" + (num - 0 + 1);+	}));+}++var makeArray = function(array, results) {+	array = Array.prototype.slice.call( array, 0 );++	if ( results ) {+		results.push.apply( results, array );+		return results;+	}+	+	return array;+};++// Perform a simple check to determine if the browser is capable of+// converting a NodeList to an array using builtin methods.+// Also verifies that the returned array holds DOM nodes+// (which is not the case in the Blackberry browser)+try {+	Array.prototype.slice.call( document.documentElement.childNodes, 0 )[0].nodeType;++// Provide a fallback method if it does not work+} catch(e){+	makeArray = function(array, results) {+		var ret = results || [];++		if ( toString.call(array) === "[object Array]" ) {+			Array.prototype.push.apply( ret, array );+		} else {+			if ( typeof array.length === "number" ) {+				for ( var i = 0, l = array.length; i < l; i++ ) {+					ret.push( array[i] );+				}+			} else {+				for ( var i = 0; array[i]; i++ ) {+					ret.push( array[i] );+				}+			}+		}++		return ret;+	};+}++var sortOrder;++if ( document.documentElement.compareDocumentPosition ) {+	sortOrder = function( a, b ) {+		if ( !a.compareDocumentPosition || !b.compareDocumentPosition ) {+			if ( a == b ) {+				hasDuplicate = true;+			}+			return a.compareDocumentPosition ? -1 : 1;+		}++		var ret = a.compareDocumentPosition(b) & 4 ? -1 : a === b ? 0 : 1;+		if ( ret === 0 ) {+			hasDuplicate = true;+		}+		return ret;+	};+} else if ( "sourceIndex" in document.documentElement ) {+	sortOrder = function( a, b ) {+		if ( !a.sourceIndex || !b.sourceIndex ) {+			if ( a == b ) {+				hasDuplicate = true;+			}+			return a.sourceIndex ? -1 : 1;+		}++		var ret = a.sourceIndex - b.sourceIndex;+		if ( ret === 0 ) {+			hasDuplicate = true;+		}+		return ret;+	};+} else if ( document.createRange ) {+	sortOrder = function( a, b ) {+		if ( !a.ownerDocument || !b.ownerDocument ) {+			if ( a == b ) {+				hasDuplicate = true;+			}+			return a.ownerDocument ? -1 : 1;+		}++		var aRange = a.ownerDocument.createRange(), bRange = b.ownerDocument.createRange();+		aRange.setStart(a, 0);+		aRange.setEnd(a, 0);+		bRange.setStart(b, 0);+		bRange.setEnd(b, 0);+		var ret = aRange.compareBoundaryPoints(Range.START_TO_END, bRange);+		if ( ret === 0 ) {+			hasDuplicate = true;+		}+		return ret;+	};+}++// Utility function for retreiving the text value of an array of DOM nodes+function getText( elems ) {+	var ret = "", elem;++	for ( var i = 0; elems[i]; i++ ) {+		elem = elems[i];++		// Get the text from text nodes and CDATA nodes+		if ( elem.nodeType === 3 || elem.nodeType === 4 ) {+			ret += elem.nodeValue;++		// Traverse everything else, except comment nodes+		} else if ( elem.nodeType !== 8 ) {+			ret += getText( elem.childNodes );+		}+	}++	return ret;+}++// Check to see if the browser returns elements by name when+// querying by getElementById (and provide a workaround)+(function(){+	// We're going to inject a fake input element with a specified name+	var form = document.createElement("div"),+		id = "script" + (new Date).getTime();+	form.innerHTML = "<a name='" + id + "'/>";++	// Inject it into the root element, check its status, and remove it quickly+	var root = document.documentElement;+	root.insertBefore( form, root.firstChild );++	// The workaround has to do additional checks after a getElementById+	// Which slows things down for other browsers (hence the branching)+	if ( document.getElementById( id ) ) {+		Expr.find.ID = function(match, context, isXML){+			if ( typeof context.getElementById !== "undefined" && !isXML ) {+				var m = context.getElementById(match[1]);+				return m ? m.id === match[1] || typeof m.getAttributeNode !== "undefined" && m.getAttributeNode("id").nodeValue === match[1] ? [m] : undefined : [];+			}+		};++		Expr.filter.ID = function(elem, match){+			var node = typeof elem.getAttributeNode !== "undefined" && elem.getAttributeNode("id");+			return elem.nodeType === 1 && node && node.nodeValue === match;+		};+	}++	root.removeChild( form );+	root = form = null; // release memory in IE+})();++(function(){+	// Check to see if the browser returns only elements+	// when doing getElementsByTagName("*")++	// Create a fake element+	var div = document.createElement("div");+	div.appendChild( document.createComment("") );++	// Make sure no comments are found+	if ( div.getElementsByTagName("*").length > 0 ) {+		Expr.find.TAG = function(match, context){+			var results = context.getElementsByTagName(match[1]);++			// Filter out possible comments+			if ( match[1] === "*" ) {+				var tmp = [];++				for ( var i = 0; results[i]; i++ ) {+					if ( results[i].nodeType === 1 ) {+						tmp.push( results[i] );+					}+				}++				results = tmp;+			}++			return results;+		};+	}++	// Check to see if an attribute returns normalized href attributes+	div.innerHTML = "<a href='#'></a>";+	if ( div.firstChild && typeof div.firstChild.getAttribute !== "undefined" &&+			div.firstChild.getAttribute("href") !== "#" ) {+		Expr.attrHandle.href = function(elem){+			return elem.getAttribute("href", 2);+		};+	}++	div = null; // release memory in IE+})();++if ( document.querySelectorAll ) {+	(function(){+		var oldSizzle = Sizzle, div = document.createElement("div");+		div.innerHTML = "<p class='TEST'></p>";++		// Safari can't handle uppercase or unicode characters when+		// in quirks mode.+		if ( div.querySelectorAll && div.querySelectorAll(".TEST").length === 0 ) {+			return;+		}+	+		Sizzle = function(query, context, extra, seed){+			context = context || document;++			// Only use querySelectorAll on non-XML documents+			// (ID selectors don't work in non-HTML documents)+			if ( !seed && context.nodeType === 9 && !isXML(context) ) {+				try {+					return makeArray( context.querySelectorAll(query), extra );+				} catch(e){}+			}+		+			return oldSizzle(query, context, extra, seed);+		};++		for ( var prop in oldSizzle ) {+			Sizzle[ prop ] = oldSizzle[ prop ];+		}++		div = null; // release memory in IE+	})();+}++(function(){+	var div = document.createElement("div");++	div.innerHTML = "<div class='test e'></div><div class='test'></div>";++	// Opera can't find a second classname (in 9.6)+	// Also, make sure that getElementsByClassName actually exists+	if ( !div.getElementsByClassName || div.getElementsByClassName("e").length === 0 ) {+		return;+	}++	// Safari caches class attributes, doesn't catch changes (in 3.2)+	div.lastChild.className = "e";++	if ( div.getElementsByClassName("e").length === 1 ) {+		return;+	}+	+	Expr.order.splice(1, 0, "CLASS");+	Expr.find.CLASS = function(match, context, isXML) {+		if ( typeof context.getElementsByClassName !== "undefined" && !isXML ) {+			return context.getElementsByClassName(match[1]);+		}+	};++	div = null; // release memory in IE+})();++function dirNodeCheck( dir, cur, doneName, checkSet, nodeCheck, isXML ) {+	for ( var i = 0, l = checkSet.length; i < l; i++ ) {+		var elem = checkSet[i];+		if ( elem ) {+			elem = elem[dir];+			var match = false;++			while ( elem ) {+				if ( elem.sizcache === doneName ) {+					match = checkSet[elem.sizset];+					break;+				}++				if ( elem.nodeType === 1 && !isXML ){+					elem.sizcache = doneName;+					elem.sizset = i;+				}++				if ( elem.nodeName.toLowerCase() === cur ) {+					match = elem;+					break;+				}++				elem = elem[dir];+			}++			checkSet[i] = match;+		}+	}+}++function dirCheck( dir, cur, doneName, checkSet, nodeCheck, isXML ) {+	for ( var i = 0, l = checkSet.length; i < l; i++ ) {+		var elem = checkSet[i];+		if ( elem ) {+			elem = elem[dir];+			var match = false;++			while ( elem ) {+				if ( elem.sizcache === doneName ) {+					match = checkSet[elem.sizset];+					break;+				}++				if ( elem.nodeType === 1 ) {+					if ( !isXML ) {+						elem.sizcache = doneName;+						elem.sizset = i;+					}+					if ( typeof cur !== "string" ) {+						if ( elem === cur ) {+							match = true;+							break;+						}++					} else if ( Sizzle.filter( cur, [elem] ).length > 0 ) {+						match = elem;+						break;+					}+				}++				elem = elem[dir];+			}++			checkSet[i] = match;+		}+	}+}++var contains = document.compareDocumentPosition ? function(a, b){+	return !!(a.compareDocumentPosition(b) & 16);+} : function(a, b){+	return a !== b && (a.contains ? a.contains(b) : true);+};++var isXML = function(elem){+	// documentElement is verified for cases where it doesn't yet exist+	// (such as loading iframes in IE - #4833) +	var documentElement = (elem ? elem.ownerDocument || elem : 0).documentElement;+	return documentElement ? documentElement.nodeName !== "HTML" : false;+};++var posProcess = function(selector, context){+	var tmpSet = [], later = "", match,+		root = context.nodeType ? [context] : context;++	// Position selectors must be done after the filter+	// And so must :not(positional) so we move all PSEUDOs to the end+	while ( (match = Expr.match.PSEUDO.exec( selector )) ) {+		later += match[0];+		selector = selector.replace( Expr.match.PSEUDO, "" );+	}++	selector = Expr.relative[selector] ? selector + "*" : selector;++	for ( var i = 0, l = root.length; i < l; i++ ) {+		Sizzle( selector, root[i], tmpSet );+	}++	return Sizzle.filter( later, tmpSet );+};++// EXPOSE+jQuery.find = Sizzle;+jQuery.expr = Sizzle.selectors;+jQuery.expr[":"] = jQuery.expr.filters;+jQuery.unique = Sizzle.uniqueSort;+jQuery.text = getText;+jQuery.isXMLDoc = isXML;+jQuery.contains = contains;++return;++window.Sizzle = Sizzle;++})();+var runtil = /Until$/,+	rparentsprev = /^(?:parents|prevUntil|prevAll)/,+	// Note: This RegExp should be improved, or likely pulled from Sizzle+	rmultiselector = /,/,+	slice = Array.prototype.slice;++// Implement the identical functionality for filter and not+var winnow = function( elements, qualifier, keep ) {+	if ( jQuery.isFunction( qualifier ) ) {+		return jQuery.grep(elements, function( elem, i ) {+			return !!qualifier.call( elem, i, elem ) === keep;+		});++	} else if ( qualifier.nodeType ) {+		return jQuery.grep(elements, function( elem, i ) {+			return (elem === qualifier) === keep;+		});++	} else if ( typeof qualifier === "string" ) {+		var filtered = jQuery.grep(elements, function( elem ) {+			return elem.nodeType === 1;+		});++		if ( isSimple.test( qualifier ) ) {+			return jQuery.filter(qualifier, filtered, !keep);+		} else {+			qualifier = jQuery.filter( qualifier, filtered );+		}+	}++	return jQuery.grep(elements, function( elem, i ) {+		return (jQuery.inArray( elem, qualifier ) >= 0) === keep;+	});+};++jQuery.fn.extend({+	find: function( selector ) {+		var ret = this.pushStack( "", "find", selector ), length = 0;++		for ( var i = 0, l = this.length; i < l; i++ ) {+			length = ret.length;+			jQuery.find( selector, this[i], ret );++			if ( i > 0 ) {+				// Make sure that the results are unique+				for ( var n = length; n < ret.length; n++ ) {+					for ( var r = 0; r < length; r++ ) {+						if ( ret[r] === ret[n] ) {+							ret.splice(n--, 1);+							break;+						}+					}+				}+			}+		}++		return ret;+	},++	has: function( target ) {+		var targets = jQuery( target );+		return this.filter(function() {+			for ( var i = 0, l = targets.length; i < l; i++ ) {+				if ( jQuery.contains( this, targets[i] ) ) {+					return true;+				}+			}+		});+	},++	not: function( selector ) {+		return this.pushStack( winnow(this, selector, false), "not", selector);+	},++	filter: function( selector ) {+		return this.pushStack( winnow(this, selector, true), "filter", selector );+	},+	+	is: function( selector ) {+		return !!selector && jQuery.filter( selector, this ).length > 0;+	},++	closest: function( selectors, context ) {+		if ( jQuery.isArray( selectors ) ) {+			var ret = [], cur = this[0], match, matches = {}, selector, level = 1;++			if ( cur && selectors.length ) {+				for ( var i = 0, l = selectors.length; i < l; i++ ) {+					selector = selectors[i];++					if ( !matches[selector] ) {+						matches[selector] = jQuery.expr.match.POS.test( selector ) ? +							jQuery( selector, context || this.context ) :+							selector;+					}+				}++				while ( cur && cur.ownerDocument && cur !== context ) {+					for ( selector in matches ) {+						match = matches[selector];++						if ( match.jquery ? match.index(cur) > -1 : jQuery(cur).is(match) ) {+							ret.push({ selector: selector, elem: cur, level: level });+						}+					}+					cur = cur.parentNode;+					level++;+				}+			}++			return ret;+		}++		var pos = jQuery.expr.match.POS.test( selectors ) ? +			jQuery( selectors, context || this.context ) : null;++		return this.map(function( i, cur ) {+			while ( cur && cur.ownerDocument && cur !== context ) {+				if ( pos ? pos.index(cur) > -1 : jQuery(cur).is(selectors) ) {+					return cur;+				}+				cur = cur.parentNode;+			}+			return null;+		});+	},+	+	// Determine the position of an element within+	// the matched set of elements+	index: function( elem ) {+		if ( !elem || typeof elem === "string" ) {+			return jQuery.inArray( this[0],+				// If it receives a string, the selector is used+				// If it receives nothing, the siblings are used+				elem ? jQuery( elem ) : this.parent().children() );+		}+		// Locate the position of the desired element+		return jQuery.inArray(+			// If it receives a jQuery object, the first element is used+			elem.jquery ? elem[0] : elem, this );+	},++	add: function( selector, context ) {+		var set = typeof selector === "string" ?+				jQuery( selector, context || this.context ) :+				jQuery.makeArray( selector ),+			all = jQuery.merge( this.get(), set );++		return this.pushStack( isDisconnected( set[0] ) || isDisconnected( all[0] ) ?+			all :+			jQuery.unique( all ) );+	},++	andSelf: function() {+		return this.add( this.prevObject );+	}+});++// A painfully simple check to see if an element is disconnected+// from a document (should be improved, where feasible).+function isDisconnected( node ) {+	return !node || !node.parentNode || node.parentNode.nodeType === 11;+}++jQuery.each({+	parent: function( elem ) {+		var parent = elem.parentNode;+		return parent && parent.nodeType !== 11 ? parent : null;+	},+	parents: function( elem ) {+		return jQuery.dir( elem, "parentNode" );+	},+	parentsUntil: function( elem, i, until ) {+		return jQuery.dir( elem, "parentNode", until );+	},+	next: function( elem ) {+		return jQuery.nth( elem, 2, "nextSibling" );+	},+	prev: function( elem ) {+		return jQuery.nth( elem, 2, "previousSibling" );+	},+	nextAll: function( elem ) {+		return jQuery.dir( elem, "nextSibling" );+	},+	prevAll: function( elem ) {+		return jQuery.dir( elem, "previousSibling" );+	},+	nextUntil: function( elem, i, until ) {+		return jQuery.dir( elem, "nextSibling", until );+	},+	prevUntil: function( elem, i, until ) {+		return jQuery.dir( elem, "previousSibling", until );+	},+	siblings: function( elem ) {+		return jQuery.sibling( elem.parentNode.firstChild, elem );+	},+	children: function( elem ) {+		return jQuery.sibling( elem.firstChild );+	},+	contents: function( elem ) {+		return jQuery.nodeName( elem, "iframe" ) ?+			elem.contentDocument || elem.contentWindow.document :+			jQuery.makeArray( elem.childNodes );+	}+}, function( name, fn ) {+	jQuery.fn[ name ] = function( until, selector ) {+		var ret = jQuery.map( this, fn, until );+		+		if ( !runtil.test( name ) ) {+			selector = until;+		}++		if ( selector && typeof selector === "string" ) {+			ret = jQuery.filter( selector, ret );+		}++		ret = this.length > 1 ? jQuery.unique( ret ) : ret;++		if ( (this.length > 1 || rmultiselector.test( selector )) && rparentsprev.test( name ) ) {+			ret = ret.reverse();+		}++		return this.pushStack( ret, name, slice.call(arguments).join(",") );+	};+});++jQuery.extend({+	filter: function( expr, elems, not ) {+		if ( not ) {+			expr = ":not(" + expr + ")";+		}++		return jQuery.find.matches(expr, elems);+	},+	+	dir: function( elem, dir, until ) {+		var matched = [], cur = elem[dir];+		while ( cur && cur.nodeType !== 9 && (until === undefined || cur.nodeType !== 1 || !jQuery( cur ).is( until )) ) {+			if ( cur.nodeType === 1 ) {+				matched.push( cur );+			}+			cur = cur[dir];+		}+		return matched;+	},++	nth: function( cur, result, dir, elem ) {+		result = result || 1;+		var num = 0;++		for ( ; cur; cur = cur[dir] ) {+			if ( cur.nodeType === 1 && ++num === result ) {+				break;+			}+		}++		return cur;+	},++	sibling: function( n, elem ) {+		var r = [];++		for ( ; n; n = n.nextSibling ) {+			if ( n.nodeType === 1 && n !== elem ) {+				r.push( n );+			}+		}++		return r;+	}+});+var rinlinejQuery = / jQuery\d+="(?:\d+|null)"/g,+	rleadingWhitespace = /^\s+/,+	rxhtmlTag = /(<([\w:]+)[^>]*?)\/>/g,+	rselfClosing = /^(?:area|br|col|embed|hr|img|input|link|meta|param)$/i,+	rtagName = /<([\w:]+)/,+	rtbody = /<tbody/i,+	rhtml = /<|&#?\w+;/,+	rnocache = /<script|<object|<embed|<option|<style/i,+	rchecked = /checked\s*(?:[^=]|=\s*.checked.)/i,  // checked="checked" or checked (html5)+	fcloseTag = function( all, front, tag ) {+		return rselfClosing.test( tag ) ?+			all :+			front + "></" + tag + ">";+	},+	wrapMap = {+		option: [ 1, "<select multiple='multiple'>", "</select>" ],+		legend: [ 1, "<fieldset>", "</fieldset>" ],+		thead: [ 1, "<table>", "</table>" ],+		tr: [ 2, "<table><tbody>", "</tbody></table>" ],+		td: [ 3, "<table><tbody><tr>", "</tr></tbody></table>" ],+		col: [ 2, "<table><tbody></tbody><colgroup>", "</colgroup></table>" ],+		area: [ 1, "<map>", "</map>" ],+		_default: [ 0, "", "" ]+	};++wrapMap.optgroup = wrapMap.option;+wrapMap.tbody = wrapMap.tfoot = wrapMap.colgroup = wrapMap.caption = wrapMap.thead;+wrapMap.th = wrapMap.td;++// IE can't serialize <link> and <script> tags normally+if ( !jQuery.support.htmlSerialize ) {+	wrapMap._default = [ 1, "div<div>", "</div>" ];+}++jQuery.fn.extend({+	text: function( text ) {+		if ( jQuery.isFunction(text) ) {+			return this.each(function(i) {+				var self = jQuery(this);+				self.text( text.call(this, i, self.text()) );+			});+		}++		if ( typeof text !== "object" && text !== undefined ) {+			return this.empty().append( (this[0] && this[0].ownerDocument || document).createTextNode( text ) );+		}++		return jQuery.text( this );+	},++	wrapAll: function( html ) {+		if ( jQuery.isFunction( html ) ) {+			return this.each(function(i) {+				jQuery(this).wrapAll( html.call(this, i) );+			});+		}++		if ( this[0] ) {+			// The elements to wrap the target around+			var wrap = jQuery( html, this[0].ownerDocument ).eq(0).clone(true);++			if ( this[0].parentNode ) {+				wrap.insertBefore( this[0] );+			}++			wrap.map(function() {+				var elem = this;++				while ( elem.firstChild && elem.firstChild.nodeType === 1 ) {+					elem = elem.firstChild;+				}++				return elem;+			}).append(this);+		}++		return this;+	},++	wrapInner: function( html ) {+		if ( jQuery.isFunction( html ) ) {+			return this.each(function(i) {+				jQuery(this).wrapInner( html.call(this, i) );+			});+		}++		return this.each(function() {+			var self = jQuery( this ), contents = self.contents();++			if ( contents.length ) {+				contents.wrapAll( html );++			} else {+				self.append( html );+			}+		});+	},++	wrap: function( html ) {+		return this.each(function() {+			jQuery( this ).wrapAll( html );+		});+	},++	unwrap: function() {+		return this.parent().each(function() {+			if ( !jQuery.nodeName( this, "body" ) ) {+				jQuery( this ).replaceWith( this.childNodes );+			}+		}).end();+	},++	append: function() {+		return this.domManip(arguments, true, function( elem ) {+			if ( this.nodeType === 1 ) {+				this.appendChild( elem );+			}+		});+	},++	prepend: function() {+		return this.domManip(arguments, true, function( elem ) {+			if ( this.nodeType === 1 ) {+				this.insertBefore( elem, this.firstChild );+			}+		});+	},++	before: function() {+		if ( this[0] && this[0].parentNode ) {+			return this.domManip(arguments, false, function( elem ) {+				this.parentNode.insertBefore( elem, this );+			});+		} else if ( arguments.length ) {+			var set = jQuery(arguments[0]);+			set.push.apply( set, this.toArray() );+			return this.pushStack( set, "before", arguments );+		}+	},++	after: function() {+		if ( this[0] && this[0].parentNode ) {+			return this.domManip(arguments, false, function( elem ) {+				this.parentNode.insertBefore( elem, this.nextSibling );+			});+		} else if ( arguments.length ) {+			var set = this.pushStack( this, "after", arguments );+			set.push.apply( set, jQuery(arguments[0]).toArray() );+			return set;+		}+	},+	+	// keepData is for internal use only--do not document+	remove: function( selector, keepData ) {+		for ( var i = 0, elem; (elem = this[i]) != null; i++ ) {+			if ( !selector || jQuery.filter( selector, [ elem ] ).length ) {+				if ( !keepData && elem.nodeType === 1 ) {+					jQuery.cleanData( elem.getElementsByTagName("*") );+					jQuery.cleanData( [ elem ] );+				}++				if ( elem.parentNode ) {+					 elem.parentNode.removeChild( elem );+				}+			}+		}+		+		return this;+	},++	empty: function() {+		for ( var i = 0, elem; (elem = this[i]) != null; i++ ) {+			// Remove element nodes and prevent memory leaks+			if ( elem.nodeType === 1 ) {+				jQuery.cleanData( elem.getElementsByTagName("*") );+			}++			// Remove any remaining nodes+			while ( elem.firstChild ) {+				elem.removeChild( elem.firstChild );+			}+		}+		+		return this;+	},++	clone: function( events ) {+		// Do the clone+		var ret = this.map(function() {+			if ( !jQuery.support.noCloneEvent && !jQuery.isXMLDoc(this) ) {+				// IE copies events bound via attachEvent when+				// using cloneNode. Calling detachEvent on the+				// clone will also remove the events from the orignal+				// In order to get around this, we use innerHTML.+				// Unfortunately, this means some modifications to+				// attributes in IE that are actually only stored+				// as properties will not be copied (such as the+				// the name attribute on an input).+				var html = this.outerHTML, ownerDocument = this.ownerDocument;+				if ( !html ) {+					var div = ownerDocument.createElement("div");+					div.appendChild( this.cloneNode(true) );+					html = div.innerHTML;+				}++				return jQuery.clean([html.replace(rinlinejQuery, "")+					// Handle the case in IE 8 where action=/test/> self-closes a tag+					.replace(/=([^="'>\s]+\/)>/g, '="$1">')+					.replace(rleadingWhitespace, "")], ownerDocument)[0];+			} else {+				return this.cloneNode(true);+			}+		});++		// Copy the events from the original to the clone+		if ( events === true ) {+			cloneCopyEvent( this, ret );+			cloneCopyEvent( this.find("*"), ret.find("*") );+		}++		// Return the cloned set+		return ret;+	},++	html: function( value ) {+		if ( value === undefined ) {+			return this[0] && this[0].nodeType === 1 ?+				this[0].innerHTML.replace(rinlinejQuery, "") :+				null;++		// See if we can take a shortcut and just use innerHTML+		} else if ( typeof value === "string" && !rnocache.test( value ) &&+			(jQuery.support.leadingWhitespace || !rleadingWhitespace.test( value )) &&+			!wrapMap[ (rtagName.exec( value ) || ["", ""])[1].toLowerCase() ] ) {++			value = value.replace(rxhtmlTag, fcloseTag);++			try {+				for ( var i = 0, l = this.length; i < l; i++ ) {+					// Remove element nodes and prevent memory leaks+					if ( this[i].nodeType === 1 ) {+						jQuery.cleanData( this[i].getElementsByTagName("*") );+						this[i].innerHTML = value;+					}+				}++			// If using innerHTML throws an exception, use the fallback method+			} catch(e) {+				this.empty().append( value );+			}++		} else if ( jQuery.isFunction( value ) ) {+			this.each(function(i){+				var self = jQuery(this), old = self.html();+				self.empty().append(function(){+					return value.call( this, i, old );+				});+			});++		} else {+			this.empty().append( value );+		}++		return this;+	},++	replaceWith: function( value ) {+		if ( this[0] && this[0].parentNode ) {+			// Make sure that the elements are removed from the DOM before they are inserted+			// this can help fix replacing a parent with child elements+			if ( jQuery.isFunction( value ) ) {+				return this.each(function(i) {+					var self = jQuery(this), old = self.html();+					self.replaceWith( value.call( this, i, old ) );+				});+			}++			if ( typeof value !== "string" ) {+				value = jQuery(value).detach();+			}++			return this.each(function() {+				var next = this.nextSibling, parent = this.parentNode;++				jQuery(this).remove();++				if ( next ) {+					jQuery(next).before( value );+				} else {+					jQuery(parent).append( value );+				}+			});+		} else {+			return this.pushStack( jQuery(jQuery.isFunction(value) ? value() : value), "replaceWith", value );+		}+	},++	detach: function( selector ) {+		return this.remove( selector, true );+	},++	domManip: function( args, table, callback ) {+		var results, first, value = args[0], scripts = [], fragment, parent;++		// We can't cloneNode fragments that contain checked, in WebKit+		if ( !jQuery.support.checkClone && arguments.length === 3 && typeof value === "string" && rchecked.test( value ) ) {+			return this.each(function() {+				jQuery(this).domManip( args, table, callback, true );+			});+		}++		if ( jQuery.isFunction(value) ) {+			return this.each(function(i) {+				var self = jQuery(this);+				args[0] = value.call(this, i, table ? self.html() : undefined);+				self.domManip( args, table, callback );+			});+		}++		if ( this[0] ) {+			parent = value && value.parentNode;++			// If we're in a fragment, just use that instead of building a new one+			if ( jQuery.support.parentNode && parent && parent.nodeType === 11 && parent.childNodes.length === this.length ) {+				results = { fragment: parent };++			} else {+				results = buildFragment( args, this, scripts );+			}+			+			fragment = results.fragment;+			+			if ( fragment.childNodes.length === 1 ) {+				first = fragment = fragment.firstChild;+			} else {+				first = fragment.firstChild;+			}++			if ( first ) {+				table = table && jQuery.nodeName( first, "tr" );++				for ( var i = 0, l = this.length; i < l; i++ ) {+					callback.call(+						table ?+							root(this[i], first) :+							this[i],+						i > 0 || results.cacheable || this.length > 1  ?+							fragment.cloneNode(true) :+							fragment+					);+				}+			}++			if ( scripts.length ) {+				jQuery.each( scripts, evalScript );+			}+		}++		return this;++		function root( elem, cur ) {+			return jQuery.nodeName(elem, "table") ?+				(elem.getElementsByTagName("tbody")[0] ||+				elem.appendChild(elem.ownerDocument.createElement("tbody"))) :+				elem;+		}+	}+});++function cloneCopyEvent(orig, ret) {+	var i = 0;++	ret.each(function() {+		if ( this.nodeName !== (orig[i] && orig[i].nodeName) ) {+			return;+		}++		var oldData = jQuery.data( orig[i++] ), curData = jQuery.data( this, oldData ), events = oldData && oldData.events;++		if ( events ) {+			delete curData.handle;+			curData.events = {};++			for ( var type in events ) {+				for ( var handler in events[ type ] ) {+					jQuery.event.add( this, type, events[ type ][ handler ], events[ type ][ handler ].data );+				}+			}+		}+	});+}++function buildFragment( args, nodes, scripts ) {+	var fragment, cacheable, cacheresults,+		doc = (nodes && nodes[0] ? nodes[0].ownerDocument || nodes[0] : document);++	// Only cache "small" (1/2 KB) strings that are associated with the main document+	// Cloning options loses the selected state, so don't cache them+	// IE 6 doesn't like it when you put <object> or <embed> elements in a fragment+	// Also, WebKit does not clone 'checked' attributes on cloneNode, so don't cache+	if ( args.length === 1 && typeof args[0] === "string" && args[0].length < 512 && doc === document &&+		!rnocache.test( args[0] ) && (jQuery.support.checkClone || !rchecked.test( args[0] )) ) {++		cacheable = true;+		cacheresults = jQuery.fragments[ args[0] ];+		if ( cacheresults ) {+			if ( cacheresults !== 1 ) {+				fragment = cacheresults;+			}+		}+	}++	if ( !fragment ) {+		fragment = doc.createDocumentFragment();+		jQuery.clean( args, doc, fragment, scripts );+	}++	if ( cacheable ) {+		jQuery.fragments[ args[0] ] = cacheresults ? fragment : 1;+	}++	return { fragment: fragment, cacheable: cacheable };+}++jQuery.fragments = {};++jQuery.each({+	appendTo: "append",+	prependTo: "prepend",+	insertBefore: "before",+	insertAfter: "after",+	replaceAll: "replaceWith"+}, function( name, original ) {+	jQuery.fn[ name ] = function( selector ) {+		var ret = [], insert = jQuery( selector ),+			parent = this.length === 1 && this[0].parentNode;+		+		if ( parent && parent.nodeType === 11 && parent.childNodes.length === 1 && insert.length === 1 ) {+			insert[ original ]( this[0] );+			return this;+			+		} else {+			for ( var i = 0, l = insert.length; i < l; i++ ) {+				var elems = (i > 0 ? this.clone(true) : this).get();+				jQuery.fn[ original ].apply( jQuery(insert[i]), elems );+				ret = ret.concat( elems );+			}+		+			return this.pushStack( ret, name, insert.selector );+		}+	};+});++jQuery.extend({+	clean: function( elems, context, fragment, scripts ) {+		context = context || document;++		// !context.createElement fails in IE with an error but returns typeof 'object'+		if ( typeof context.createElement === "undefined" ) {+			context = context.ownerDocument || context[0] && context[0].ownerDocument || document;+		}++		var ret = [];++		for ( var i = 0, elem; (elem = elems[i]) != null; i++ ) {+			if ( typeof elem === "number" ) {+				elem += "";+			}++			if ( !elem ) {+				continue;+			}++			// Convert html string into DOM nodes+			if ( typeof elem === "string" && !rhtml.test( elem ) ) {+				elem = context.createTextNode( elem );++			} else if ( typeof elem === "string" ) {+				// Fix "XHTML"-style tags in all browsers+				elem = elem.replace(rxhtmlTag, fcloseTag);++				// Trim whitespace, otherwise indexOf won't work as expected+				var tag = (rtagName.exec( elem ) || ["", ""])[1].toLowerCase(),+					wrap = wrapMap[ tag ] || wrapMap._default,+					depth = wrap[0],+					div = context.createElement("div");++				// Go to html and back, then peel off extra wrappers+				div.innerHTML = wrap[1] + elem + wrap[2];++				// Move to the right depth+				while ( depth-- ) {+					div = div.lastChild;+				}++				// Remove IE's autoinserted <tbody> from table fragments+				if ( !jQuery.support.tbody ) {++					// String was a <table>, *may* have spurious <tbody>+					var hasBody = rtbody.test(elem),+						tbody = tag === "table" && !hasBody ?+							div.firstChild && div.firstChild.childNodes :++							// String was a bare <thead> or <tfoot>+							wrap[1] === "<table>" && !hasBody ?+								div.childNodes :+								[];++					for ( var j = tbody.length - 1; j >= 0 ; --j ) {+						if ( jQuery.nodeName( tbody[ j ], "tbody" ) && !tbody[ j ].childNodes.length ) {+							tbody[ j ].parentNode.removeChild( tbody[ j ] );+						}+					}++				}++				// IE completely kills leading whitespace when innerHTML is used+				if ( !jQuery.support.leadingWhitespace && rleadingWhitespace.test( elem ) ) {+					div.insertBefore( context.createTextNode( rleadingWhitespace.exec(elem)[0] ), div.firstChild );+				}++				elem = div.childNodes;+			}++			if ( elem.nodeType ) {+				ret.push( elem );+			} else {+				ret = jQuery.merge( ret, elem );+			}+		}++		if ( fragment ) {+			for ( var i = 0; ret[i]; i++ ) {+				if ( scripts && jQuery.nodeName( ret[i], "script" ) && (!ret[i].type || ret[i].type.toLowerCase() === "text/javascript") ) {+					scripts.push( ret[i].parentNode ? ret[i].parentNode.removeChild( ret[i] ) : ret[i] );+				+				} else {+					if ( ret[i].nodeType === 1 ) {+						ret.splice.apply( ret, [i + 1, 0].concat(jQuery.makeArray(ret[i].getElementsByTagName("script"))) );+					}+					fragment.appendChild( ret[i] );+				}+			}+		}++		return ret;+	},+	+	cleanData: function( elems ) {+		var data, id, cache = jQuery.cache,+			special = jQuery.event.special,+			deleteExpando = jQuery.support.deleteExpando;+		+		for ( var i = 0, elem; (elem = elems[i]) != null; i++ ) {+			id = elem[ jQuery.expando ];+			+			if ( id ) {+				data = cache[ id ];+				+				if ( data.events ) {+					for ( var type in data.events ) {+						if ( special[ type ] ) {+							jQuery.event.remove( elem, type );++						} else {+							removeEvent( elem, type, data.handle );+						}+					}+				}+				+				if ( deleteExpando ) {+					delete elem[ jQuery.expando ];++				} else if ( elem.removeAttribute ) {+					elem.removeAttribute( jQuery.expando );+				}+				+				delete cache[ id ];+			}+		}+	}+});+// exclude the following css properties to add px+var rexclude = /z-?index|font-?weight|opacity|zoom|line-?height/i,+	ralpha = /alpha\([^)]*\)/,+	ropacity = /opacity=([^)]*)/,+	rfloat = /float/i,+	rdashAlpha = /-([a-z])/ig,+	rupper = /([A-Z])/g,+	rnumpx = /^-?\d+(?:px)?$/i,+	rnum = /^-?\d/,++	cssShow = { position: "absolute", visibility: "hidden", display:"block" },+	cssWidth = [ "Left", "Right" ],+	cssHeight = [ "Top", "Bottom" ],++	// cache check for defaultView.getComputedStyle+	getComputedStyle = document.defaultView && document.defaultView.getComputedStyle,+	// normalize float css property+	styleFloat = jQuery.support.cssFloat ? "cssFloat" : "styleFloat",+	fcamelCase = function( all, letter ) {+		return letter.toUpperCase();+	};++jQuery.fn.css = function( name, value ) {+	return access( this, name, value, true, function( elem, name, value ) {+		if ( value === undefined ) {+			return jQuery.curCSS( elem, name );+		}+		+		if ( typeof value === "number" && !rexclude.test(name) ) {+			value += "px";+		}++		jQuery.style( elem, name, value );+	});+};++jQuery.extend({+	style: function( elem, name, value ) {+		// don't set styles on text and comment nodes+		if ( !elem || elem.nodeType === 3 || elem.nodeType === 8 ) {+			return undefined;+		}++		// ignore negative width and height values #1599+		if ( (name === "width" || name === "height") && parseFloat(value) < 0 ) {+			value = undefined;+		}++		var style = elem.style || elem, set = value !== undefined;++		// IE uses filters for opacity+		if ( !jQuery.support.opacity && name === "opacity" ) {+			if ( set ) {+				// IE has trouble with opacity if it does not have layout+				// Force it by setting the zoom level+				style.zoom = 1;++				// Set the alpha filter to set the opacity+				var opacity = parseInt( value, 10 ) + "" === "NaN" ? "" : "alpha(opacity=" + value * 100 + ")";+				var filter = style.filter || jQuery.curCSS( elem, "filter" ) || "";+				style.filter = ralpha.test(filter) ? filter.replace(ralpha, opacity) : opacity;+			}++			return style.filter && style.filter.indexOf("opacity=") >= 0 ?+				(parseFloat( ropacity.exec(style.filter)[1] ) / 100) + "":+				"";+		}++		// Make sure we're using the right name for getting the float value+		if ( rfloat.test( name ) ) {+			name = styleFloat;+		}++		name = name.replace(rdashAlpha, fcamelCase);++		if ( set ) {+			style[ name ] = value;+		}++		return style[ name ];+	},++	css: function( elem, name, force, extra ) {+		if ( name === "width" || name === "height" ) {+			var val, props = cssShow, which = name === "width" ? cssWidth : cssHeight;++			function getWH() {+				val = name === "width" ? elem.offsetWidth : elem.offsetHeight;++				if ( extra === "border" ) {+					return;+				}++				jQuery.each( which, function() {+					if ( !extra ) {+						val -= parseFloat(jQuery.curCSS( elem, "padding" + this, true)) || 0;+					}++					if ( extra === "margin" ) {+						val += parseFloat(jQuery.curCSS( elem, "margin" + this, true)) || 0;+					} else {+						val -= parseFloat(jQuery.curCSS( elem, "border" + this + "Width", true)) || 0;+					}+				});+			}++			if ( elem.offsetWidth !== 0 ) {+				getWH();+			} else {+				jQuery.swap( elem, props, getWH );+			}++			return Math.max(0, Math.round(val));+		}++		return jQuery.curCSS( elem, name, force );+	},++	curCSS: function( elem, name, force ) {+		var ret, style = elem.style, filter;++		// IE uses filters for opacity+		if ( !jQuery.support.opacity && name === "opacity" && elem.currentStyle ) {+			ret = ropacity.test(elem.currentStyle.filter || "") ?+				(parseFloat(RegExp.$1) / 100) + "" :+				"";++			return ret === "" ?+				"1" :+				ret;+		}++		// Make sure we're using the right name for getting the float value+		if ( rfloat.test( name ) ) {+			name = styleFloat;+		}++		if ( !force && style && style[ name ] ) {+			ret = style[ name ];++		} else if ( getComputedStyle ) {++			// Only "float" is needed here+			if ( rfloat.test( name ) ) {+				name = "float";+			}++			name = name.replace( rupper, "-$1" ).toLowerCase();++			var defaultView = elem.ownerDocument.defaultView;++			if ( !defaultView ) {+				return null;+			}++			var computedStyle = defaultView.getComputedStyle( elem, null );++			if ( computedStyle ) {+				ret = computedStyle.getPropertyValue( name );+			}++			// We should always get a number back from opacity+			if ( name === "opacity" && ret === "" ) {+				ret = "1";+			}++		} else if ( elem.currentStyle ) {+			var camelCase = name.replace(rdashAlpha, fcamelCase);++			ret = elem.currentStyle[ name ] || elem.currentStyle[ camelCase ];++			// From the awesome hack by Dean Edwards+			// http://erik.eae.net/archives/2007/07/27/18.54.15/#comment-102291++			// If we're not dealing with a regular pixel number+			// but a number that has a weird ending, we need to convert it to pixels+			if ( !rnumpx.test( ret ) && rnum.test( ret ) ) {+				// Remember the original values+				var left = style.left, rsLeft = elem.runtimeStyle.left;++				// Put in the new values to get a computed value out+				elem.runtimeStyle.left = elem.currentStyle.left;+				style.left = camelCase === "fontSize" ? "1em" : (ret || 0);+				ret = style.pixelLeft + "px";++				// Revert the changed values+				style.left = left;+				elem.runtimeStyle.left = rsLeft;+			}+		}++		return ret;+	},++	// A method for quickly swapping in/out CSS properties to get correct calculations+	swap: function( elem, options, callback ) {+		var old = {};++		// Remember the old values, and insert the new ones+		for ( var name in options ) {+			old[ name ] = elem.style[ name ];+			elem.style[ name ] = options[ name ];+		}++		callback.call( elem );++		// Revert the old values+		for ( var name in options ) {+			elem.style[ name ] = old[ name ];+		}+	}+});++if ( jQuery.expr && jQuery.expr.filters ) {+	jQuery.expr.filters.hidden = function( elem ) {+		var width = elem.offsetWidth, height = elem.offsetHeight,+			skip = elem.nodeName.toLowerCase() === "tr";++		return width === 0 && height === 0 && !skip ?+			true :+			width > 0 && height > 0 && !skip ?+				false :+				jQuery.curCSS(elem, "display") === "none";+	};++	jQuery.expr.filters.visible = function( elem ) {+		return !jQuery.expr.filters.hidden( elem );+	};+}+var jsc = now(),+	rscript = /<script(.|\s)*?\/script>/gi,+	rselectTextarea = /select|textarea/i,+	rinput = /color|date|datetime|email|hidden|month|number|password|range|search|tel|text|time|url|week/i,+	jsre = /=\?(&|$)/,+	rquery = /\?/,+	rts = /(\?|&)_=.*?(&|$)/,+	rurl = /^(\w+:)?\/\/([^\/?#]+)/,+	r20 = /%20/g,++	// Keep a copy of the old load method+	_load = jQuery.fn.load;++jQuery.fn.extend({+	load: function( url, params, callback ) {+		if ( typeof url !== "string" && _load ) {+			return _load.apply( this, arguments );++		// Don't do a request if no elements are being requested+		} else if ( !this.length ) {+			return this;+		}++		var off = url.indexOf(" ");+		if ( off >= 0 ) {+			var selector = url.slice(off, url.length);+			url = url.slice(0, off);+		}++		// Default to a GET request+		var type = "GET";++		// If the second parameter was provided+		if ( params ) {+			// If it's a function+			if ( jQuery.isFunction( params ) ) {+				// We assume that it's the callback+				callback = params;+				params = null;++			// Otherwise, build a param string+			} else if ( typeof params === "object" ) {+				params = jQuery.param( params, jQuery.ajaxSettings.traditional );+				type = "POST";+			}+		}++		var self = this;++		// Request the remote document+		jQuery.ajax({+			url: url,+			type: type,+			dataType: "html",+			data: params,+			complete: function( res, status ) {+				// If successful, inject the HTML into all the matched elements+				if ( status === "success" || status === "notmodified" ) {+					// See if a selector was specified+					self.html( selector ?+						// Create a dummy div to hold the results+						jQuery("<div />")+							// inject the contents of the document in, removing the scripts+							// to avoid any 'Permission Denied' errors in IE+							.append(res.responseText.replace(rscript, ""))++							// Locate the specified elements+							.find(selector) :++						// If not, just inject the full result+						res.responseText );+				}++				if ( callback ) {+					self.each( callback, [res.responseText, status, res] );+				}+			}+		});++		return this;+	},++	serialize: function() {+		return jQuery.param(this.serializeArray());+	},+	serializeArray: function() {+		return this.map(function() {+			return this.elements ? jQuery.makeArray(this.elements) : this;+		})+		.filter(function() {+			return this.name && !this.disabled &&+				(this.checked || rselectTextarea.test(this.nodeName) ||+					rinput.test(this.type));+		})+		.map(function( i, elem ) {+			var val = jQuery(this).val();++			return val == null ?+				null :+				jQuery.isArray(val) ?+					jQuery.map( val, function( val, i ) {+						return { name: elem.name, value: val };+					}) :+					{ name: elem.name, value: val };+		}).get();+	}+});++// Attach a bunch of functions for handling common AJAX events+jQuery.each( "ajaxStart ajaxStop ajaxComplete ajaxError ajaxSuccess ajaxSend".split(" "), function( i, o ) {+	jQuery.fn[o] = function( f ) {+		return this.bind(o, f);+	};+});++jQuery.extend({++	get: function( url, data, callback, type ) {+		// shift arguments if data argument was omited+		if ( jQuery.isFunction( data ) ) {+			type = type || callback;+			callback = data;+			data = null;+		}++		return jQuery.ajax({+			type: "GET",+			url: url,+			data: data,+			success: callback,+			dataType: type+		});+	},++	getScript: function( url, callback ) {+		return jQuery.get(url, null, callback, "script");+	},++	getJSON: function( url, data, callback ) {+		return jQuery.get(url, data, callback, "json");+	},++	post: function( url, data, callback, type ) {+		// shift arguments if data argument was omited+		if ( jQuery.isFunction( data ) ) {+			type = type || callback;+			callback = data;+			data = {};+		}++		return jQuery.ajax({+			type: "POST",+			url: url,+			data: data,+			success: callback,+			dataType: type+		});+	},++	ajaxSetup: function( settings ) {+		jQuery.extend( jQuery.ajaxSettings, settings );+	},++	ajaxSettings: {+		url: location.href,+		global: true,+		type: "GET",+		contentType: "application/x-www-form-urlencoded",+		processData: true,+		async: true,+		/*+		timeout: 0,+		data: null,+		username: null,+		password: null,+		traditional: false,+		*/+		// Create the request object; Microsoft failed to properly+		// implement the XMLHttpRequest in IE7 (can't request local files),+		// so we use the ActiveXObject when it is available+		// This function can be overriden by calling jQuery.ajaxSetup+		xhr: window.XMLHttpRequest && (window.location.protocol !== "file:" || !window.ActiveXObject) ?+			function() {+				return new window.XMLHttpRequest();+			} :+			function() {+				try {+					return new window.ActiveXObject("Microsoft.XMLHTTP");+				} catch(e) {}+			},+		accepts: {+			xml: "application/xml, text/xml",+			html: "text/html",+			script: "text/javascript, application/javascript",+			json: "application/json, text/javascript",+			text: "text/plain",+			_default: "*/*"+		}+	},++	// Last-Modified header cache for next request+	lastModified: {},+	etag: {},++	ajax: function( origSettings ) {+		var s = jQuery.extend(true, {}, jQuery.ajaxSettings, origSettings);+		+		var jsonp, status, data,+			callbackContext = origSettings && origSettings.context || s,+			type = s.type.toUpperCase();++		// convert data if not already a string+		if ( s.data && s.processData && typeof s.data !== "string" ) {+			s.data = jQuery.param( s.data, s.traditional );+		}++		// Handle JSONP Parameter Callbacks+		if ( s.dataType === "jsonp" ) {+			if ( type === "GET" ) {+				if ( !jsre.test( s.url ) ) {+					s.url += (rquery.test( s.url ) ? "&" : "?") + (s.jsonp || "callback") + "=?";+				}+			} else if ( !s.data || !jsre.test(s.data) ) {+				s.data = (s.data ? s.data + "&" : "") + (s.jsonp || "callback") + "=?";+			}+			s.dataType = "json";+		}++		// Build temporary JSONP function+		if ( s.dataType === "json" && (s.data && jsre.test(s.data) || jsre.test(s.url)) ) {+			jsonp = s.jsonpCallback || ("jsonp" + jsc++);++			// Replace the =? sequence both in the query string and the data+			if ( s.data ) {+				s.data = (s.data + "").replace(jsre, "=" + jsonp + "$1");+			}++			s.url = s.url.replace(jsre, "=" + jsonp + "$1");++			// We need to make sure+			// that a JSONP style response is executed properly+			s.dataType = "script";++			// Handle JSONP-style loading+			window[ jsonp ] = window[ jsonp ] || function( tmp ) {+				data = tmp;+				success();+				complete();+				// Garbage collect+				window[ jsonp ] = undefined;++				try {+					delete window[ jsonp ];+				} catch(e) {}++				if ( head ) {+					head.removeChild( script );+				}+			};+		}++		if ( s.dataType === "script" && s.cache === null ) {+			s.cache = false;+		}++		if ( s.cache === false && type === "GET" ) {+			var ts = now();++			// try replacing _= if it is there+			var ret = s.url.replace(rts, "$1_=" + ts + "$2");++			// if nothing was replaced, add timestamp to the end+			s.url = ret + ((ret === s.url) ? (rquery.test(s.url) ? "&" : "?") + "_=" + ts : "");+		}++		// If data is available, append data to url for get requests+		if ( s.data && type === "GET" ) {+			s.url += (rquery.test(s.url) ? "&" : "?") + s.data;+		}++		// Watch for a new set of requests+		if ( s.global && ! jQuery.active++ ) {+			jQuery.event.trigger( "ajaxStart" );+		}++		// Matches an absolute URL, and saves the domain+		var parts = rurl.exec( s.url ),+			remote = parts && (parts[1] && parts[1] !== location.protocol || parts[2] !== location.host);++		// If we're requesting a remote document+		// and trying to load JSON or Script with a GET+		if ( s.dataType === "script" && type === "GET" && remote ) {+			var head = document.getElementsByTagName("head")[0] || document.documentElement;+			var script = document.createElement("script");+			script.src = s.url;+			if ( s.scriptCharset ) {+				script.charset = s.scriptCharset;+			}++			// Handle Script loading+			if ( !jsonp ) {+				var done = false;++				// Attach handlers for all browsers+				script.onload = script.onreadystatechange = function() {+					if ( !done && (!this.readyState ||+							this.readyState === "loaded" || this.readyState === "complete") ) {+						done = true;+						success();+						complete();++						// Handle memory leak in IE+						script.onload = script.onreadystatechange = null;+						if ( head && script.parentNode ) {+							head.removeChild( script );+						}+					}+				};+			}++			// Use insertBefore instead of appendChild  to circumvent an IE6 bug.+			// This arises when a base node is used (#2709 and #4378).+			head.insertBefore( script, head.firstChild );++			// We handle everything using the script element injection+			return undefined;+		}++		var requestDone = false;++		// Create the request object+		var xhr = s.xhr();++		if ( !xhr ) {+			return;+		}++		// Open the socket+		// Passing null username, generates a login popup on Opera (#2865)+		if ( s.username ) {+			xhr.open(type, s.url, s.async, s.username, s.password);+		} else {+			xhr.open(type, s.url, s.async);+		}++		// Need an extra try/catch for cross domain requests in Firefox 3+		try {+			// Set the correct header, if data is being sent+			if ( s.data || origSettings && origSettings.contentType ) {+				xhr.setRequestHeader("Content-Type", s.contentType);+			}++			// Set the If-Modified-Since and/or If-None-Match header, if in ifModified mode.+			if ( s.ifModified ) {+				if ( jQuery.lastModified[s.url] ) {+					xhr.setRequestHeader("If-Modified-Since", jQuery.lastModified[s.url]);+				}++				if ( jQuery.etag[s.url] ) {+					xhr.setRequestHeader("If-None-Match", jQuery.etag[s.url]);+				}+			}++			// Set header so the called script knows that it's an XMLHttpRequest+			// Only send the header if it's not a remote XHR+			if ( !remote ) {+				xhr.setRequestHeader("X-Requested-With", "XMLHttpRequest");+			}++			// Set the Accepts header for the server, depending on the dataType+			xhr.setRequestHeader("Accept", s.dataType && s.accepts[ s.dataType ] ?+				s.accepts[ s.dataType ] + ", */*" :+				s.accepts._default );+		} catch(e) {}++		// Allow custom headers/mimetypes and early abort+		if ( s.beforeSend && s.beforeSend.call(callbackContext, xhr, s) === false ) {+			// Handle the global AJAX counter+			if ( s.global && ! --jQuery.active ) {+				jQuery.event.trigger( "ajaxStop" );+			}++			// close opended socket+			xhr.abort();+			return false;+		}++		if ( s.global ) {+			trigger("ajaxSend", [xhr, s]);+		}++		// Wait for a response to come back+		var onreadystatechange = xhr.onreadystatechange = function( isTimeout ) {+			// The request was aborted+			if ( !xhr || xhr.readyState === 0 || isTimeout === "abort" ) {+				// Opera doesn't call onreadystatechange before this point+				// so we simulate the call+				if ( !requestDone ) {+					complete();+				}++				requestDone = true;+				if ( xhr ) {+					xhr.onreadystatechange = jQuery.noop;+				}++			// The transfer is complete and the data is available, or the request timed out+			} else if ( !requestDone && xhr && (xhr.readyState === 4 || isTimeout === "timeout") ) {+				requestDone = true;+				xhr.onreadystatechange = jQuery.noop;++				status = isTimeout === "timeout" ?+					"timeout" :+					!jQuery.httpSuccess( xhr ) ?+						"error" :+						s.ifModified && jQuery.httpNotModified( xhr, s.url ) ?+							"notmodified" :+							"success";++				var errMsg;++				if ( status === "success" ) {+					// Watch for, and catch, XML document parse errors+					try {+						// process the data (runs the xml through httpData regardless of callback)+						data = jQuery.httpData( xhr, s.dataType, s );+					} catch(err) {+						status = "parsererror";+						errMsg = err;+					}+				}++				// Make sure that the request was successful or notmodified+				if ( status === "success" || status === "notmodified" ) {+					// JSONP handles its own success callback+					if ( !jsonp ) {+						success();+					}+				} else {+					jQuery.handleError(s, xhr, status, errMsg);+				}++				// Fire the complete handlers+				complete();++				if ( isTimeout === "timeout" ) {+					xhr.abort();+				}++				// Stop memory leaks+				if ( s.async ) {+					xhr = null;+				}+			}+		};++		// Override the abort handler, if we can (IE doesn't allow it, but that's OK)+		// Opera doesn't fire onreadystatechange at all on abort+		try {+			var oldAbort = xhr.abort;+			xhr.abort = function() {+				if ( xhr ) {+					oldAbort.call( xhr );+				}++				onreadystatechange( "abort" );+			};+		} catch(e) { }++		// Timeout checker+		if ( s.async && s.timeout > 0 ) {+			setTimeout(function() {+				// Check to see if the request is still happening+				if ( xhr && !requestDone ) {+					onreadystatechange( "timeout" );+				}+			}, s.timeout);+		}++		// Send the data+		try {+			xhr.send( type === "POST" || type === "PUT" || type === "DELETE" ? s.data : null );+		} catch(e) {+			jQuery.handleError(s, xhr, null, e);+			// Fire the complete handlers+			complete();+		}++		// firefox 1.5 doesn't fire statechange for sync requests+		if ( !s.async ) {+			onreadystatechange();+		}++		function success() {+			// If a local callback was specified, fire it and pass it the data+			if ( s.success ) {+				s.success.call( callbackContext, data, status, xhr );+			}++			// Fire the global callback+			if ( s.global ) {+				trigger( "ajaxSuccess", [xhr, s] );+			}+		}++		function complete() {+			// Process result+			if ( s.complete ) {+				s.complete.call( callbackContext, xhr, status);+			}++			// The request was completed+			if ( s.global ) {+				trigger( "ajaxComplete", [xhr, s] );+			}++			// Handle the global AJAX counter+			if ( s.global && ! --jQuery.active ) {+				jQuery.event.trigger( "ajaxStop" );+			}+		}+		+		function trigger(type, args) {+			(s.context ? jQuery(s.context) : jQuery.event).trigger(type, args);+		}++		// return XMLHttpRequest to allow aborting the request etc.+		return xhr;+	},++	handleError: function( s, xhr, status, e ) {+		// If a local callback was specified, fire it+		if ( s.error ) {+			s.error.call( s.context || s, xhr, status, e );+		}++		// Fire the global callback+		if ( s.global ) {+			(s.context ? jQuery(s.context) : jQuery.event).trigger( "ajaxError", [xhr, s, e] );+		}+	},++	// Counter for holding the number of active queries+	active: 0,++	// Determines if an XMLHttpRequest was successful or not+	httpSuccess: function( xhr ) {+		try {+			// IE error sometimes returns 1223 when it should be 204 so treat it as success, see #1450+			return !xhr.status && location.protocol === "file:" ||+				// Opera returns 0 when status is 304+				( xhr.status >= 200 && xhr.status < 300 ) ||+				xhr.status === 304 || xhr.status === 1223 || xhr.status === 0;+		} catch(e) {}++		return false;+	},++	// Determines if an XMLHttpRequest returns NotModified+	httpNotModified: function( xhr, url ) {+		var lastModified = xhr.getResponseHeader("Last-Modified"),+			etag = xhr.getResponseHeader("Etag");++		if ( lastModified ) {+			jQuery.lastModified[url] = lastModified;+		}++		if ( etag ) {+			jQuery.etag[url] = etag;+		}++		// Opera returns 0 when status is 304+		return xhr.status === 304 || xhr.status === 0;+	},++	httpData: function( xhr, type, s ) {+		var ct = xhr.getResponseHeader("content-type") || "",+			xml = type === "xml" || !type && ct.indexOf("xml") >= 0,+			data = xml ? xhr.responseXML : xhr.responseText;++		if ( xml && data.documentElement.nodeName === "parsererror" ) {+			jQuery.error( "parsererror" );+		}++		// Allow a pre-filtering function to sanitize the response+		// s is checked to keep backwards compatibility+		if ( s && s.dataFilter ) {+			data = s.dataFilter( data, type );+		}++		// The filter can actually parse the response+		if ( typeof data === "string" ) {+			// Get the JavaScript object, if JSON is used.+			if ( type === "json" || !type && ct.indexOf("json") >= 0 ) {+				data = jQuery.parseJSON( data );++			// If the type is "script", eval it in global context+			} else if ( type === "script" || !type && ct.indexOf("javascript") >= 0 ) {+				jQuery.globalEval( data );+			}+		}++		return data;+	},++	// Serialize an array of form elements or a set of+	// key/values into a query string+	param: function( a, traditional ) {+		var s = [];+		+		// Set traditional to true for jQuery <= 1.3.2 behavior.+		if ( traditional === undefined ) {+			traditional = jQuery.ajaxSettings.traditional;+		}+		+		// If an array was passed in, assume that it is an array of form elements.+		if ( jQuery.isArray(a) || a.jquery ) {+			// Serialize the form elements+			jQuery.each( a, function() {+				add( this.name, this.value );+			});+			+		} else {+			// If traditional, encode the "old" way (the way 1.3.2 or older+			// did it), otherwise encode params recursively.+			for ( var prefix in a ) {+				buildParams( prefix, a[prefix] );+			}+		}++		// Return the resulting serialization+		return s.join("&").replace(r20, "+");++		function buildParams( prefix, obj ) {+			if ( jQuery.isArray(obj) ) {+				// Serialize array item.+				jQuery.each( obj, function( i, v ) {+					if ( traditional || /\[\]$/.test( prefix ) ) {+						// Treat each array item as a scalar.+						add( prefix, v );+					} else {+						// If array item is non-scalar (array or object), encode its+						// numeric index to resolve deserialization ambiguity issues.+						// Note that rack (as of 1.0.0) can't currently deserialize+						// nested arrays properly, and attempting to do so may cause+						// a server error. Possible fixes are to modify rack's+						// deserialization algorithm or to provide an option or flag+						// to force array serialization to be shallow.+						buildParams( prefix + "[" + ( typeof v === "object" || jQuery.isArray(v) ? i : "" ) + "]", v );+					}+				});+					+			} else if ( !traditional && obj != null && typeof obj === "object" ) {+				// Serialize object item.+				jQuery.each( obj, function( k, v ) {+					buildParams( prefix + "[" + k + "]", v );+				});+					+			} else {+				// Serialize scalar item.+				add( prefix, obj );+			}+		}++		function add( key, value ) {+			// If value is a function, invoke it and return its value+			value = jQuery.isFunction(value) ? value() : value;+			s[ s.length ] = encodeURIComponent(key) + "=" + encodeURIComponent(value);+		}+	}+});+var elemdisplay = {},+	rfxtypes = /toggle|show|hide/,+	rfxnum = /^([+-]=)?([\d+-.]+)(.*)$/,+	timerId,+	fxAttrs = [+		// height animations+		[ "height", "marginTop", "marginBottom", "paddingTop", "paddingBottom" ],+		// width animations+		[ "width", "marginLeft", "marginRight", "paddingLeft", "paddingRight" ],+		// opacity animations+		[ "opacity" ]+	];++jQuery.fn.extend({+	show: function( speed, callback ) {+		if ( speed || speed === 0) {+			return this.animate( genFx("show", 3), speed, callback);++		} else {+			for ( var i = 0, l = this.length; i < l; i++ ) {+				var old = jQuery.data(this[i], "olddisplay");++				this[i].style.display = old || "";++				if ( jQuery.css(this[i], "display") === "none" ) {+					var nodeName = this[i].nodeName, display;++					if ( elemdisplay[ nodeName ] ) {+						display = elemdisplay[ nodeName ];++					} else {+						var elem = jQuery("<" + nodeName + " />").appendTo("body");++						display = elem.css("display");++						if ( display === "none" ) {+							display = "block";+						}++						elem.remove();++						elemdisplay[ nodeName ] = display;+					}++					jQuery.data(this[i], "olddisplay", display);+				}+			}++			// Set the display of the elements in a second loop+			// to avoid the constant reflow+			for ( var j = 0, k = this.length; j < k; j++ ) {+				this[j].style.display = jQuery.data(this[j], "olddisplay") || "";+			}++			return this;+		}+	},++	hide: function( speed, callback ) {+		if ( speed || speed === 0 ) {+			return this.animate( genFx("hide", 3), speed, callback);++		} else {+			for ( var i = 0, l = this.length; i < l; i++ ) {+				var old = jQuery.data(this[i], "olddisplay");+				if ( !old && old !== "none" ) {+					jQuery.data(this[i], "olddisplay", jQuery.css(this[i], "display"));+				}+			}++			// Set the display of the elements in a second loop+			// to avoid the constant reflow+			for ( var j = 0, k = this.length; j < k; j++ ) {+				this[j].style.display = "none";+			}++			return this;+		}+	},++	// Save the old toggle function+	_toggle: jQuery.fn.toggle,++	toggle: function( fn, fn2 ) {+		var bool = typeof fn === "boolean";++		if ( jQuery.isFunction(fn) && jQuery.isFunction(fn2) ) {+			this._toggle.apply( this, arguments );++		} else if ( fn == null || bool ) {+			this.each(function() {+				var state = bool ? fn : jQuery(this).is(":hidden");+				jQuery(this)[ state ? "show" : "hide" ]();+			});++		} else {+			this.animate(genFx("toggle", 3), fn, fn2);+		}++		return this;+	},++	fadeTo: function( speed, to, callback ) {+		return this.filter(":hidden").css("opacity", 0).show().end()+					.animate({opacity: to}, speed, callback);+	},++	animate: function( prop, speed, easing, callback ) {+		var optall = jQuery.speed(speed, easing, callback);++		if ( jQuery.isEmptyObject( prop ) ) {+			return this.each( optall.complete );+		}++		return this[ optall.queue === false ? "each" : "queue" ](function() {+			var opt = jQuery.extend({}, optall), p,+				hidden = this.nodeType === 1 && jQuery(this).is(":hidden"),+				self = this;++			for ( p in prop ) {+				var name = p.replace(rdashAlpha, fcamelCase);++				if ( p !== name ) {+					prop[ name ] = prop[ p ];+					delete prop[ p ];+					p = name;+				}++				if ( prop[p] === "hide" && hidden || prop[p] === "show" && !hidden ) {+					return opt.complete.call(this);+				}++				if ( ( p === "height" || p === "width" ) && this.style ) {+					// Store display property+					opt.display = jQuery.css(this, "display");++					// Make sure that nothing sneaks out+					opt.overflow = this.style.overflow;+				}++				if ( jQuery.isArray( prop[p] ) ) {+					// Create (if needed) and add to specialEasing+					(opt.specialEasing = opt.specialEasing || {})[p] = prop[p][1];+					prop[p] = prop[p][0];+				}+			}++			if ( opt.overflow != null ) {+				this.style.overflow = "hidden";+			}++			opt.curAnim = jQuery.extend({}, prop);++			jQuery.each( prop, function( name, val ) {+				var e = new jQuery.fx( self, opt, name );++				if ( rfxtypes.test(val) ) {+					e[ val === "toggle" ? hidden ? "show" : "hide" : val ]( prop );++				} else {+					var parts = rfxnum.exec(val),+						start = e.cur(true) || 0;++					if ( parts ) {+						var end = parseFloat( parts[2] ),+							unit = parts[3] || "px";++						// We need to compute starting value+						if ( unit !== "px" ) {+							self.style[ name ] = (end || 1) + unit;+							start = ((end || 1) / e.cur(true)) * start;+							self.style[ name ] = start + unit;+						}++						// If a +=/-= token was provided, we're doing a relative animation+						if ( parts[1] ) {+							end = ((parts[1] === "-=" ? -1 : 1) * end) + start;+						}++						e.custom( start, end, unit );++					} else {+						e.custom( start, val, "" );+					}+				}+			});++			// For JS strict compliance+			return true;+		});+	},++	stop: function( clearQueue, gotoEnd ) {+		var timers = jQuery.timers;++		if ( clearQueue ) {+			this.queue([]);+		}++		this.each(function() {+			// go in reverse order so anything added to the queue during the loop is ignored+			for ( var i = timers.length - 1; i >= 0; i-- ) {+				if ( timers[i].elem === this ) {+					if (gotoEnd) {+						// force the next step to be the last+						timers[i](true);+					}++					timers.splice(i, 1);+				}+			}+		});++		// start the next in the queue if the last step wasn't forced+		if ( !gotoEnd ) {+			this.dequeue();+		}++		return this;+	}++});++// Generate shortcuts for custom animations+jQuery.each({+	slideDown: genFx("show", 1),+	slideUp: genFx("hide", 1),+	slideToggle: genFx("toggle", 1),+	fadeIn: { opacity: "show" },+	fadeOut: { opacity: "hide" }+}, function( name, props ) {+	jQuery.fn[ name ] = function( speed, callback ) {+		return this.animate( props, speed, callback );+	};+});++jQuery.extend({+	speed: function( speed, easing, fn ) {+		var opt = speed && typeof speed === "object" ? speed : {+			complete: fn || !fn && easing ||+				jQuery.isFunction( speed ) && speed,+			duration: speed,+			easing: fn && easing || easing && !jQuery.isFunction(easing) && easing+		};++		opt.duration = jQuery.fx.off ? 0 : typeof opt.duration === "number" ? opt.duration :+			jQuery.fx.speeds[opt.duration] || jQuery.fx.speeds._default;++		// Queueing+		opt.old = opt.complete;+		opt.complete = function() {+			if ( opt.queue !== false ) {+				jQuery(this).dequeue();+			}+			if ( jQuery.isFunction( opt.old ) ) {+				opt.old.call( this );+			}+		};++		return opt;+	},++	easing: {+		linear: function( p, n, firstNum, diff ) {+			return firstNum + diff * p;+		},+		swing: function( p, n, firstNum, diff ) {+			return ((-Math.cos(p*Math.PI)/2) + 0.5) * diff + firstNum;+		}+	},++	timers: [],++	fx: function( elem, options, prop ) {+		this.options = options;+		this.elem = elem;+		this.prop = prop;++		if ( !options.orig ) {+			options.orig = {};+		}+	}++});++jQuery.fx.prototype = {+	// Simple function for setting a style value+	update: function() {+		if ( this.options.step ) {+			this.options.step.call( this.elem, this.now, this );+		}++		(jQuery.fx.step[this.prop] || jQuery.fx.step._default)( this );++		// Set display property to block for height/width animations+		if ( ( this.prop === "height" || this.prop === "width" ) && this.elem.style ) {+			this.elem.style.display = "block";+		}+	},++	// Get the current size+	cur: function( force ) {+		if ( this.elem[this.prop] != null && (!this.elem.style || this.elem.style[this.prop] == null) ) {+			return this.elem[ this.prop ];+		}++		var r = parseFloat(jQuery.css(this.elem, this.prop, force));+		return r && r > -10000 ? r : parseFloat(jQuery.curCSS(this.elem, this.prop)) || 0;+	},++	// Start an animation from one number to another+	custom: function( from, to, unit ) {+		this.startTime = now();+		this.start = from;+		this.end = to;+		this.unit = unit || this.unit || "px";+		this.now = this.start;+		this.pos = this.state = 0;++		var self = this;+		function t( gotoEnd ) {+			return self.step(gotoEnd);+		}++		t.elem = this.elem;++		if ( t() && jQuery.timers.push(t) && !timerId ) {+			timerId = setInterval(jQuery.fx.tick, 13);+		}+	},++	// Simple 'show' function+	show: function() {+		// Remember where we started, so that we can go back to it later+		this.options.orig[this.prop] = jQuery.style( this.elem, this.prop );+		this.options.show = true;++		// Begin the animation+		// Make sure that we start at a small width/height to avoid any+		// flash of content+		this.custom(this.prop === "width" || this.prop === "height" ? 1 : 0, this.cur());++		// Start by showing the element+		jQuery( this.elem ).show();+	},++	// Simple 'hide' function+	hide: function() {+		// Remember where we started, so that we can go back to it later+		this.options.orig[this.prop] = jQuery.style( this.elem, this.prop );+		this.options.hide = true;++		// Begin the animation+		this.custom(this.cur(), 0);+	},++	// Each step of an animation+	step: function( gotoEnd ) {+		var t = now(), done = true;++		if ( gotoEnd || t >= this.options.duration + this.startTime ) {+			this.now = this.end;+			this.pos = this.state = 1;+			this.update();++			this.options.curAnim[ this.prop ] = true;++			for ( var i in this.options.curAnim ) {+				if ( this.options.curAnim[i] !== true ) {+					done = false;+				}+			}++			if ( done ) {+				if ( this.options.display != null ) {+					// Reset the overflow+					this.elem.style.overflow = this.options.overflow;++					// Reset the display+					var old = jQuery.data(this.elem, "olddisplay");+					this.elem.style.display = old ? old : this.options.display;++					if ( jQuery.css(this.elem, "display") === "none" ) {+						this.elem.style.display = "block";+					}+				}++				// Hide the element if the "hide" operation was done+				if ( this.options.hide ) {+					jQuery(this.elem).hide();+				}++				// Reset the properties, if the item has been hidden or shown+				if ( this.options.hide || this.options.show ) {+					for ( var p in this.options.curAnim ) {+						jQuery.style(this.elem, p, this.options.orig[p]);+					}+				}++				// Execute the complete function+				this.options.complete.call( this.elem );+			}++			return false;++		} else {+			var n = t - this.startTime;+			this.state = n / this.options.duration;++			// Perform the easing function, defaults to swing+			var specialEasing = this.options.specialEasing && this.options.specialEasing[this.prop];+			var defaultEasing = this.options.easing || (jQuery.easing.swing ? "swing" : "linear");+			this.pos = jQuery.easing[specialEasing || defaultEasing](this.state, n, 0, 1, this.options.duration);+			this.now = this.start + ((this.end - this.start) * this.pos);++			// Perform the next step of the animation+			this.update();+		}++		return true;+	}+};++jQuery.extend( jQuery.fx, {+	tick: function() {+		var timers = jQuery.timers;++		for ( var i = 0; i < timers.length; i++ ) {+			if ( !timers[i]() ) {+				timers.splice(i--, 1);+			}+		}++		if ( !timers.length ) {+			jQuery.fx.stop();+		}+	},+		+	stop: function() {+		clearInterval( timerId );+		timerId = null;+	},+	+	speeds: {+		slow: 600,+ 		fast: 200,+ 		// Default speed+ 		_default: 400+	},++	step: {+		opacity: function( fx ) {+			jQuery.style(fx.elem, "opacity", fx.now);+		},++		_default: function( fx ) {+			if ( fx.elem.style && fx.elem.style[ fx.prop ] != null ) {+				fx.elem.style[ fx.prop ] = (fx.prop === "width" || fx.prop === "height" ? Math.max(0, fx.now) : fx.now) + fx.unit;+			} else {+				fx.elem[ fx.prop ] = fx.now;+			}+		}+	}+});++if ( jQuery.expr && jQuery.expr.filters ) {+	jQuery.expr.filters.animated = function( elem ) {+		return jQuery.grep(jQuery.timers, function( fn ) {+			return elem === fn.elem;+		}).length;+	};+}++function genFx( type, num ) {+	var obj = {};++	jQuery.each( fxAttrs.concat.apply([], fxAttrs.slice(0,num)), function() {+		obj[ this ] = type;+	});++	return obj;+}+if ( "getBoundingClientRect" in document.documentElement ) {+	jQuery.fn.offset = function( options ) {+		var elem = this[0];++		if ( options ) { +			return this.each(function( i ) {+				jQuery.offset.setOffset( this, options, i );+			});+		}++		if ( !elem || !elem.ownerDocument ) {+			return null;+		}++		if ( elem === elem.ownerDocument.body ) {+			return jQuery.offset.bodyOffset( elem );+		}++		var box = elem.getBoundingClientRect(),+			doc = elem.ownerDocument,+			body = doc.body,+			docElem = doc.documentElement,+			win = getWindow(doc),+			clientTop  = docElem.clientTop  || body.clientTop  || 0,+			clientLeft = docElem.clientLeft || body.clientLeft || 0,+			scrollTop  = (win.pageYOffset || jQuery.support.boxModel && docElem.scrollTop  || body.scrollTop ),+			scrollLeft = (win.pageXOffset || jQuery.support.boxModel && docElem.scrollLeft || body.scrollLeft),+			top  = box.top  + scrollTop  - clientTop,+			left = box.left + scrollLeft - clientLeft;++		return { top: top, left: left };+	};++} else {+	jQuery.fn.offset = function( options ) {+		var elem = this[0];++		if ( options ) { +			return this.each(function( i ) {+				jQuery.offset.setOffset( this, options, i );+			});+		}++		if ( !elem || !elem.ownerDocument ) {+			return null;+		}++		if ( elem === elem.ownerDocument.body ) {+			return jQuery.offset.bodyOffset( elem );+		}++		jQuery.offset.initialize();++		var offsetParent = elem.offsetParent, prevOffsetParent = elem,+			doc = elem.ownerDocument, computedStyle, docElem = doc.documentElement,+			body = doc.body, defaultView = doc.defaultView,+			prevComputedStyle = defaultView ? defaultView.getComputedStyle( elem, null ) : elem.currentStyle,+			top = elem.offsetTop, left = elem.offsetLeft;++		while ( (elem = elem.parentNode) && elem !== body && elem !== docElem ) {+			if ( jQuery.offset.supportsFixedPosition && prevComputedStyle.position === "fixed" ) {+				break;+			}++			computedStyle = defaultView ? defaultView.getComputedStyle(elem, null) : elem.currentStyle;+			top  -= elem.scrollTop;+			left -= elem.scrollLeft;++			if ( elem === offsetParent ) {+				top  += elem.offsetTop;+				left += elem.offsetLeft;++				if ( jQuery.offset.doesNotAddBorder && !(jQuery.offset.doesAddBorderForTableAndCells && /^t(able|d|h)$/i.test(elem.nodeName)) ) {+					top  += parseFloat( computedStyle.borderTopWidth  ) || 0;+					left += parseFloat( computedStyle.borderLeftWidth ) || 0;+				}++				prevOffsetParent = offsetParent, offsetParent = elem.offsetParent;+			}++			if ( jQuery.offset.subtractsBorderForOverflowNotVisible && computedStyle.overflow !== "visible" ) {+				top  += parseFloat( computedStyle.borderTopWidth  ) || 0;+				left += parseFloat( computedStyle.borderLeftWidth ) || 0;+			}++			prevComputedStyle = computedStyle;+		}++		if ( prevComputedStyle.position === "relative" || prevComputedStyle.position === "static" ) {+			top  += body.offsetTop;+			left += body.offsetLeft;+		}++		if ( jQuery.offset.supportsFixedPosition && prevComputedStyle.position === "fixed" ) {+			top  += Math.max( docElem.scrollTop, body.scrollTop );+			left += Math.max( docElem.scrollLeft, body.scrollLeft );+		}++		return { top: top, left: left };+	};+}++jQuery.offset = {+	initialize: function() {+		var body = document.body, container = document.createElement("div"), innerDiv, checkDiv, table, td, bodyMarginTop = parseFloat( jQuery.curCSS(body, "marginTop", true) ) || 0,+			html = "<div style='position:absolute;top:0;left:0;margin:0;border:5px solid #000;padding:0;width:1px;height:1px;'><div></div></div><table style='position:absolute;top:0;left:0;margin:0;border:5px solid #000;padding:0;width:1px;height:1px;' cellpadding='0' cellspacing='0'><tr><td></td></tr></table>";++		jQuery.extend( container.style, { position: "absolute", top: 0, left: 0, margin: 0, border: 0, width: "1px", height: "1px", visibility: "hidden" } );++		container.innerHTML = html;+		body.insertBefore( container, body.firstChild );+		innerDiv = container.firstChild;+		checkDiv = innerDiv.firstChild;+		td = innerDiv.nextSibling.firstChild.firstChild;++		this.doesNotAddBorder = (checkDiv.offsetTop !== 5);+		this.doesAddBorderForTableAndCells = (td.offsetTop === 5);++		checkDiv.style.position = "fixed", checkDiv.style.top = "20px";+		// safari subtracts parent border width here which is 5px+		this.supportsFixedPosition = (checkDiv.offsetTop === 20 || checkDiv.offsetTop === 15);+		checkDiv.style.position = checkDiv.style.top = "";++		innerDiv.style.overflow = "hidden", innerDiv.style.position = "relative";+		this.subtractsBorderForOverflowNotVisible = (checkDiv.offsetTop === -5);++		this.doesNotIncludeMarginInBodyOffset = (body.offsetTop !== bodyMarginTop);++		body.removeChild( container );+		body = container = innerDiv = checkDiv = table = td = null;+		jQuery.offset.initialize = jQuery.noop;+	},++	bodyOffset: function( body ) {+		var top = body.offsetTop, left = body.offsetLeft;++		jQuery.offset.initialize();++		if ( jQuery.offset.doesNotIncludeMarginInBodyOffset ) {+			top  += parseFloat( jQuery.curCSS(body, "marginTop",  true) ) || 0;+			left += parseFloat( jQuery.curCSS(body, "marginLeft", true) ) || 0;+		}++		return { top: top, left: left };+	},+	+	setOffset: function( elem, options, i ) {+		// set position first, in-case top/left are set even on static elem+		if ( /static/.test( jQuery.curCSS( elem, "position" ) ) ) {+			elem.style.position = "relative";+		}+		var curElem   = jQuery( elem ),+			curOffset = curElem.offset(),+			curTop    = parseInt( jQuery.curCSS( elem, "top",  true ), 10 ) || 0,+			curLeft   = parseInt( jQuery.curCSS( elem, "left", true ), 10 ) || 0;++		if ( jQuery.isFunction( options ) ) {+			options = options.call( elem, i, curOffset );+		}++		var props = {+			top:  (options.top  - curOffset.top)  + curTop,+			left: (options.left - curOffset.left) + curLeft+		};+		+		if ( "using" in options ) {+			options.using.call( elem, props );+		} else {+			curElem.css( props );+		}+	}+};+++jQuery.fn.extend({+	position: function() {+		if ( !this[0] ) {+			return null;+		}++		var elem = this[0],++		// Get *real* offsetParent+		offsetParent = this.offsetParent(),++		// Get correct offsets+		offset       = this.offset(),+		parentOffset = /^body|html$/i.test(offsetParent[0].nodeName) ? { top: 0, left: 0 } : offsetParent.offset();++		// Subtract element margins+		// note: when an element has margin: auto the offsetLeft and marginLeft+		// are the same in Safari causing offset.left to incorrectly be 0+		offset.top  -= parseFloat( jQuery.curCSS(elem, "marginTop",  true) ) || 0;+		offset.left -= parseFloat( jQuery.curCSS(elem, "marginLeft", true) ) || 0;++		// Add offsetParent borders+		parentOffset.top  += parseFloat( jQuery.curCSS(offsetParent[0], "borderTopWidth",  true) ) || 0;+		parentOffset.left += parseFloat( jQuery.curCSS(offsetParent[0], "borderLeftWidth", true) ) || 0;++		// Subtract the two offsets+		return {+			top:  offset.top  - parentOffset.top,+			left: offset.left - parentOffset.left+		};+	},++	offsetParent: function() {+		return this.map(function() {+			var offsetParent = this.offsetParent || document.body;+			while ( offsetParent && (!/^body|html$/i.test(offsetParent.nodeName) && jQuery.css(offsetParent, "position") === "static") ) {+				offsetParent = offsetParent.offsetParent;+			}+			return offsetParent;+		});+	}+});+++// Create scrollLeft and scrollTop methods+jQuery.each( ["Left", "Top"], function( i, name ) {+	var method = "scroll" + name;++	jQuery.fn[ method ] = function(val) {+		var elem = this[0], win;+		+		if ( !elem ) {+			return null;+		}++		if ( val !== undefined ) {+			// Set the scroll offset+			return this.each(function() {+				win = getWindow( this );++				if ( win ) {+					win.scrollTo(+						!i ? val : jQuery(win).scrollLeft(),+						 i ? val : jQuery(win).scrollTop()+					);++				} else {+					this[ method ] = val;+				}+			});+		} else {+			win = getWindow( elem );++			// Return the scroll offset+			return win ? ("pageXOffset" in win) ? win[ i ? "pageYOffset" : "pageXOffset" ] :+				jQuery.support.boxModel && win.document.documentElement[ method ] ||+					win.document.body[ method ] :+				elem[ method ];+		}+	};+});++function getWindow( elem ) {+	return ("scrollTo" in elem && elem.document) ?+		elem :+		elem.nodeType === 9 ?+			elem.defaultView || elem.parentWindow :+			false;+}+// Create innerHeight, innerWidth, outerHeight and outerWidth methods+jQuery.each([ "Height", "Width" ], function( i, name ) {++	var type = name.toLowerCase();++	// innerHeight and innerWidth+	jQuery.fn["inner" + name] = function() {+		return this[0] ?+			jQuery.css( this[0], type, false, "padding" ) :+			null;+	};++	// outerHeight and outerWidth+	jQuery.fn["outer" + name] = function( margin ) {+		return this[0] ?+			jQuery.css( this[0], type, false, margin ? "margin" : "border" ) :+			null;+	};++	jQuery.fn[ type ] = function( size ) {+		// Get window width or height+		var elem = this[0];+		if ( !elem ) {+			return size == null ? null : this;+		}+		+		if ( jQuery.isFunction( size ) ) {+			return this.each(function( i ) {+				var self = jQuery( this );+				self[ type ]( size.call( this, i, self[ type ]() ) );+			});+		}++		return ("scrollTo" in elem && elem.document) ? // does it walk and quack like a window?+			// Everyone else use document.documentElement or document.body depending on Quirks vs Standards mode+			elem.document.compatMode === "CSS1Compat" && elem.document.documentElement[ "client" + name ] ||+			elem.document.body[ "client" + name ] :++			// Get document width or height+			(elem.nodeType === 9) ? // is it a document+				// Either scroll[Width/Height] or offset[Width/Height], whichever is greater+				Math.max(+					elem.documentElement["client" + name],+					elem.body["scroll" + name], elem.documentElement["scroll" + name],+					elem.body["offset" + name], elem.documentElement["offset" + name]+				) :++				// Get or set width or height on the element+				size === undefined ?+					// Get width or height on the element+					jQuery.css( elem, type ) :++					// Set the width or height on the element (default to pixels if value is unitless)+					this.css( type, typeof size === "string" ? size : size + "px" );+	};++});+// Expose jQuery to the global object+window.jQuery = window.$ = jQuery;++})(window);
+ files/Docs/prettify.css view
@@ -0,0 +1,1 @@+.pln{color:#000}@media screen{.str{color:#080}.kwd{color:#008}.com{color:#800}.typ{color:#606}.lit{color:#066}.pun,.opn,.clo{color:#660}.tag{color:#008}.atn{color:#606}.atv{color:#080}.dec,.var{color:#606}.fun{color:red}}@media print,projection{.str{color:#060}.kwd{color:#006;font-weight:bold}.com{color:#600;font-style:italic}.typ{color:#404;font-weight:bold}.lit{color:#044}.pun,.opn,.clo{color:#440}.tag{color:#006;font-weight:bold}.atn{color:#404}.atv{color:#060}}pre.prettyprint{padding:2px;border:1px solid #888}ol.linenums{margin-top:0;margin-bottom:0}li.L0,li.L1,li.L2,li.L3,li.L5,li.L6,li.L7,li.L8{list-style-type:none}li.L1,li.L3,li.L5,li.L7,li.L9{background:#eee}
+ files/Docs/prettify.js view
@@ -0,0 +1,28 @@+var q=null;window.PR_SHOULD_USE_CONTINUATION=!0;+(function(){function L(a){function m(a){var f=a.charCodeAt(0);if(f!==92)return f;var b=a.charAt(1);return(f=r[b])?f:"0"<=b&&b<="7"?parseInt(a.substring(1),8):b==="u"||b==="x"?parseInt(a.substring(2),16):a.charCodeAt(1)}function e(a){if(a<32)return(a<16?"\\x0":"\\x")+a.toString(16);a=String.fromCharCode(a);if(a==="\\"||a==="-"||a==="["||a==="]")a="\\"+a;return a}function h(a){for(var f=a.substring(1,a.length-1).match(/\\u[\dA-Fa-f]{4}|\\x[\dA-Fa-f]{2}|\\[0-3][0-7]{0,2}|\\[0-7]{1,2}|\\[\S\s]|[^\\]/g),a=+[],b=[],o=f[0]==="^",c=o?1:0,i=f.length;c<i;++c){var j=f[c];if(/\\[bdsw]/i.test(j))a.push(j);else{var j=m(j),d;c+2<i&&"-"===f[c+1]?(d=m(f[c+2]),c+=2):d=j;b.push([j,d]);d<65||j>122||(d<65||j>90||b.push([Math.max(65,j)|32,Math.min(d,90)|32]),d<97||j>122||b.push([Math.max(97,j)&-33,Math.min(d,122)&-33]))}}b.sort(function(a,f){return a[0]-f[0]||f[1]-a[1]});f=[];j=[NaN,NaN];for(c=0;c<b.length;++c)i=b[c],i[0]<=j[1]+1?j[1]=Math.max(j[1],i[1]):f.push(j=i);b=["["];o&&b.push("^");b.push.apply(b,a);for(c=0;c<+f.length;++c)i=f[c],b.push(e(i[0])),i[1]>i[0]&&(i[1]+1>i[0]&&b.push("-"),b.push(e(i[1])));b.push("]");return b.join("")}function y(a){for(var f=a.source.match(/\[(?:[^\\\]]|\\[\S\s])*]|\\u[\dA-Fa-f]{4}|\\x[\dA-Fa-f]{2}|\\\d+|\\[^\dux]|\(\?[!:=]|[()^]|[^()[\\^]+/g),b=f.length,d=[],c=0,i=0;c<b;++c){var j=f[c];j==="("?++i:"\\"===j.charAt(0)&&(j=+j.substring(1))&&j<=i&&(d[j]=-1)}for(c=1;c<d.length;++c)-1===d[c]&&(d[c]=++t);for(i=c=0;c<b;++c)j=f[c],j==="("?(++i,d[i]===void 0&&(f[c]="(?:")):"\\"===j.charAt(0)&&+(j=+j.substring(1))&&j<=i&&(f[c]="\\"+d[i]);for(i=c=0;c<b;++c)"^"===f[c]&&"^"!==f[c+1]&&(f[c]="");if(a.ignoreCase&&s)for(c=0;c<b;++c)j=f[c],a=j.charAt(0),j.length>=2&&a==="["?f[c]=h(j):a!=="\\"&&(f[c]=j.replace(/[A-Za-z]/g,function(a){a=a.charCodeAt(0);return"["+String.fromCharCode(a&-33,a|32)+"]"}));return f.join("")}for(var t=0,s=!1,l=!1,p=0,d=a.length;p<d;++p){var g=a[p];if(g.ignoreCase)l=!0;else if(/[a-z]/i.test(g.source.replace(/\\u[\da-f]{4}|\\x[\da-f]{2}|\\[^UXux]/gi,""))){s=!0;l=!1;break}}for(var r=+{b:8,t:9,n:10,v:11,f:12,r:13},n=[],p=0,d=a.length;p<d;++p){g=a[p];if(g.global||g.multiline)throw Error(""+g);n.push("(?:"+y(g)+")")}return RegExp(n.join("|"),l?"gi":"g")}function M(a){function m(a){switch(a.nodeType){case 1:if(e.test(a.className))break;for(var g=a.firstChild;g;g=g.nextSibling)m(g);g=a.nodeName;if("BR"===g||"LI"===g)h[s]="\n",t[s<<1]=y++,t[s++<<1|1]=a;break;case 3:case 4:g=a.nodeValue,g.length&&(g=p?g.replace(/\r\n?/g,"\n"):g.replace(/[\t\n\r ]+/g," "),h[s]=g,t[s<<1]=y,y+=g.length,+t[s++<<1|1]=a)}}var e=/(?:^|\s)nocode(?:\s|$)/,h=[],y=0,t=[],s=0,l;a.currentStyle?l=a.currentStyle.whiteSpace:window.getComputedStyle&&(l=document.defaultView.getComputedStyle(a,q).getPropertyValue("white-space"));var p=l&&"pre"===l.substring(0,3);m(a);return{a:h.join("").replace(/\n$/,""),c:t}}function B(a,m,e,h){m&&(a={a:m,d:a},e(a),h.push.apply(h,a.e))}function x(a,m){function e(a){for(var l=a.d,p=[l,"pln"],d=0,g=a.a.match(y)||[],r={},n=0,z=g.length;n<z;++n){var f=g[n],b=r[f],o=void 0,c;if(typeof b===+"string")c=!1;else{var i=h[f.charAt(0)];if(i)o=f.match(i[1]),b=i[0];else{for(c=0;c<t;++c)if(i=m[c],o=f.match(i[1])){b=i[0];break}o||(b="pln")}if((c=b.length>=5&&"lang-"===b.substring(0,5))&&!(o&&typeof o[1]==="string"))c=!1,b="src";c||(r[f]=b)}i=d;d+=f.length;if(c){c=o[1];var j=f.indexOf(c),k=j+c.length;o[2]&&(k=f.length-o[2].length,j=k-c.length);b=b.substring(5);B(l+i,f.substring(0,j),e,p);B(l+i+j,c,C(b,c),p);B(l+i+k,f.substring(k),e,p)}else p.push(l+i,b)}a.e=p}var h={},y;(function(){for(var e=a.concat(m),+l=[],p={},d=0,g=e.length;d<g;++d){var r=e[d],n=r[3];if(n)for(var k=n.length;--k>=0;)h[n.charAt(k)]=r;r=r[1];n=""+r;p.hasOwnProperty(n)||(l.push(r),p[n]=q)}l.push(/[\S\s]/);y=L(l)})();var t=m.length;return e}function u(a){var m=[],e=[];a.tripleQuotedStrings?m.push(["str",/^(?:'''(?:[^'\\]|\\[\S\s]|''?(?=[^']))*(?:'''|$)|"""(?:[^"\\]|\\[\S\s]|""?(?=[^"]))*(?:"""|$)|'(?:[^'\\]|\\[\S\s])*(?:'|$)|"(?:[^"\\]|\\[\S\s])*(?:"|$))/,q,"'\""]):a.multiLineStrings?m.push(["str",/^(?:'(?:[^'\\]|\\[\S\s])*(?:'|$)|"(?:[^"\\]|\\[\S\s])*(?:"|$)|`(?:[^\\`]|\\[\S\s])*(?:`|$))/,+q,"'\"`"]):m.push(["str",/^(?:'(?:[^\n\r'\\]|\\.)*(?:'|$)|"(?:[^\n\r"\\]|\\.)*(?:"|$))/,q,"\"'"]);a.verbatimStrings&&e.push(["str",/^@"(?:[^"]|"")*(?:"|$)/,q]);var h=a.hashComments;h&&(a.cStyleComments?(h>1?m.push(["com",/^#(?:##(?:[^#]|#(?!##))*(?:###|$)|.*)/,q,"#"]):m.push(["com",/^#(?:(?:define|elif|else|endif|error|ifdef|include|ifndef|line|pragma|undef|warning)\b|[^\n\r]*)/,q,"#"]),e.push(["str",/^<(?:(?:(?:\.\.\/)*|\/?)(?:[\w-]+(?:\/[\w-]+)+)?[\w-]+\.h|[a-z]\w*)>/,q])):m.push(["com",/^#[^\n\r]*/,+q,"#"]));a.cStyleComments&&(e.push(["com",/^\/\/[^\n\r]*/,q]),e.push(["com",/^\/\*[\S\s]*?(?:\*\/|$)/,q]));a.regexLiterals&&e.push(["lang-regex",/^(?:^^\.?|[!+-]|!=|!==|#|%|%=|&|&&|&&=|&=|\(|\*|\*=|\+=|,|-=|->|\/|\/=|:|::|;|<|<<|<<=|<=|=|==|===|>|>=|>>|>>=|>>>|>>>=|[?@[^]|\^=|\^\^|\^\^=|{|\||\|=|\|\||\|\|=|~|break|case|continue|delete|do|else|finally|instanceof|return|throw|try|typeof)\s*(\/(?=[^*/])(?:[^/[\\]|\\[\S\s]|\[(?:[^\\\]]|\\[\S\s])*(?:]|$))+\/)/]);(h=a.types)&&e.push(["typ",h]);a=(""+a.keywords).replace(/^ | $/g,+"");a.length&&e.push(["kwd",RegExp("^(?:"+a.replace(/[\s,]+/g,"|")+")\\b"),q]);m.push(["pln",/^\s+/,q," \r\n\t\xa0"]);e.push(["lit",/^@[$_a-z][\w$@]*/i,q],["typ",/^(?:[@_]?[A-Z]+[a-z][\w$@]*|\w+_t\b)/,q],["pln",/^[$_a-z][\w$@]*/i,q],["lit",/^(?:0x[\da-f]+|(?:\d(?:_\d+)*\d*(?:\.\d*)?|\.\d\+)(?:e[+-]?\d+)?)[a-z]*/i,q,"0123456789"],["pln",/^\\[\S\s]?/,q],["pun",/^.[^\s\w"-$'./@\\`]*/,q]);return x(m,e)}function D(a,m){function e(a){switch(a.nodeType){case 1:if(k.test(a.className))break;if("BR"===a.nodeName)h(a),+a.parentNode&&a.parentNode.removeChild(a);else for(a=a.firstChild;a;a=a.nextSibling)e(a);break;case 3:case 4:if(p){var b=a.nodeValue,d=b.match(t);if(d){var c=b.substring(0,d.index);a.nodeValue=c;(b=b.substring(d.index+d[0].length))&&a.parentNode.insertBefore(s.createTextNode(b),a.nextSibling);h(a);c||a.parentNode.removeChild(a)}}}}function h(a){function b(a,d){var e=d?a.cloneNode(!1):a,f=a.parentNode;if(f){var f=b(f,1),g=a.nextSibling;f.appendChild(e);for(var h=g;h;h=g)g=h.nextSibling,f.appendChild(h)}return e}+for(;!a.nextSibling;)if(a=a.parentNode,!a)return;for(var a=b(a.nextSibling,0),e;(e=a.parentNode)&&e.nodeType===1;)a=e;d.push(a)}var k=/(?:^|\s)nocode(?:\s|$)/,t=/\r\n?|\n/,s=a.ownerDocument,l;a.currentStyle?l=a.currentStyle.whiteSpace:window.getComputedStyle&&(l=s.defaultView.getComputedStyle(a,q).getPropertyValue("white-space"));var p=l&&"pre"===l.substring(0,3);for(l=s.createElement("LI");a.firstChild;)l.appendChild(a.firstChild);for(var d=[l],g=0;g<d.length;++g)e(d[g]);m===(m|0)&&d[0].setAttribute("value",+m);var r=s.createElement("OL");r.className="linenums";for(var n=Math.max(0,m-1|0)||0,g=0,z=d.length;g<z;++g)l=d[g],l.className="L"+(g+n)%10,l.firstChild||l.appendChild(s.createTextNode("\xa0")),r.appendChild(l);a.appendChild(r)}function k(a,m){for(var e=m.length;--e>=0;){var h=m[e];A.hasOwnProperty(h)?window.console&&console.warn("cannot override language handler %s",h):A[h]=a}}function C(a,m){if(!a||!A.hasOwnProperty(a))a=/^\s*</.test(m)?"default-markup":"default-code";return A[a]}function E(a){var m=+a.g;try{var e=M(a.h),h=e.a;a.a=h;a.c=e.c;a.d=0;C(m,h)(a);var k=/\bMSIE\b/.test(navigator.userAgent),m=/\n/g,t=a.a,s=t.length,e=0,l=a.c,p=l.length,h=0,d=a.e,g=d.length,a=0;d[g]=s;var r,n;for(n=r=0;n<g;)d[n]!==d[n+2]?(d[r++]=d[n++],d[r++]=d[n++]):n+=2;g=r;for(n=r=0;n<g;){for(var z=d[n],f=d[n+1],b=n+2;b+2<=g&&d[b+1]===f;)b+=2;d[r++]=z;d[r++]=f;n=b}for(d.length=r;h<p;){var o=l[h+2]||s,c=d[a+2]||s,b=Math.min(o,c),i=l[h+1],j;if(i.nodeType!==1&&(j=t.substring(e,b))){k&&(j=j.replace(m,"\r"));i.nodeValue=+j;var u=i.ownerDocument,v=u.createElement("SPAN");v.className=d[a+1];var x=i.parentNode;x.replaceChild(v,i);v.appendChild(i);e<o&&(l[h+1]=i=u.createTextNode(t.substring(b,o)),x.insertBefore(i,v.nextSibling))}e=b;e>=o&&(h+=2);e>=c&&(a+=2)}}catch(w){"console"in window&&console.log(w&&w.stack?w.stack:w)}}var v=["break,continue,do,else,for,if,return,while"],w=[[v,"auto,case,char,const,default,double,enum,extern,float,goto,int,long,register,short,signed,sizeof,static,struct,switch,typedef,union,unsigned,void,volatile"],+"catch,class,delete,false,import,new,operator,private,protected,public,this,throw,true,try,typeof"],F=[w,"alignof,align_union,asm,axiom,bool,concept,concept_map,const_cast,constexpr,decltype,dynamic_cast,explicit,export,friend,inline,late_check,mutable,namespace,nullptr,reinterpret_cast,static_assert,static_cast,template,typeid,typename,using,virtual,where"],G=[w,"abstract,boolean,byte,extends,final,finally,implements,import,instanceof,null,native,package,strictfp,super,synchronized,throws,transient"],+H=[G,"as,base,by,checked,decimal,delegate,descending,dynamic,event,fixed,foreach,from,group,implicit,in,interface,internal,into,is,lock,object,out,override,orderby,params,partial,readonly,ref,sbyte,sealed,stackalloc,string,select,uint,ulong,unchecked,unsafe,ushort,var"],w=[w,"debugger,eval,export,function,get,null,set,undefined,var,with,Infinity,NaN"],I=[v,"and,as,assert,class,def,del,elif,except,exec,finally,from,global,import,in,is,lambda,nonlocal,not,or,pass,print,raise,try,with,yield,False,True,None"],+J=[v,"alias,and,begin,case,class,def,defined,elsif,end,ensure,false,in,module,next,nil,not,or,redo,rescue,retry,self,super,then,true,undef,unless,until,when,yield,BEGIN,END"],v=[v,"case,done,elif,esac,eval,fi,function,in,local,set,then,until"],K=/^(DIR|FILE|vector|(de|priority_)?queue|list|stack|(const_)?iterator|(multi)?(set|map)|bitset|u?(int|float)\d*)/,N=/\S/,O=u({keywords:[F,H,w,"caller,delete,die,do,dump,elsif,eval,exit,foreach,for,goto,if,import,last,local,my,next,no,our,print,package,redo,require,sub,undef,unless,until,use,wantarray,while,BEGIN,END"++I,J,v],hashComments:!0,cStyleComments:!0,multiLineStrings:!0,regexLiterals:!0}),A={};k(O,["default-code"]);k(x([],[["pln",/^[^<?]+/],["dec",/^<!\w[^>]*(?:>|$)/],["com",/^<\!--[\S\s]*?(?:--\>|$)/],["lang-",/^<\?([\S\s]+?)(?:\?>|$)/],["lang-",/^<%([\S\s]+?)(?:%>|$)/],["pun",/^(?:<[%?]|[%?]>)/],["lang-",/^<xmp\b[^>]*>([\S\s]+?)<\/xmp\b[^>]*>/i],["lang-js",/^<script\b[^>]*>([\S\s]*?)(<\/script\b[^>]*>)/i],["lang-css",/^<style\b[^>]*>([\S\s]*?)(<\/style\b[^>]*>)/i],["lang-in.tag",/^(<\/?[a-z][^<>]*>)/i]]),+["default-markup","htm","html","mxml","xhtml","xml","xsl"]);k(x([["pln",/^\s+/,q," \t\r\n"],["atv",/^(?:"[^"]*"?|'[^']*'?)/,q,"\"'"]],[["tag",/^^<\/?[a-z](?:[\w-.:]*\w)?|\/?>$/i],["atn",/^(?!style[\s=]|on)[a-z](?:[\w:-]*\w)?/i],["lang-uq.val",/^=\s*([^\s"'>]*(?:[^\s"'/>]|\/(?=\s)))/],["pun",/^[/<->]+/],["lang-js",/^on\w+\s*=\s*"([^"]+)"/i],["lang-js",/^on\w+\s*=\s*'([^']+)'/i],["lang-js",/^on\w+\s*=\s*([^\s"'>]+)/i],["lang-css",/^style\s*=\s*"([^"]+)"/i],["lang-css",/^style\s*=\s*'([^']+)'/i],["lang-css",+/^style\s*=\s*([^\s"'>]+)/i]]),["in.tag"]);k(x([],[["atv",/^[\S\s]+/]]),["uq.val"]);k(u({keywords:F,hashComments:!0,cStyleComments:!0,types:K}),["c","cc","cpp","cxx","cyc","m"]);k(u({keywords:"null,true,false"}),["json"]);k(u({keywords:H,hashComments:!0,cStyleComments:!0,verbatimStrings:!0,types:K}),["cs"]);k(u({keywords:G,cStyleComments:!0}),["java"]);k(u({keywords:v,hashComments:!0,multiLineStrings:!0}),["bsh","csh","sh"]);k(u({keywords:I,hashComments:!0,multiLineStrings:!0,tripleQuotedStrings:!0}),+["cv","py"]);k(u({keywords:"caller,delete,die,do,dump,elsif,eval,exit,foreach,for,goto,if,import,last,local,my,next,no,our,print,package,redo,require,sub,undef,unless,until,use,wantarray,while,BEGIN,END",hashComments:!0,multiLineStrings:!0,regexLiterals:!0}),["perl","pl","pm"]);k(u({keywords:J,hashComments:!0,multiLineStrings:!0,regexLiterals:!0}),["rb"]);k(u({keywords:w,cStyleComments:!0,regexLiterals:!0}),["js"]);k(u({keywords:"all,and,by,catch,class,else,extends,false,finally,for,if,in,is,isnt,loop,new,no,not,null,of,off,on,or,return,super,then,true,try,unless,until,when,while,yes",+hashComments:3,cStyleComments:!0,multilineStrings:!0,tripleQuotedStrings:!0,regexLiterals:!0}),["coffee"]);k(x([],[["str",/^[\S\s]+/]]),["regex"]);window.prettyPrintOne=function(a,m,e){var h=document.createElement("PRE");h.innerHTML=a;e&&D(h,e);E({g:m,i:e,h:h});return h.innerHTML};window.prettyPrint=function(a){function m(){for(var e=window.PR_SHOULD_USE_CONTINUATION?l.now()+250:Infinity;p<h.length&&l.now()<e;p++){var n=h[p],k=n.className;if(k.indexOf("prettyprint")>=0){var k=k.match(g),f,b;if(b=+!k){b=n;for(var o=void 0,c=b.firstChild;c;c=c.nextSibling)var i=c.nodeType,o=i===1?o?b:c:i===3?N.test(c.nodeValue)?b:o:o;b=(f=o===b?void 0:o)&&"CODE"===f.tagName}b&&(k=f.className.match(g));k&&(k=k[1]);b=!1;for(o=n.parentNode;o;o=o.parentNode)if((o.tagName==="pre"||o.tagName==="code"||o.tagName==="xmp")&&o.className&&o.className.indexOf("prettyprint")>=0){b=!0;break}b||((b=(b=n.className.match(/\blinenums\b(?::(\d+))?/))?b[1]&&b[1].length?+b[1]:!0:!1)&&D(n,b),d={g:k,h:n,i:b},E(d))}}p<h.length?setTimeout(m,+250):a&&a()}for(var e=[document.getElementsByTagName("pre"),document.getElementsByTagName("code"),document.getElementsByTagName("xmp")],h=[],k=0;k<e.length;++k)for(var t=0,s=e[k].length;t<s;++t)h.push(e[k][t]);var e=q,l=Date;l.now||(l={now:function(){return+new Date}});var p=0,d,g=/\blang(?:uage)?-([\w.]+)(?!\S)/;m()};window.PR={createSimpleLexer:x,registerLangHandler:k,sourceDecorator:u,PR_ATTRIB_NAME:"atn",PR_ATTRIB_VALUE:"atv",PR_COMMENT:"com",PR_DECLARATION:"dec",PR_KEYWORD:"kwd",PR_LITERAL:"lit",+PR_NOCODE:"nocode",PR_PLAIN:"pln",PR_PUNCTUATION:"pun",PR_SOURCE:"src",PR_STRING:"str",PR_TAG:"tag",PR_TYPE:"typ"}})();
+ files/Javascript/base.js view
@@ -0,0 +1,63 @@+$apinamespace$ =+  function (url, secureUrl)+  {+    var postfix = '/v' + this.version + '/';+    var sUrl = url + postfix;+    $apinamespace$.setContext(this, sUrl);+    this.contextUrl = sUrl;+    this.secureContextUrl = (secureUrl || url.replace(/^http:/, "https:")) + postfix;+  };+$apinamespace$.addObject =+  function (obj1, obj2)+  {+    for (var fld in obj2)+    {+      obj1[fld] = obj2[fld];+    }+  };+$apinamespace$.ajaxCall =+  function (method, url, params, success, error, contentType, dataType, data, callOpts)+  {+    var callData =+      { type: method+      , url: url + (params ? '?' + $dollar$.param(params) : '')+      , cache: false+      , success: success || function () {}+      , error: error || function () {}+      , contentType: contentType+      , dataType: dataType+      , xhrFields: { withCredentials: true }+      , data: data || []+      };+    $apinamespace$.addObject(callData, callOpts);+    return $dollar$.ajax(callData);+  };+$apinamespace$.setContext =+  function (obj, url)+  {+    for (var fld in obj)+    {+      if (obj[fld] != undefined && obj[fld].apiObjectType != undefined && obj[fld].apiObjectType == 'resourceDir')+      {+        var newUrl = url + fld.replace(/([a-z0-9])([A-Z])/g, '$dollar$1-$dollar$2').toLowerCase() + '/'+        $apinamespace$.setContext(obj[fld], newUrl);+        obj[fld].contextUrl = newUrl;+      }+    }+  };+$apinamespace$.makeSilkConstructor =+  function ()+  {+    return function constrWrapper (url)+           {+             if (this instanceof constrWrapper)+             {+               $apinamespace$.setContext(this, url);+               this.contextUrl = url;+             }+             else+             {+               return constrWrapper.access(url);+             }+           };+  };
+ files/Ruby/base.rb view
@@ -0,0 +1,71 @@+require 'net/http'+require 'uri'+require 'rubygems'+require 'cgi'+require 'json'+require 'rexml/document'++print "Fix url encoding when this is going to be used"++def internalSilkRequest (api, method, url, params = {}, contentType = 'text/plain', dataType = :data, data = nil, headers = {})+  uri = URI(url + '?' + params.collect { |k,v| "#{k}=#{CGI::escape(v.to_s)}" }.join('&'))+  +  request = case method+    when :get    then Net::HTTP::Get.new(uri.request_uri)+    when :post   then Net::HTTP::Post.new(uri.request_uri)+    when :put    then Net::HTTP::Put.new(uri.request_uri)+    when :delete then Net::HTTP::Delete.new(uri.request_uri)+  end+  +  request.initialize_http_header(headers)+  request.body = data+  +  request['Content-Type'] = contentType+  request['Cookie'] = api.cookies.to_a.map { |kv| kv.join('=') } .join(';')++  case dataType+    when :data then request['Accept'] = 'text/plain'+    when :json then request['Accept'] = 'application/json'+    when :xml  then request['Accept'] = 'application/xml'+  end+    +  response = Net::HTTP.new(uri.host, uri.port).request request++  pdat = response.body++  if response.code == '200'+    pdat = case dataType+      when :json then JSON.parse response.body+      when :xml  then REXML::Document.new response.body+    end+  end+  +  return pdat, response+end++def mkJson (x)+  if x.class == Hash+    return JSON.generate x+  else+    return x.to_s+  end+end++module SilkApi+  class Api < BaseApi+    attr_accessor :cookies++    def initialize (apiURL)+      super(apiURL)+      @cookies = {}+    end+    +    def login (email, password)+      pdat, res = self.User.signin({'email' => email, 'password' => password})+      cookie = res['Set-Cookie']+      @cookies['silk_sid'] = cookie.sub /.*silk_sid=([^;]+).*/, '\1'+      @cookies['silk_tid'] = cookie.sub /.*silk_tid=([^;]+).*/, '\1'+      return pdat, res+    end+  end+end
+ rest-gen.cabal view
@@ -0,0 +1,88 @@+Name:             rest-gen+Version:          0.9.0.2+Description:      Documentation and client generation from rest definition.+Synopsis:         Documentation and client generation from rest definition.+Maintainer:       code@silk.co+Category:         Web+Build-Type:       Simple+Cabal-Version:    >= 1.8+License:          BSD3+License-File:     LICENSE+Data-Dir:         files+Data-Files:       Docs/*.st+                  Docs/*.js+                  Docs/*.css+                  Javascript/base.js+                  Ruby/base.rb++Library+  GHC-Options:     -Wall+  Hs-Source-Dirs:   src+  Build-Depends:++      base                      == 4.*+    , HStringTemplate           >= 0.6     &&  < 0.8+    , attoparsec                >= 0.10    &&  < 0.12+    , aeson                     >= 0.7     &&  < 0.8+    , aeson-utils               == 0.2.*+    , blaze-html                >= 0.5     &&  < 0.6+    , bytestring                >= 0.9     &&  < 0.11+    , Cabal                     >= 1.18    &&  < 1.19+    , code-builder              == 0.1.*+    , containers                >= 0.4     &&  < 0.6+    , directory                 >= 1.1     &&  < 1.3+    , fclabels                  >= 1.0.4   &&  < 2.1+    , filepath                  >= 1.2     &&  < 1.4+    , generic-aeson             == 0.1.*+    , happstack-server          >= 7.0.5   &&  < 7.4+    , hslogger                  >= 1.1     &&  < 1.3+    , hxt                       >= 9.2     &&  < 9.4+    , json-schema               == 0.4.*+    , mtl                       >= 2.0     &&  < 2.2+    , pretty                    >= 1.0     &&  < 1.2+    , process                   >= 1.0     &&  < 1.2+    , regular                   == 0.3.*+    , rest-core                 == 0.27.*+    , rest-types                == 1.9.0.1+    , safe                      >= 0.2     &&  < 0.4+    , split                     >= 0.1     &&  < 0.3+    , tagged                    >= 0.2     &&  < 0.8+    , text                      == 0.11.*+    , unordered-containers      == 0.2.*+    , utf8-string               == 0.3.*+    , vector                    == 0.10.*++  Exposed-Modules:  Rest.Gen+                    Rest.Gen.Base+                    Rest.Gen.Base.ActionInfo+                    Rest.Gen.Base.ActionInfo.Ident+                    Rest.Gen.Base.ApiTree+                    Rest.Gen.Base.JSON+                    Rest.Gen.Base.JSON.Pretty+                    Rest.Gen.Base.Link+                    Rest.Gen.Base.XML+                    Rest.Gen.Config+                    Rest.Gen.Docs.Generate+                    Rest.Gen.Docs.Happstack+                    Rest.Gen.Haskell.Generate+                    Rest.Gen.JavaScript.Generate+                    Rest.Gen.Ruby.Generate+                    Rest.Gen.Utils++  Other-Modules: Paths_rest_gen++Test-suite rest-gen-tests+  build-depends:       base                 >= 4.5    && < 4.7+                     , HUnit                == 1.2.*+                     , rest-core            == 0.27.*+                     , rest-gen+                     , test-framework       == 0.8.*+                     , test-framework-hunit == 0.3.*+  hs-source-dirs:      tests+  main-is:             Runner.hs+  type:                exitcode-stdio-1.0+  ghc-options:         -Wall++Source-repository head+  Type:              Git+  Location:          https://github.com/silkapp/rest.git
+ src/Rest/Gen.hs view
@@ -0,0 +1,69 @@+module Rest.Gen where++import Data.Char+import Data.Label+import Data.Foldable+import Data.Maybe+import System.Cmd+import System.Directory+import System.Exit++import Rest.Api (withVersion, Api, Some1 (..))++import Rest.Gen.Config+import Rest.Gen.Docs.Generate (writeDocs, DocsContext (DocsContext))+import Rest.Gen.JavaScript.Generate (mkJsApi)+import Rest.Gen.Haskell.Generate (mkHsApi, HaskellContext (HaskellContext))+import Rest.Gen.Ruby.Generate (mkRbApi)+import Rest.Gen.Utils++generate :: Config -> String -> Api m -> [String] -> [String] -> [(String, String)] -> IO ()+generate config name api sources imports rewrites =+  withVersion (get apiVersion config) api (putStrLn "Could not find api version" >> exitFailure) $ \ver (Some1 r) ->+     case get action config of+       Just (MakeDocs root) ->+         do loc <- getTargetDir config "./docs"+            setupTargetDir config loc+            let context = DocsContext root ver (fromMaybe "./templates" (getSourceLocation config))+            writeDocs context r loc+            exitSuccess+       Just MakeJS          -> mkJsApi (moduleName ++ "Api") (get apiPrivate config) ver r >>= toTarget config+       Just MakeRb          -> mkRbApi (moduleName ++ "Api") (get apiPrivate config) ver r >>= toTarget config+       Just MakeHS          ->+         do loc <- getTargetDir config "./client"+            setupTargetDir config loc+            let context = HaskellContext ver loc (packageName ++ "-client") (get apiPrivate config) sources imports rewrites [moduleName, "Client"]+            mkHsApi context r+            exitSuccess+       Nothing              -> return ()+  where+    packageName = map toLower name+    moduleName  = upFirst packageName++getTargetDir :: Config -> String -> IO String+getTargetDir config str =+  case get target config of+    Stream     -> putStrLn ("Cannot generate documentation to stdOut, generating to " ++ str) >> return str+    Default    -> putStrLn ("Generating to " ++ str) >> return str+    Location d -> putStrLn ("Generating to " ++ d) >> return d++setupTargetDir :: Config -> String -> IO ()+setupTargetDir config t =+  do createDirectoryIfMissing True t+     forM_ (getSourceLocation config) $ \s -> system $ "cp -rf " ++ s ++ " " ++ t++toTarget :: Config -> String -> IO ()+toTarget config code =+  do let outf =+           case get target config of+             Stream     -> putStrLn+             Default    -> putStrLn+             Location l -> writeFile l+     outf code+     exitSuccess++getSourceLocation :: Config -> Maybe String+getSourceLocation config =+  case get source config of+    Location s -> Just s+    _          -> Nothing
+ src/Rest/Gen/Base.hs view
@@ -0,0 +1,11 @@+module Rest.Gen.Base+  ( module Rest.Gen.Base.ActionInfo+  , module Rest.Gen.Base.ActionInfo.Ident+  , module Rest.Gen.Base.ApiTree+  , module Rest.Gen.Base.Link+  ) where++import Rest.Gen.Base.ActionInfo+import Rest.Gen.Base.ActionInfo.Ident (Ident (Ident, description))+import Rest.Gen.Base.ApiTree+import Rest.Gen.Base.Link
+ src/Rest/Gen/Base/ActionInfo.hs view
@@ -0,0 +1,341 @@+{-# LANGUAGE GADTs, CPP, ScopedTypeVariables #-}+module Rest.Gen.Base.ActionInfo where++import Prelude hiding (id, (.))++import Control.Applicative+import Control.Category+import Control.Monad+import Data.Foldable (foldMap)+import Data.List+import Data.Maybe+import Data.Proxy+import Data.Typeable+#if __GLASGOW_HASKELL__ < 704+import Data.List.Split+#endif+import Rest.Gen.Base.ActionInfo.Ident (Ident (Ident))+import Rest.Info+import qualified Data.JSON.Schema   as J+import qualified Data.Label.Total   as L+import qualified Rest.Gen.Base.JSON as J+import qualified Rest.Gen.Base.XML  as X++import Rest.Dictionary (Param (..), Input (..), Output (..), Error (..))+import Rest.Driver.Routing (mkListHandler, mkMultiPutHandler)+import Rest.Handler+import Rest.Resource+import Rest.Schema++import qualified Rest.Dictionary as Dict+import qualified Rest.Resource   as Rest++--------------------+-- * The types describing a resource's actions.++-- | Representation of resource+type ResourceId  = [String]++-- | Intermediate data representation of Rest structure+data RequestMethod = GET | POST | PUT | DELETE deriving (Show, Eq)++data ActionType = Retrieve | Create | Delete | List | Update | UpdateMany | Modify+  deriving (Show, Eq)++data ActionTarget = Self | Any deriving (Show, Eq)++data ActionInfo = ActionInfo+  { ident        :: Maybe Ident  -- Requires extra identifier in url? e.g. page/<identifier>+  , postAction   :: Bool         -- Works on identified resources? e.g. uri/<uri>/action+  , actionType   :: ActionType+  , actionTarget :: ActionTarget+  , resDir       :: String       -- Resource directory+  , method       :: RequestMethod+  , inputs       :: [DataDescription]+  , outputs      :: [DataDescription]+  , errors       :: [DataDescription]+  , params       :: [String]+  , https        :: Bool+  } deriving (Show, Eq)++isAccessor :: ActionInfo -> Bool+isAccessor ai = actionType ai == Retrieve && actionTarget ai == Self++data DataType = String | XML | JSON | File | Other deriving (Show, Eq)++-- | Description of input/output data+data DataDescription = DataDescription+  { dataType      :: DataType+  , dataTypeDesc  :: String+  , dataSchema    :: String+  , dataExample   :: String+  , haskellType   :: String+  , haskellModule :: [String]+  } deriving (Show, Eq)++defaultDescription :: DataDescription+defaultDescription = DataDescription Other "" "" "" "" []++chooseType :: [DataDescription] -> Maybe DataDescription+chooseType []         = Nothing+chooseType ls@(x : _) = Just $ fromMaybe x $ find ((JSON ==) . dataType) ls++--------------------+-- * Traverse a resource's Schema and Handlers to create a [ActionInfo].++resourceToActionInfo :: Resource m s sid mid aid -> [ActionInfo]+resourceToActionInfo r =+  case schema r of+    Schema mTopLevel step -> foldMap (topLevelActionInfo r) mTopLevel+                          ++ stepActionInfo r step+                          ++ foldMap (return . createActionInfo) (Rest.create r)+                          ++ foldMap (return . removeActionInfo) (Rest.remove  r)+                          ++ map (uncurry selectActionInfo) (Rest.selects r)+                          ++ map (uncurry actionActionInfo) (Rest.actions r)++topLevelActionInfo :: Resource m s sid mid aid -> Cardinality sid mid -> [ActionInfo]+topLevelActionInfo r            (Single _  ) = singleActionInfo r Nothing ""+topLevelActionInfo r@Resource{} (Many   mid) = maybeToList+                                             . listActionInfo Nothing ""+                                             . Rest.list r+                                             $ mid++stepActionInfo :: Resource m s sid mid aid -> Step sid mid aid -> [ActionInfo]+stepActionInfo r (Named hs) = concatMap (uncurry (namedActionInfo r)) hs+stepActionInfo r (Unnamed h) = unnamedActionInfo r h++namedActionInfo :: Resource m s sid mid aid -> String -> Endpoint sid mid aid -> [ActionInfo]+namedActionInfo r pth (Left aid) = [staticActionInfo pth (Rest.statics r aid)]+namedActionInfo r pth (Right (Single g)) = getterActionInfo     r pth g+namedActionInfo r pth (Right (Many   l)) = listGetterActionInfo r pth l++unnamedActionInfo :: Resource m s sid mid aid -> Cardinality (Id sid) (Id mid) -> [ActionInfo]+unnamedActionInfo r@Resource{} unnamed =+  case unnamed of+    Single id_             -> singleActionInfo r (Just id_) ""+    Many   id_@(Id _ midF) -> maybeToList $+      listActionInfo (Just id_) "" (Rest.list r (midF listIdErr))++getterActionInfo :: Resource m s sid mid aid -> String -> Getter sid -> [ActionInfo]+getterActionInfo r pth (Singleton _) = singleActionInfo r Nothing    pth+getterActionInfo r pth (By id_     ) = singleActionInfo r (Just id_) pth++listGetterActionInfo :: Resource m s sid mid aid -> String -> Getter mid -> [ActionInfo]+listGetterActionInfo r@Resource{} pth getter = maybeToList $+  case getter of+    Singleton mid      -> listActionInfo Nothing    pth (Rest.list r mid)+    By id_@(Id _ midF) -> listActionInfo (Just id_) pth (Rest.list r (midF listIdErr))++listIdErr :: mid+listIdErr = error $ "Don't evaluate the fields of a list identifier unless in the body of the handler. "+                 ++ "They are undefined during generation of documentation and code."++singleActionInfo :: Resource m s sid mid aid -> Maybe (Id sid) -> String -> [ActionInfo]+singleActionInfo r@Resource{} mId pth+   = foldMap (return . getActionInfo         mId pth) (Rest.get     r)+  ++ foldMap (return . updateActionInfo      mId pth) (Rest.update  r)+  ++ maybeToList (join $ multiUpdateActionInfo <$> mId <*> pure pth <*> Rest.update r)++--------------------+-- * Smart constructors for ActionInfo.++getActionInfo :: Maybe (Id sid) -> String -> Handler m -> ActionInfo+getActionInfo mId pth = handlerActionInfo mId False Retrieve Self pth GET++updateActionInfo :: Maybe (Id sid) -> String -> Handler m -> ActionInfo+updateActionInfo mId pth = handlerActionInfo mId False Update Any pth PUT++multiUpdateActionInfo :: Monad m => Id sid -> String -> Handler m -> Maybe ActionInfo+multiUpdateActionInfo id_ pth h =  handlerActionInfo Nothing False UpdateMany Any pth PUT+                               <$> mkMultiPutHandler id_ (const id) h++removeActionInfo :: Handler m -> ActionInfo+removeActionInfo = handlerActionInfo Nothing True Delete Self "" DELETE++listActionInfo :: Monad m => Maybe (Id mid) -> String -> ListHandler m -> Maybe ActionInfo+listActionInfo mId pth h = handlerActionInfo mId False List Self pth GET <$> mkListHandler h++staticActionInfo :: String -> Handler m -> ActionInfo+staticActionInfo pth = handlerActionInfo Nothing False Modify Any pth POST++createActionInfo :: Handler m -> ActionInfo+createActionInfo = handlerActionInfo Nothing False Create Self "" POST++selectActionInfo :: String -> Handler m -> ActionInfo+selectActionInfo pth = handlerActionInfo Nothing True Retrieve Any pth GET++actionActionInfo :: String -> Handler m -> ActionInfo+actionActionInfo pth = handlerActionInfo Nothing True Modify Any pth POST++handlerActionInfo :: Maybe (Id id)+                  -> Bool+                  -> ActionType+                  -> ActionTarget+                  -> String+                  -> RequestMethod+                  -> Handler m+                  -> ActionInfo+handlerActionInfo mId postAct actType actTarget pth mth h = ActionInfo+  { ident        = idIdent <$> mId+  , postAction   = postAct+  , actionType   = actType+  , actionTarget = actTarget+  , resDir       = pth+  , method       = mth+  , inputs       = handlerInputs  h+  , outputs      = handlerOutputs h+  , errors       = handlerErrors  h+  , params       = handlerParams  h+  , https        = secure         h+  }++--------------------+-- * Utilities for extraction information from Handlers.++handlerParams :: GenHandler m f -> [String]+handlerParams (GenHandler dict _ _) = paramNames (L.get Dict.params dict)++-- | A `Param` can contain the same parameter multiple times. For+-- example, 'offset' and 'count' are added in Rest.Handler.mkListing,+-- and in Rest.Driver.Routing.mkListHandler. For that reason, we nub+-- here.++paramNames :: Param a -> [String]+paramNames = nub . paramNames_++paramNames_ :: Param a -> [String]+paramNames_ NoParam = []+paramNames_ (Param s _) = s+paramNames_ (TwoParams p1 p2) = paramNames p1 ++ paramNames p2++-- | Extract input description from handlers+handlerInputs :: Handler m -> [DataDescription]+handlerInputs (GenHandler dict _ _) = map (handlerInput Proxy) (L.get (Dict.dicts . Dict.inputs) dict)+  where handlerInput :: Proxy a -> Input a -> DataDescription+        handlerInput d ReadI    = defaultDescription { dataTypeDesc = describe d }+        handlerInput _ StringI  = defaultDescription { dataType     = String+                                                     , dataTypeDesc = "String"+                                                     }+        handlerInput d XmlI     = defaultDescription { dataType     = XML+                                                     , dataTypeDesc = "XML"+                                                     , dataSchema   = X.showSchema  . X.getXmlSchema $ d+                                                     , dataExample  = X.showExample . X.getXmlSchema $ d+                                                     , haskellType  = typeString d+                                                     , haskellModule = modString d+                                                     }+        handlerInput _ XmlTextI = defaultDescription { dataType     = XML+                                                     , dataTypeDesc = "XML"+                                                     , haskellType  = "String"+                                                     }+        handlerInput _ RawXmlI  = defaultDescription { dataType     = XML+                                                     , dataTypeDesc = "XML"+                                                     , haskellType  = "String"+                                                     }+        handlerInput d JsonI    = defaultDescription { dataType     = JSON+                                                     , dataTypeDesc = "JSON"+                                                     , dataExample  = J.showExample . J.schema $ d+                                                     , haskellType  = typeString d+                                                     , haskellModule = modString d+                                                     }+        handlerInput _ FileI    = defaultDescription { dataType     = File+                                                     , dataTypeDesc = "File"+                                                     }++-- | Extract output description from handlers+handlerOutputs :: Handler m -> [DataDescription]+handlerOutputs (GenHandler dict _ _) = map (handlerOutput Proxy) (L.get (Dict.dicts . Dict.outputs) dict)+  where handlerOutput :: Proxy a -> Output a -> DataDescription+        handlerOutput _ StringO  = defaultDescription { dataType      = String+                                                      , dataTypeDesc = "String"+                                                      }+        handlerOutput d XmlO     = defaultDescription { dataType      = XML+                                                      , dataTypeDesc  = "XML"+                                                      , dataSchema    = X.showSchema  . X.getXmlSchema $ d+                                                      , dataExample   = X.showExample . X.getXmlSchema $ d+                                                      , haskellType   = typeString d+                                                      , haskellModule = modString d+                                                      }+        handlerOutput _ RawXmlO  = defaultDescription { dataType     = XML+                                                      , dataTypeDesc = "XML"+                                                      , haskellType  = "String"+                                                      }+        handlerOutput d JsonO    = defaultDescription { dataType      = JSON+                                                      , dataTypeDesc  = "JSON"+                                                      , dataExample   = J.showExample . J.schema $ d+                                                      , haskellType   = typeString d+                                                      , haskellModule = modString d+                                                      }+        handlerOutput _ FileO    = defaultDescription { dataType      = File+                                                      , dataTypeDesc  = "File"+                                                      }++-- | Extract input description from handlers+handlerErrors :: Handler m -> [DataDescription]+handlerErrors (GenHandler dict _ _) = map (handleError Proxy) (L.get (Dict.dicts . Dict.errors) dict)+  where handleError :: Proxy a -> Error a -> DataDescription+        handleError d XmlE     = defaultDescription { dataType      = XML+                                                    , dataTypeDesc  = "XML"+                                                    , dataSchema    = X.showSchema  . X.getXmlSchema $ d+                                                    , dataExample   = X.showExample . X.getXmlSchema $ d+                                                    , haskellType   = typeString d+                                                    , haskellModule = modString d+                                                    }+        handleError d JsonE    = defaultDescription { dataType      = JSON+                                                    , dataTypeDesc  = "JSON"+                                                    , dataExample   = J.showExample . J.schema $ d+                                                    , haskellType   = typeString d+                                                    , haskellModule = modString d+                                                    }+#if __GLASGOW_HASKELL__ >= 704+typeString :: forall a. Typeable a => Proxy a -> String+typeString _ = typeString' . typeOf $ (undefined :: a)+  where typeString' tr =+          let (tyCon, subs) = splitTyConApp tr+              showTyCon _ "[]" r = "[" ++ r ++ "]"+              showTyCon _ "()" _ = "()"+              showTyCon m d s | take 4 m == "GHC." = d ++ s+                              | otherwise = m ++ "." ++ d ++ s+          in  showTyCon (tyConModule tyCon)+                        (tyConName tyCon)+                        (concatMap (\t -> " (" ++ typeString' t ++ ")") subs)++modString :: forall a. Typeable a => Proxy a -> [String]+modString _ = filter (\v -> v /= "" && take 4 v /= "GHC.") . modString' . typeOf $ (undefined :: a)+  where modString' tr =+          let (tyCon, subs) = splitTyConApp tr+          in  tyConModule tyCon : concatMap modString' subs+#else+typeString :: Typeable a => a -> String+typeString = show . typeOf++modString :: Typeable a => a -> [String]+modString = filter (/= "") . modString' . typeOf+  where modString' tr =+          let (tyCon, subs) = splitTyConApp tr+          in (intercalate "." . init . splitOn "." . tyConString $ tyCon) : concatMap modString' subs+#endif++idIdent :: Id id -> Ident+idIdent (Id idnt _) = actionIdent idnt++actionIdent :: forall a. Dict.Ident a -> Ident+actionIdent Dict.StringId = Ident "string" "String" []+actionIdent Dict.ReadId   = Ident (describe proxy_) (typeString proxy_) (modString proxy_)+  where+    proxy_ :: Proxy a+    proxy_ = Proxy++mkActionDescription :: String -> ActionInfo -> String+mkActionDescription res ai =+  let targetS =+        case actionTarget ai of+          Self -> res+          Any  -> "information"+  in case actionType ai of+      Retrieve   -> "Retrieve " ++ targetS ++ " data"+      Create     -> "Create " ++ targetS+      Delete     -> "Delete " ++ targetS+      List       -> "List " ++ targetS ++ "s"+      Update     -> "Update " ++ targetS+      UpdateMany -> "Update many " ++ targetS+      Modify     -> "Modify " ++ targetS
+ src/Rest/Gen/Base/ActionInfo/Ident.hs view
@@ -0,0 +1,7 @@+module Rest.Gen.Base.ActionInfo.Ident (Ident (..)) where++data Ident = Ident+  { description   :: String+  , haskellType   :: String+  , haskellModule :: [String]+  } deriving (Show, Eq)
+ src/Rest/Gen/Base/ApiTree.hs view
@@ -0,0 +1,140 @@+{-# LANGUAGE GADTs #-}+module Rest.Gen.Base.ApiTree where++import Data.Char+import Data.List+import Data.Maybe+import Data.Function++import Rest.Api (Router (..), Some1 (..))+import Rest.Gen.Base.ActionInfo+import Rest.Gen.Base.ActionInfo.Ident (description)+import Rest.Gen.Base.Link+import Rest.Gen.Utils+import qualified Rest.Resource as Res++data ApiAction =+  ApiAction+    { itemResource :: ResourceId+    , itemLink     :: Link+    , itemInfo     :: ActionInfo+    } deriving (Show, Eq)++data ApiResource =+  TreeItem+    { resName        :: String+    , resId          :: ResourceId+    , resParents     :: ResourceId+    , resLink        :: Link+    , resIdents      :: [Link]+    , resPrivate     :: Bool+    , resItems       :: [ApiAction]+    , resDescription :: String+    , subResources   :: [ApiResource]+    } deriving (Show, Eq)++apiSubtrees :: Router m s -> ApiResource+apiSubtrees (Embed _ routes) = defaultTree { subResources = map (\(Some1 r) -> apiTree r) routes }++apiTree :: Router m s -> ApiResource+apiTree = apiTree' [] []++apiTree' :: ResourceId -> Link -> Router m s -> ApiResource+apiTree' rid lnk (Embed r routes) =+    let myId        = rid ++ [Res.name r]+        myLnk       = lnk ++ [LResource (Res.name r)]+        accessLinks = [ actionInfoToLink [] ai | ai <- resourceToActionInfo r, isAccessor ai ]+    in TreeItem+        { resName        = Res.name r+        , resId          = myId+        , resParents     = rid+        , resLink        = myLnk+        , resIdents      = accessLinks+        , resPrivate     = Res.private r+        , resItems       = [ ApiAction myId (myLnk ++ actionInfoToLink [LAccess accessLinks] ai) ai | ai <- resourceToActionInfo r ]+        , resDescription = Res.description r+        , subResources   = map (\(Some1 chd) -> apiTree' myId (myLnk ++ [LAccess accessLinks]) chd) routes+        }++-- | Create urls from an action+actionInfoToLink :: Link -> ActionInfo -> Link+actionInfoToLink ac ai+  | postAction ai = ac ++ dirPart ++ identPart+  | otherwise     = dirPart ++ identPart+  where dirPart   = if resDir ai /= ""+                      then [LAction $ resDir ai]+                      else []+        identPart = maybe [] ((:[]) . LParam . description) (ident ai)++defaultTree :: ApiResource+defaultTree = TreeItem "" [] [] [] [] False [] "" []++-- | Traversing ApiResources+foldTree :: (ApiResource -> [a] -> a) -> ApiResource -> a+foldTree f tr = f tr (map (foldTree f) (subResources tr))++foldTreeChildren :: ([a] -> a) -> (ApiResource -> [a] -> a) -> ApiResource -> a+foldTreeChildren f1 f2 = f1 . map (foldTree f2) . subResources++noPrivate :: ApiResource -> ApiResource+noPrivate = foldTree $ \it subs -> it { subResources = filter (not . resPrivate) subs }++sortTree :: ApiResource -> ApiResource+sortTree = foldTree $ \it subs -> it { subResources = sortBy (compare `on` resName) subs }++allTrees :: ApiResource -> [ApiResource]+allTrees = foldTree $ \it subs -> it : concat subs++allSubTrees :: ApiResource -> [ApiResource]+allSubTrees = foldTreeChildren concat $ \it subs -> it : concat subs++apiResources :: ApiResource -> [ResourceId]+apiResources = foldTree $ \it subs -> map (resName it:) ([] : concat subs)++allResources :: ApiResource -> [ApiResource]+allResources = foldTree $ \it -> (it:) . concat++allSubResources :: ApiResource -> [ApiResource]+allSubResources = foldTreeChildren concat $ \it -> (it:) . concat++allResourceIds :: ApiResource -> [ResourceId]+allResourceIds = map resId . allResources++allSubResourceIds :: ApiResource -> [ResourceId]+allSubResourceIds = map resId . allSubResources++subResourceNames :: ApiResource -> [String]+subResourceNames = map resName . subResources++subResourceIds :: ApiResource -> [ResourceId]+subResourceIds = map resId . subResources++hasAccessor :: ApiResource -> Bool+hasAccessor = not . null . resIdents++-- | Extra functions for generation+mkFuncParts :: ApiAction -> [String]+mkFuncParts (ApiAction _ _ ai) = concatMap cleanName parts+  where+      parts = case actionType ai of+                Retrieve   -> let nm = get ++ by ++ target+                              in if null nm then ["access"] else nm+                Create     -> ["create"]     ++ by ++ target+                -- Should be delete, but delete is a JS keyword and causes problems in collect.+                Delete     -> ["remove"]     ++ by ++ target+                List       -> ["list"]       ++ by ++ target+                Update     -> ["save"]       ++ by ++ target+                UpdateMany -> ["saveMany"]   ++ by ++ target+                Modify     -> if resDir ai == "" then ["do"] else [resDir ai]++      target = if resDir ai == ""                then [] else [resDir ai]+      by     = if null target+               ||    isNothing (ident ai)+                  && actionType ai /= UpdateMany then [] else ["by"]+      get    = if isAccessor ai                  then [] else ["get"]++cleanName :: String -> [String]+cleanName ""         = [""]+cleanName ('-':v:rs) = [] : mapHead (mapHead toUpper) (cleanName (v: rs))+cleanName (x : xs) | isAlphaNum x = mapHead (x:) $ cleanName xs+                   | otherwise    = cleanName xs
+ src/Rest/Gen/Base/JSON.hs view
@@ -0,0 +1,24 @@+{-# LANGUAGE OverloadedStrings #-}++module Rest.Gen.Base.JSON where++import Data.Aeson ((.=))+import Data.JSON.Schema+import Data.Text (pack)+import Rest.Gen.Base.JSON.Pretty+import Text.PrettyPrint.HughesPJ+import qualified Data.Aeson as A+import qualified Data.Vector as V++showExample :: Schema -> String+showExample = render . pp_value . showExample'+  where+    showExample' (Choice [])     = A.Null -- Cannot create zero value+    showExample' (Choice (x:_))  = showExample' x+    showExample' (Object fs)     = A.object $ map (\f -> pack (key f) .= showExample' (content f)) fs+    showExample' (Tuple vs)      = A.Array $ V.fromList $ map showExample' vs+    showExample' (Array l _ _ v) = A.Array $ V.fromList $ replicate (l `max` 1) (showExample' v)+    showExample' (Value _ _)     = A.String "value"+    showExample' Boolean         = A.Bool True+    showExample' (Number l _)    = A.Number (fromIntegral l)+    showExample' Null            = A.Null
+ src/Rest/Gen/Base/JSON/Pretty.hs view
@@ -0,0 +1,61 @@+module Rest.Gen.Base.JSON.Pretty where++import Control.Arrow (first)+import Data.Aeson.Types+import Data.Aeson.Utils (parseNumber)+import Data.Char+import Data.HashMap.Strict (HashMap)+import Data.Text (Text, unpack)+import Numeric+import Text.PrettyPrint.HughesPJ hiding (first)+import qualified Data.HashMap.Strict as H+import qualified Data.Vector as V++pp_value         :: Value -> Doc+pp_value v        = case v of+    Null      -> pp_null+    Bool x    -> pp_boolean x+    Number x  -> pp_number (parseNumber x)+    String x  -> pp_js_string (unpack x)+    Array vs  -> pp_array $ V.toList vs+    Object xs -> pp_js_object xs++pp_null          :: Doc+pp_null           = text "null"++pp_boolean       :: Bool -> Doc+pp_boolean True   = text "true"+pp_boolean False  = text "false"++pp_number        :: Either Integer Double -> Doc+pp_number        = either integer double++pp_array         :: [Value] -> Doc+pp_array xs       = vlist "[" "]" $ map pp_value xs++vlist :: String -> String -> [Doc] -> Doc+vlist o c [] = text o <+> text c+vlist o c ls = vcat $ text o <+> head ls : map (comma <+>) (tail ls) ++ [text c]++pp_string        :: String -> Doc+pp_string x       = doubleQuotes $ hcat $ map pp_char x+  where pp_char '\\'            = text "\\\\"+        pp_char '"'             = text "\\\""+        pp_char c | isControl c || fromEnum c >= 0x7f = uni_esc c+        pp_char c               = char c++        uni_esc c = text "\\u" <> text (pad 4 (showHex (fromEnum c) ""))++        pad n cs  | len < n   = replicate (n-len) '0' ++ cs+                  | otherwise = cs+          where len = length cs++pp_object        :: [(String,Value)] -> Doc+pp_object xs      = vlist "{" "}" $ map pp_field xs+  where pp_field (k,v) = pp_string k <> colon <+> pp_value v++pp_js_string     :: String -> Doc+pp_js_string x    = pp_string x++pp_js_object     :: HashMap Text Value -> Doc+pp_js_object      = pp_object . map (first unpack) . H.toList
+ src/Rest/Gen/Base/Link.hs view
@@ -0,0 +1,74 @@+module Rest.Gen.Base.Link where++-- | Data structure representing Api links+data LinkItem =+    LResource String+  | LAction String+  | LParam String+  | LAccess [Link] deriving Show++instance Eq LinkItem where+  (==) (LAccess a) (LAccess b) = a == b+  (==) (LAccess _) _ = False+  (==) _ (LAccess _) = False+  (==) a b = itemString a == itemString b++type Link = [LinkItem]++hasParam :: LinkItem -> Bool+hasParam (LAccess l) = any (any hasParam) l+hasParam (LParam _) = True+hasParam _ = False++itemString :: LinkItem -> String+itemString li =+  case li of+    LResource s   -> s+    LAction   s   -> s+    LParam    s   -> s+    _             -> ""++flattenLink :: Link -> [Link]+flattenLink []               = [[]]+flattenLink (LAccess ls: rs) = [l ++ r | l <- concatMap flattenLink ls, r <- flattenLink rs]+flattenLink (v: rs)          = map (v :) $ flattenLink rs++flattenFrom :: (LinkItem -> Bool) -> Link -> [Link]+flattenFrom f = (\(end, start) -> [ reverse start ++ epart | epart <- flattenLink (reverse end)]) . break f . reverse++flattenLast :: Link -> [Link]+flattenLast [] = [[]]+flattenLast xs = (\l -> map (reverse (tail l) ++) $ flattenLink [head l]) . reverse $ xs++flattenLastResource :: Link -> [Link]+flattenLastResource = flattenFrom $ \x -> case x of LResource _ -> True; _ -> False+{-+-- | Make link by replacing identifiers with data+mkLink :: Link -> [String] -> String+mkLink []                     _        = ""+mkLink ((LAction s) : ls)     ps       = "/" ++ s ++ mkLink ls ps+mkLink ((LAccess _) : ls)     (p : ps) = "/" ++ p ++ mkLink ls ps++-- | Make link by replacing the identifying parts+mkLink' :: Link -> [String] -> String+mkLink' []                     _            = ""+mkLink' ((LAction s) : ls)     ps           = "/" ++ s ++ mkLink' ls ps+mkLink' ((LAccess _) : ls)     (p : ps)     = "/" ++ p ++ mkLink' ls ps+-}++getLinkIds :: Link -> [(String, [(String, String)])]+getLinkIds l =+  case l of+    []                     -> []+    (q: (LParam p) : rs)   -> (itemString q, [(itemString q, p)]) : getLinkIds rs+    (q: (LAccess ls) : rs) -> (itemString q, concatMap snd $ concatMap (getLinkIds . (q : )) ls) : getLinkIds rs+    (_: rs)                -> getLinkIds rs++setLinkIds :: Link -> [String] -> String+setLinkIds _ [] = error "Error in setLinkIds, not enough parameters"+setLinkIds l (p : ps) =+  case l of+    []                    -> ""+    (_: (LParam _)  : rs) -> "/" ++ p ++ setLinkIds rs ps+    (_: (LAccess _) : rs) -> "/" ++ p ++ setLinkIds rs ps+    (s: rs)               -> "/" ++ itemString s ++ setLinkIds rs (p: ps)
+ src/Rest/Gen/Base/XML.hs view
@@ -0,0 +1,83 @@+module Rest.Gen.Base.XML (getXmlSchema, showSchema, showExample) where++import Data.List+import Text.XML.HXT.Arrow.Pickle+import Text.XML.HXT.Arrow.Pickle.Schema++getXmlSchema :: XmlPickler a => proxy a -> Schema+getXmlSchema = theSchema . getPU++getPU :: XmlPickler a => proxy a -> PU a+getPU _ = xpickle++showSchema :: Schema -> String+showSchema sch =+  case result of+    []  -> ""+    [x] -> x+    xs  -> intercalate "\n" $+             ["<complexType name='data'>"]+          ++ indent xs+          ++ ["</complexType>"]+ where+  result = showSchema' "" sch++  showSchema' :: String -> Schema -> [String]+  showSchema' ats Any              = ["<xs:any" ++ ats ++ "/>"]++  showSchema' _ (Seq [])           = []+  showSchema' ats (Seq [x])        = showSchema' ats x+  showSchema' ats (Seq ss)         = ["<xs:sequence" ++ ats ++ ">"]+                                  ++ indent (concatMap (showSchema' "") ss)+                                  ++ ["</xs:sequence>"]++  showSchema' _ (Alt [])           = []+  showSchema' ats (Alt [x])        = showSchema' ats x+  showSchema' ats (Alt ss)         = ["<xs:choice" ++ ats ++ ">"]+                                  ++ indent (concatMap (showSchema' "") ss)+                                  ++ ["</xs:choice>"]++  showSchema' ats (Rep l u s)        = showSchema' (ats ++ concatMap (' ':) (mn ++ mx)) s+        where mn = if l >= 0 then ["minOccurs=" ++ show l] else []+              mx = if u >= 0 then ["maxOccurs=" ++ show u] else []++  showSchema' ats (Element n (CharData dty)) = ["<xs:element name='" ++ n ++ "' type='" ++ dataToString dty ++ "'" ++ ats ++ "/>"]+  showSchema' ats (Element n (Seq [])) = ["<xs:element name='" ++ n ++ "'" ++ ats ++ "/>"]+  showSchema' ats (Element n s)    = ["<xs:element name='" ++ n ++ "'" ++ ats ++ ">"]+                                  ++ indent (+                                         ["<xs:complexType>"]+                                      ++ indent (showSchema' "" s)+                                      ++ ["</xs:complexType>"])+                                  ++ ["</xs:element>"]++  showSchema' ats (Attribute n (CharData dty))  = ["<xs:attribute name='" ++ n ++ "' type='" ++ dataToString dty ++ "'" ++ ats ++ "/>"]+  showSchema' ats (ElemRef n)     = ["<xs:element ref='" ++ n ++ "'" ++ ats ++ "/>"]+  showSchema' _ _                 = []++  dataToString :: DataTypeDescr -> String+  dataToString (DTDescr _ n _) = "xs:" ++ n++indent :: [String] -> [String]+indent = map ("  " ++)++showExample :: Schema -> String+showExample sch = intercalate "\n" $ showExample' sch+ where+  showExample' :: Schema -> [String]+  showExample' Any              = ["<anyTag/>"]++  showExample' (Seq [])         = []+  showExample' (Seq [x])        = showExample' x+  showExample' (Seq ss)         = concatMap showExample' ss++  showExample' (Alt [])         = []+  showExample' (Alt (x : _))    = showExample' x++  showExample' (Rep _ _ s)      = showExample' s++  showExample' (Element n (CharData _)) = ["<" ++ n ++ ">string</" ++ n ++ ">"]+  showExample' (Element n (Seq [])) = ["<" ++ n ++ "/>"]+  showExample' (Element n s)    = ["<" ++ n ++ ">"]+                               ++ indent (showExample' s)+                               ++ ["</" ++ n ++ ">"]+  showExample' _                = []
+ src/Rest/Gen/Config.hs view
@@ -0,0 +1,46 @@+{-# LANGUAGE TemplateHaskell, TypeOperators #-}+module Rest.Gen.Config where++import Prelude hiding ((.), id)++import Control.Category+import Data.Label+import System.Console.GetOpt++data Action   = MakeDocs String | MakeJS | MakeRb | MakeHS+data Location = Default | Stream | Location String++data Config = Config+  { _action     :: Maybe Action+  , _source     :: Location+  , _target     :: Location+  , _apiVersion :: String+  , _apiPrivate :: Bool+  }++$(mkLabels [''Config])++defaultConfig :: Config+defaultConfig = Config+  { _action     = Nothing+  , _source     = Default+  , _target     = Default+  , _apiVersion = "latest"+  , _apiPrivate = True+  }++parseLocation :: String -> Location+parseLocation "-" = Stream+parseLocation s   = Location s++options :: (a :-> Config) -> [OptDescr (a -> a)]+options parent =+  [ Option ['d'] ["documentation"] (ReqArg (set (action     . parent) . Just . MakeDocs) "URLROOT") "Generate API documentation, available under the provided URL root."+  , Option ['j'] ["javascript"]    (NoArg  (set (action     . parent) (Just MakeJS))) "Generate Javascript bindings."+  , Option ['r'] ["ruby"]          (NoArg  (set (action     . parent) (Just MakeRb))) "Generate Ruby bindings."+  , Option ['h'] ["haskell"]       (NoArg  (set (action     . parent) (Just MakeHS))) "Generate Haskell bindings."+  , Option ['s'] ["source"]        (ReqArg (set (source     . parent) . parseLocation) "LOCATION") "The location of additional sources."+  , Option ['t'] ["target"]        (ReqArg (set (target     . parent) . parseLocation) "LOCATION") "The target location for generation."+  , Option ['v'] ["version"]       (ReqArg (set (apiVersion . parent)) "VERSION") "The version of the API under generation. Default latest."+  , Option ['p'] ["hide-private"]  (NoArg  (set (apiPrivate . parent) False)) "Generate API for the public, hiding private resources. Not default."+  ]
+ src/Rest/Gen/Docs/Generate.hs view
@@ -0,0 +1,201 @@+{-# LANGUAGE GADTs+           , TupleSections+           , ScopedTypeVariables+           , OverlappingInstances+           , TemplateHaskell+           , TypeFamilies+           , EmptyDataDecls+           , MultiParamTypeClasses+           #-}+module Rest.Gen.Docs.Generate where++import Prelude hiding (head, id, div, span)+import qualified Prelude as P++import Control.Monad hiding (forM_)+import Data.Function (on)+import Data.HashTable+import Data.List hiding (head, span)+import Data.String+import System.Directory+import System.FilePath+import Text.Blaze.Html+import Text.Blaze.Html.Renderer.String+import Text.Blaze.Html5 hiding (map)+import Text.Blaze.Html5.Attributes hiding (title, method, span)+import Text.StringTemplate++import Rest.Api (Version, Router)+import Rest.Gen.Base+import Rest.Gen.Utils+import System.Log.Logger++-- | Information about the context in which a resource is contained+data DocsContext = DocsContext+  { rootUrl        :: String+  , contextVersion :: Version+  , templates      :: String+  } deriving (Eq, Show)++writeDocs :: DocsContext -> Router m s -> String -> IO ()+writeDocs context router loc =+  do createDirectoryIfMissing True loc+     let tree = apiSubtrees router+     mkAllResources context tree >>= writeFile (loc </> "index.html")+     mapM_ (writeSingleResource context loc) $ allSubResources tree++writeSingleResource :: DocsContext -> String -> ApiResource -> IO ()+writeSingleResource ctx loc r =+  do let dr = loc </> intercalate "/" (resId r)+     createDirectoryIfMissing True dr+     mkSingleResource ctx r >>= writeFile (dr </> "index.html")++mkAllResources :: DocsContext -> ApiResource -> IO String+mkAllResources ctx tree =+  do tmpls <- directoryGroup (templates ctx)+     tmpl  <- maybe (errorM "Doc generation" "Couldn't find template api-docs-all" >> return (newSTMP "")) return $+                     getStringTemplate "api-docs-all" tmpls+     return $ render+            $ setManyAttrib+                   [ ("listing"  , map (renderHtml . (\v -> resourceLinkAnchor v (resourceDisp v))) . sort . allSubResourceIds $ tree) ]+            $ setManyAttrib+                   [ ("resources", renderHtml $ subResourcesInfo ctx tree )+                   , ("version",   show $ contextVersion ctx  )+                   ]+                   tmpl++mkSingleResource :: DocsContext -> ApiResource -> IO String+mkSingleResource ctx tree =+  do tmpls <- directoryGroup (templates ctx)+     tmpl  <- maybe (errorM "Doc Generation" "Couldn't find template api-docs-resource" >> return (newSTMP "")) return $+                     getStringTemplate "api-docs-resource" tmpls+     return $ render+            $ setManyAttrib+                   [ ("subresources", map (renderHtml . (\v -> resourceLinkRemote (rootUrl ctx) v (resourceDisp v))) $ allResourceIds tree)+                   , ("resource"    , resId tree)+                   , ("parents"     , map (renderHtml . (\v -> resourceLinkRemote (rootUrl ctx) v (toHtml $ last v))) $ tail $ inits (resId tree))+                   , ("identifiers" , map renderHtml $ resourceIdentifiers (resLink tree) (resIdents tree))+                   ]+            $ setManyAttrib+                   [ ("name"        , resName tree)+                   , ("urls"        , renderHtml $ resourceTable tree)+                   , ("description" , resDescription tree)+                   , ("version"     , show $ contextVersion ctx)+                   ]+                   tmpl++-- | Helper functions for generating HTML+cls :: String -> Attribute+cls = class_ . toValue++cdiv :: String -> Html -> Html+cdiv s = div ! cls s++row :: Html -> Html+row = cdiv "row"++-- | Recursively generate information for a resource structure+resourcesInfo :: DocsContext -> ApiResource -> Html+resourcesInfo ctx = foldTree $ (\it -> sequence_ . (resourceInfo ctx it :) )++subResourcesInfo :: DocsContext -> ApiResource -> Html+subResourcesInfo ctx = foldTreeChildren sequence_ $ (\it -> sequence_ . (resourceInfo ctx it :) )++-- | Generate information for one resource+resourceInfo :: DocsContext -> ApiResource -> Html+resourceInfo ctx it = section $+  do resourceAnchor (resId it)+     row $ cdiv "span16 page-header resource-title" $ h1 $ resourceLinkRemote (rootUrl ctx) (resId it) $ resourceDisp (resId it)+     row $+      do cdiv "span10" $+           do h2 $ toHtml "Description"+              p $ toHtml $ resDescription it+         cdiv "span6" $+           do h2 $ toHtml "Identifiers"+              p $ sequence_ $ intersperse br $ resourceIdentifiers (resLink it) (resIdents it)+     br+     resourceTable it++resourceIdentifiers :: Link -> [Link] -> [Html]+resourceIdentifiers lnk lnks =+  case lnks of+    [] -> [toHtml "No identifiers"]+    ls -> map (linkHtml . (lnk ++)) $ ls++resourceTable :: ApiResource -> Html+resourceTable it =+  let urlInfo = groupByFirst . concatMap (\ai -> map (,itemInfo ai) $ flattenLast $ itemLink ai) $ resItems it+  in table ! cls "bordered-table resource-table" $+      do thead $ mapM_ (\v -> th ! cls v $ toHtml v) ["URL", "Method", "Description", "Input", "Output", "Errors", "Parameters"]+         tbody $ flip mapM_ (zip [(1 :: Int)..] urlInfo) $ \(n, (url, ais)) ->+          do tr ! cls ("stripe-" ++ show (n `mod` 2) ++ " url-main-row") $ mapM_ td $+                     [ linkHtml $ url+                     , toHtml $ show $ method $ P.head ais+                     , toHtml $ mkActionDescription (resName it) $ P.head ais+                     , dataDescriptions "None"  $ inputs $ P.head ais+                     , dataDescriptions "None" $ outputs $ P.head ais+                     , dataDescriptions "None" $ errors $ P.head ais+                     , toHtml $ if null (params (P.head ais)) then "None" else intercalate ", " $ params $ P.head ais+                     ]+             flip mapM_ (tail ais) $ \ai ->+                tr ! cls ("stripe-" ++ show (n `mod` 2) ++ " url-data-row") $ mapM_ td $+                     [ return ()+                     , toHtml $ show $ method ai+                     , toHtml $ mkActionDescription (resName it) ai+                     , dataDescriptions "None"  (inputs ai)+                     , dataDescriptions "None" (outputs ai)+                     , dataDescriptions "None" (errors ai)+                     , toHtml $ if null (params ai) then "None" else intercalate ", " $ params ai+                     ]++-- | Generate information for input/output data structure+dataDescriptions :: String -> [DataDescription] -> Html+dataDescriptions s []    = toHtml s+dataDescriptions _ descs =+  table ! cls "data-description" $+    do tr $ flip mapM_ descs $ \desc -> td $ toHtml $ dataTypeDesc desc+       tr $ flip mapM_ descs $ \desc -> td $+        do when (dataSchema desc /= "") $ mkCode (typeLang (dataType desc)) "Schema" $ dataSchema desc+           when (dataExample desc /= "") $ mkCode (typeLang (dataType desc)) "Example" $ dataExample desc+  where typeLang XML  = "xml"+        typeLang JSON = "js"+        typeLang _    = ""++-- | Helper function for setting the right attributes to make something collapsible.+-- The javascript prt can be found in docs.js++mkCode :: String -> String -> String -> Html+mkCode lng cap cd =+  let eid = "idv" ++ (show $ toInteger $ hashString cd)+  in do div ! cls "modal hide fade code" ! id (toValue eid) $+          do cdiv "modal-header" $+              do a ! href (toValue "#") ! cls "close" $ toHtml "x"+                 h3 $ toHtml cap+             cdiv "modal-body" $ pre ! cls ("prettyprint lang-" ++ lng) $ toHtml $ cd+        button ! cls "btn open-modal"+               ! customAttribute (fromString "data-controls-modal") (toValue eid)+               ! customAttribute (fromString "data-backdrop") (toValue "true")+               ! customAttribute (fromString "data-keyboard") (toValue "true")+               $ toHtml cap++resourceId :: ResourceId -> String+resourceId = intercalate "."++resourceDisp :: ResourceId -> Html+resourceDisp = toHtml . intercalate "/"++resourceLinkAnchor :: ResourceId -> Html -> Html+resourceLinkAnchor rid = a ! cls "resource-link" ! href (toValue $ "#" ++ resourceId rid)++resourceLinkRemote :: String -> ResourceId -> Html -> Html+resourceLinkRemote rUrl rid = a ! cls "resource-link" ! href (toValue $ rUrl ++ intercalate "/" rid)++resourceAnchor :: ResourceId -> Html+resourceAnchor rid = a ! name (toValue $ resourceId rid) $ return ()++linkHtml :: Link -> Html+linkHtml =  mapM_ linkItem+  where linkItem (LParam idf)   = toHtml ("/<" ++ idf ++ ">")+        linkItem (LAccess lnks) = span ! class_ (toValue "link-block") $ sequence_ $ intersperse br+                                   $ map linkHtml $ reverse $ sortBy (compare `on` length) lnks+        linkItem x              = toHtml ("/" ++ itemString x)
+ src/Rest/Gen/Docs/Happstack.hs view
@@ -0,0 +1,39 @@+{-# LANGUAGE FlexibleContexts #-}+module Rest.Gen.Docs.Happstack where++import Control.Monad+import Control.Monad.Trans+import Happstack.Server+import Rest.Api+import Rest.Gen.Base+import Rest.Gen.Docs.Generate++-- | Web interface for documentation+apiDocsHandler :: (ServerMonad m, MonadPlus m, FilterMonad Response m, MonadIO m) => String -> String -> Api a -> m Response+apiDocsHandler rootURL tmpls api =+  let mkCtx v ct = DocsContext (rootURL ++ ct ++ "/") v tmpls+      serve ctx = serveDocs ctx . sortTree . noPrivate . (\(Some1 r) -> apiSubtrees r)+  in path $ \i -> withVersion i api mzero $ \v -> serve (mkCtx v i)++serveDocs :: (ServerMonad m, MonadPlus m, FilterMonad Response m, MonadIO m) => DocsContext -> ApiResource -> m Response+serveDocs ctx tree =+  msum $+    [ nullDir >> allDocsHandler ctx tree+    , docHandlers ctx tree+    ]+++allDocsHandler :: (ServerMonad m, MonadPlus m, FilterMonad Response m, MonadIO m) => DocsContext -> ApiResource -> m Response+allDocsHandler ctx tree =+  do pg <- liftIO $ mkAllResources ctx tree+     setHeaderM "Content-Type" "text/html"+     return $ toResponse pg++docHandlers :: (ServerMonad m, MonadPlus m, FilterMonad Response m, MonadIO m) => DocsContext -> ApiResource -> m Response+docHandlers ctx = foldTreeChildren msum $ \it subs ->+  dir (resName it) $ msum $+       [ nullDir >> do pg <- liftIO $ mkSingleResource ctx it+                       setHeaderM "Content-Type" "text/html"+                       return $ toResponse pg+       ]+    ++ subs
+ src/Rest/Gen/Haskell/Generate.hs view
@@ -0,0 +1,271 @@+{-# LANGUAGE DoAndIfThenElse, TemplateHaskell #-}+module Rest.Gen.Haskell.Generate where++import Control.Applicative+import Control.Arrow (first)+import Control.Category+import Control.Monad+import Data.Label (mkLabels, modify, set)+import Data.List+import Data.Maybe+import Prelude hiding ((.), id)+import Safe+import System.Directory+import System.FilePath++import qualified Distribution.ModuleName                     as Cabal+import qualified Distribution.Package                        as Cabal+import qualified Distribution.PackageDescription             as Cabal+import qualified Distribution.PackageDescription.Parse       as Cabal+import qualified Distribution.Verbosity                      as Cabal+import qualified Distribution.Version                        as Cabal+import qualified Distribution.PackageDescription.PrettyPrint as Cabal+import qualified Distribution.Simple.Utils                   as Cabal++import Code.Build+import Code.Build.Haskell+import Rest.Api (Version, Router)++import Rest.Gen.Base+import Rest.Gen.Utils++import qualified Rest.Gen.Base.ActionInfo.Ident as Ident++$(mkLabels[''Cabal.GenericPackageDescription, ''Cabal.CondTree, ''Cabal.Library])++data HaskellContext =+  HaskellContext+    { apiVersion     :: Version+    , targetPath     :: String+    , wrapperName    :: String+    , includePrivate :: Bool+    , sources        :: [String]+    , imports        :: [String]+    , rewrites       :: [(String, String)]+    , namespace      :: [String]+    }++mkHsApi :: HaskellContext -> Router m s -> IO ()+mkHsApi ctx r =+  do let tree = sortTree . (if includePrivate ctx then id else noPrivate) . apiSubtrees $ r+     mkCabalFile ctx tree+     mapM_ (writeRes ctx) $ allSubTrees tree++mkCabalFile :: HaskellContext -> ApiResource -> IO ()+mkCabalFile ctx tree =+  do cabalExists <- doesFileExist cabalFile+     gpkg <-+       if cabalExists+       then updateExposedModules modules <$> Cabal.readPackageDescription Cabal.normal cabalFile+       else return (mkGenericPackageDescription (wrapperName ctx) modules)+     writeCabalFile cabalFile gpkg+  where+    cabalFile = targetPath ctx </> wrapperName ctx ++ ".cabal"+    modules   = map Cabal.fromString (sources ctx)+             ++ map (Cabal.fromString . qualModName . (namespace ctx ++)) (allSubResourceIds tree)++writeCabalFile :: FilePath -> Cabal.GenericPackageDescription -> IO ()+writeCabalFile path = Cabal.writeUTF8File path . unlines . filter emptyField . lines . Cabal.showGenericPackageDescription+  where emptyField = (/= "\"\" ") . takeWhile (/= ':') . reverse++updateExposedModules :: [Cabal.ModuleName] -> Cabal.GenericPackageDescription -> Cabal.GenericPackageDescription+updateExposedModules modules = modify lCondLibrary (Just . maybe (mkCondLibrary modules) (set (lExposedModules . lCondTreeData) modules))++mkGenericPackageDescription :: String -> [Cabal.ModuleName] -> Cabal.GenericPackageDescription+mkGenericPackageDescription name modules = Cabal.GenericPackageDescription pkg [] (Just (mkCondLibrary modules)) [] [] []+  where+    pkg = Cabal.emptyPackageDescription+      { Cabal.package        = Cabal.PackageIdentifier (Cabal.PackageName name) (Cabal.Version [0, 1] [])+      , Cabal.buildType      = Just Cabal.Simple+      , Cabal.specVersionRaw = Right (Cabal.orLaterVersion (Cabal.Version [1, 8] []))+      }++mkCondLibrary :: [Cabal.ModuleName] -> Cabal.CondTree Cabal.ConfVar [Cabal.Dependency] Cabal.Library+mkCondLibrary modules = Cabal.CondNode+  { Cabal.condTreeData        = Cabal.Library modules True Cabal.emptyBuildInfo+  , Cabal.condTreeConstraints = []+  , Cabal.condTreeComponents  = []+  }++writeRes :: HaskellContext -> ApiResource -> IO ()+writeRes ctx node =+  do createDirectoryIfMissing True (targetPath ctx </> "src" </> modPath (namespace ctx ++ resParents node))+     writeFile (targetPath ctx </> "src" </> modPath (namespace ctx ++ resId node) ++ ".hs") (mkRes ctx node)++mkRes :: HaskellContext -> ApiResource -> String+mkRes ctx node =+  showCode $+      "{-# LANGUAGE OverloadedStrings #-}\n{-# OPTIONS_GHC -fno-warn-unused-imports #-}\n{- Warning!! This is automatically generated code, do not modify! -}"+  <-> hsModule (qualModName $ namespace ctx ++ resId node)+       [ mkImports ctx node rewrittenMods+       , idData node+       , mkStack funcs+       ]+  where+    (funcs, mods) = unzip $ map (mkFunction (apiVersion ctx) $ resName node) $ resItems node+    rewrittenMods = rewriteModules (rewrites ctx) $ nub $ concat mods++mkImports :: HaskellContext -> ApiResource -> [String] -> Code+mkImports ctx node datImp =+    mkStack+      [ code "import Rest.Client.Internal"+      , extraImports+      , parentImports+      , dataImports+      ]+  where+    extraImports  = mkStack . map ("import " <+>) $ imports ctx+    parentImports = mkStack . map mkImport . tail . inits . resParents $ node+    dataImports   = mkStack . map ("import qualified " <+>) $ datImp+    mkImport p = "import qualified" <++> qualModName (namespace ctx ++ p) <++> "as" <++> modName (last p)++mkFunction :: Version -> String -> ApiAction -> (Code, [String])+mkFunction ver res (ApiAction _ lnk ai) =+  let mInp     = fmap inputInfo $ chooseType $ inputs ai+      identMod = maybe [] Ident.haskellModule (ident ai)+      defaultErrorConversion = if fmap dataType (chooseType (outputs ai)) == Just JSON then "fromJSON" else "fromXML"+      (oMod, oType, oCType, oFunc) = maybe ([], "()", "text/plain", "(const ())") outputInfo $ chooseType $ outputs ai+      (eMod, eType, eFunc) = headDef (([], "()", defaultErrorConversion))+                           . map errorInfo+                           . catMaybes+                           . map (\v -> find ((v ==) . dataType) $ errors ai)+                           $ maybeToList (fmap dataType $ chooseType (outputs ai)) ++ [XML, JSON]+      (lUrl, lPars) = linkToURL res lnk+      url      = string ("v" <+> show ver <+> "/") <++> "++" <++> lUrl+      fParams  = map (hsName . cleanName) lPars+              ++ maybe [] ((:[]) . hsName . cleanName . description) (ident ai)+              ++ maybe [] (const ["input"]) mInp+              ++ (if null (params ai) then [] else ["pList"])+      fType    = "ApiStateC m => "+              ++ (hsType $ map (\p -> (if p == res then "" else modName p ++ ".") ++ "Identifier") lPars+                       ++ maybe [] (return . Ident.haskellType) (ident ai)+                       ++ maybe [] (\(_,v,_,_) -> [v]) mInp+                       ++ (if null (params ai) then [] else ["[(String, String)]"])+                       ++ ["m (ApiResponse (" ++ eType ++ ") (" ++ oType ++ "))"])+  in ( mkStack $+        [ function (mkHsName ai) fType+        , hsDecl (mkHsName ai) fParams $+           hsLet+              [ "rHeaders" .=. hsArray [ hsTuple [code "hAccept", string oCType]+                                       , hsTuple [code "hContentType", string (maybe "text/plain" (\(_,_,v,_) -> v) mInp)]+                                       ]+              , "request" .=. "ApiRequest"+                                  <++> string (show (method ai))+                                  <++> parenthesis url+                                  <++> (if null (params ai) then "[]" else "pList")+                                  <++> "rHeaders"+                                  <++> "$"+                                  <++> maybe "\"\"" ((++ " input") . (\(_,_,_,v) -> v)) mInp+              ]+              $ "liftM (parseResult" <++> eFunc <++> oFunc <+> ") . doRequest $ request"+        ]+     , eMod ++ oMod ++ identMod ++ maybe [] (\(m,_,_,_) -> m) mInp+     )++linkToURL :: String -> Link -> (Code, [String])+linkToURL res lnk = first (\v -> "intercalate" <++> string "/" <++> parenthesis ("map encode $ concat" <++> hsArray v)) $ urlParts res lnk ([], [])++urlParts :: String -> Link -> ([Code], [String]) -> ([Code], [String])+urlParts res lnk ac@(rlnk, pars) =+  case lnk of+    [] -> ac+    (LResource r : a@(LAccess _) : xs) | not (hasParam a) -> urlParts res xs (rlnk ++ [hsArray [string r]], pars)+                                   | otherwise ->+      urlParts res xs+            ( rlnk ++ [ hsArray [string r]+                      , (if r == res then noCode else modName r <+> ".") <+> "readId" <++> hsName (cleanName r)+                      ]+            , pars ++ [r]+            )+    (LParam p : xs) -> urlParts res xs (rlnk ++ [hsArray ["showUrl" <++> hsName (cleanName p)]], pars)+    (i : xs) -> urlParts res xs (rlnk ++ [hsArray [string $ itemString i]], pars)++idData :: ApiResource -> Code+idData node =+  let items  = filter isAccessor $ map itemInfo $ resItems node+      mkCons = dataName . resDir+  in case items of+      []  -> noCode+      [x] -> maybe noCode+             (\i -> mkStack+              [ code "type Identifier = " <++> Ident.haskellType i+              , function "readId" "Identifier -> [String]"+              , hsDecl "readId" ["x"] (hsArray $ if resDir x /= "" then [string $ resDir x, code "showUrl x"] else [code "showUrl x"])+              ]+             )+             (ident x)+      ls  -> mkStack $+              [ hsData "Identifier" $ map (\i -> mkCons i ++ maybe "" (\x -> " (" ++ Ident.haskellType x ++ ")") (ident i)) ls+              , function "readId" "Identifier -> [String]"+              , mkStack $+                  map (\i ->+                          if isJust (ident i)+                            then hsDecl "readId" ["(" ++ mkCons i ++ " x" ++ ")"] $ hsArray [string (resDir i), code "showUrl x"]+                            else hsDecl "readId" [mkCons i] $ hsArray [string (resDir i)]+                      ) ls+              ]++mkHsName :: ActionInfo -> String+mkHsName ai = hsName $ concatMap cleanName parts+  where+      parts = case actionType ai of+                Retrieve   -> let nm = get ++ by ++ target+                              in if null nm then ["access"] else nm+                Create     -> ["create"] ++ by ++ target+                -- Should be delete, but delete is a JS keyword and causes problems in collect.+                Delete     -> ["remove"] ++ by ++ target+                List       -> ["list"]   ++ by ++ target+                Update     -> ["save"]   ++ by ++ target+                UpdateMany -> ["saveMany"] ++ by ++ target+                Modify   -> if resDir ai == "" then ["do"] else [resDir ai]++      target = if resDir ai == "" then maybe [] ((:[]) . description) (ident ai) else [resDir ai]+      by     = if target /= [] && (isJust (ident ai) || actionType ai == UpdateMany) then ["by"] else []+      get    = if isAccessor ai then [] else ["get"]++rewriteModules :: [(String, String)] -> [String] -> [String]+rewriteModules _  [] = []+rewriteModules rw (v : vs) = maybe v (++ (" as " ++ v)) (lookup v rw) : rewriteModules rw vs++hsName :: [String] -> String+hsName []       = ""+hsName (x : xs) = downFirst x ++ concatMap upFirst xs++qualModName :: ResourceId -> String+qualModName = intercalate "." . map modName++modPath :: ResourceId -> String+modPath = intercalate "/" . map modName++modName :: String -> String+modName = concatMap upFirst . cleanName++dataName :: String -> String+dataName = modName++inputInfo :: DataDescription -> ([String], String, String, String)+inputInfo ds =+  case dataType ds of+    String -> ([], "String", "text/plain", "fromString")+    XML    -> (haskellModule ds, haskellType ds, "text/xml", "toXML")+    JSON   -> (haskellModule ds, haskellType ds, "text/json", "toJSON")+    File   -> ([], "ByteString", "application/octet-stream", "id")+    Other  -> ([], "ByteString", "text/plain", "id")++outputInfo :: DataDescription -> ([String], String, String, String)+outputInfo ds =+  case dataType ds of+    String -> ([], "String", "text/plain", "toString")+    XML    -> (haskellModule ds, haskellType ds, "text/xml", "fromXML")+    JSON   -> (haskellModule ds, haskellType ds, "text/json", "fromJSON")+    File   -> ([], "ByteString", "*", "id")+    Other  -> ([], "ByteString", "text/plain", "id")++errorInfo :: DataDescription -> ([String], String, String)+errorInfo ds =+  case dataType ds of+    String -> (haskellModule ds, haskellType ds, "fromXML")+    XML    -> (haskellModule ds, haskellType ds, "fromXML")+    JSON   -> (haskellModule ds, haskellType ds, "fromJSON")+    File   -> (haskellModule ds, haskellType ds, "fromXML")+    Other  -> (haskellModule ds, haskellType ds, "fromXML")
+ src/Rest/Gen/JavaScript/Generate.hs view
@@ -0,0 +1,125 @@+{-# LANGUAGE ScopedTypeVariables #-}+module Rest.Gen.JavaScript.Generate (mkJsApi) where++import Code.Build+import Code.Build.JavaScript++import Control.Monad+import Data.Maybe+import Text.StringTemplate++import Rest.Api (Version, Router)+import Rest.Gen.Base+import Rest.Gen.Utils++mkJsApi :: String -> Bool -> Version -> Router m s -> IO String+mkJsApi ns priv ver r =+  do prelude <- liftM (render . setManyAttrib attrs . newSTMP) (readContent "Javascript/base.js")+     let cod = showCode $ mkStack+                [ ns ++ ".prototype.version" .=. string (show ver)+                , mkJsCode ns priv r+                ]+     return $ prelude ++ cod+  where attrs = [("apinamespace", ns), ("dollar", "$")]++mkJsCode :: String -> Bool -> Router m s -> Code+mkJsCode ns priv = mkJs ns . sortTree . (if priv then id else noPrivate) . apiSubtrees++mkJs :: String -> ApiResource -> Code+mkJs ns = foldTreeChildren mkStack (\i ls -> mkStack $ mkRes ns i : ls)++mkRes :: String -> ApiResource -> Code+mkRes ns node = mkStack $+  [ if hasAccessor node+      then resourceLoc ns node .=. ns ++ ".makeSilkConstructor()"+      else resourceLoc ns node .=. jsObject []+  , resourceLoc ns node ++ ".apiObjectType" .=. string "resourceDir"+  , mkAccessFuncs ns node+  , mkPreFuncs ns node+  , mkPostFuncs ns node+  ]++mkPreFuncs :: String -> ApiResource -> Code+mkPreFuncs ns node =+  let items = filter ((\i -> not $ postAction i || isAccessor i) . itemInfo) $ resItems node+  in mkFunctions (resourceLoc ns node ++ ".") (mkFunction ns) items++mkAccessFuncs :: String -> ApiResource -> Code+mkAccessFuncs ns node =+  let items = filter ((\i -> not (postAction i) && isAccessor i) . itemInfo) $ resItems node+  in mkFunctions (resourceLoc ns node ++ ".") (mkAccessor ns) items++mkPostFuncs :: String -> ApiResource -> Code+mkPostFuncs ns node =+  let items = filter (postAction . itemInfo) $ resItems node+  in mkFunctions (resourceLoc ns node ++ ".prototype.") (mkFunction ns) items++mkFunctions :: String -> (ApiAction -> Code) -> [ApiAction] -> Code+mkFunctions loc maker = mkStack . map (\item -> loc ++ mkJsName item .=. maker item)++mkAccessor :: String -> ApiAction -> Code+mkAccessor ns node@(ApiAction _ _ ai) =+  let fParams  = maybeToList mIdent+      urlPart  = (if resDir ai == "" then "" else resDir ai ++ "/")+              ++ maybe "" (\i -> "' + encodeURIComponent(" ++ i ++ ") + '/") mIdent+      mIdent   = fmap (jsId . cleanName . description) $ ident ai+  in function fParams $+      [ var "accessor" $ new "this" . code $ "this.contextUrl + '" ++ urlPart ++ "'"+      , "accessor.get" .=. mkFunction ns node+      , ret "accessor"+      ]++mkFunction :: String -> ApiAction -> Code+mkFunction ns (ApiAction _ _ ai) =+  let fParams  = maybeToList mIdent+              ++ maybeToList (fmap fst3 mInp)+              ++ ["success", "error", "params", "callOpts"]+      mInp     = fmap mkType . chooseType $ inputs ai+      mOut     = fmap mkType . chooseType $ outputs ai+      urlPart  = (if isAccessor ai then const "" else id) $+                 (if resDir ai == "" then "" else resDir ai ++ "/")+              ++ maybe "" (\i -> "' + encodeURIComponent(" ++ i ++ ") + '/") mIdent+      mIdent   = (if isAccessor ai then const Nothing else id) $ fmap (jsId . cleanName . description) $ ident ai+  in function fParams $ ret $+        proc (ns ++ "." ++ "ajaxCall")+          [ string (method ai)+          , code $ (if (https ai) then "this.secureContextUrl" else "this.contextUrl") ++ " + '" ++ urlPart ++ "'"+          , code "params"+          , code "success"+          , code "error"+          , string $ maybe "text/plain" snd3 mInp+          , string $ maybe "text" fst3 mOut+          , maybe (code "undefined") (\(p, _, f) -> f (code p)) mInp+          , code "callOpts"+          ]++resourceLoc :: String -> ApiResource -> String+resourceLoc ns = ((ns ++ ".prototype.") ++) . locFromLink . resLink+  where locFromLink (LResource i1 : LAccess [] : LResource i2 : xs) = jsDir (cleanName i1) ++ "." ++ locFromLink (LResource i2 : xs)+        locFromLink (LResource i : xs) = case locFromLink xs of+                                          [] -> jsDir $ cleanName i+                                          ls -> jsDir (cleanName i) ++ ".prototype." ++ ls+        locFromLink (_ : xs) = locFromLink xs+        locFromLink [] = ""++mkJsName :: ApiAction -> String+mkJsName item =+  case mkFuncParts item of+    []       -> ""+    (x : xs) -> x ++ concatMap upFirst xs++jsDir :: [String] -> String+jsDir = concatMap upFirst++jsId :: [String] -> String+jsId []       = ""+jsId (x : xs) = x ++ concatMap upFirst xs++mkType :: DataDescription -> (String, String, Code -> Code)+mkType ds =+  case dataType ds of+    String -> ("text", "text/plain", id)+    XML    -> ("xml" , "text/xml", id)+    JSON   -> ("json", "text/json", call "JSON.stringify")+    File   -> ("file", "application/octet-stream", id)+    Other  -> ("text", "text/plain", id)
+ src/Rest/Gen/Ruby/Generate.hs view
@@ -0,0 +1,141 @@+{-# LANGUAGE ScopedTypeVariables #-}+module Rest.Gen.Ruby.Generate (mkRbApi) where++import Code.Build+import Code.Build.Ruby++import Data.Char+import Data.List+import Data.Maybe++import Rest.Api (Version, Router)+import Rest.Gen.Base+import Rest.Gen.Utils++mkRbApi :: String -> Bool -> Version -> Router m s -> IO String+mkRbApi ns priv ver r =+  do prelude <- readContent "Ruby/base.rb"+     let cod = showCode . mkRb ns ver . sortTree . (if priv then id else noPrivate) . apiSubtrees $ r+     return $ cod ++ prelude++mkRb :: String -> Version -> ApiResource -> Code+mkRb ns ver node =+  rbModule ns $ mkStack+        [ "@version" .=. string (show ver)+        , apiConstructor ver node+        , foldTreeChildren mkStack (\i ls -> mkStack $ mkRes i : ls) node+        ]++apiConstructor :: Version -> ApiResource -> Code+apiConstructor ver node =+  rbClass "BaseApi" $+    [ function "initialize" ["resUrl"] $ mkStack $+        [ "@url" .=. ("resUrl + '/v" ++ show ver ++ "/'")+        , "@api" .=. "self"+        ]+    , mkStack . map resGetter . subResources $ node+    ]++mkRes :: ApiResource -> Code+mkRes node = mkResAcc node <-> mkResObj node++mkResAcc :: ApiResource -> Code+mkResAcc node =+  rbClass (accessorName $ resId node)+    [ accInitializer+    , mkPreFuncs node+    , mkStack . map resGetter . filter (not . hasAccessor) . subResources $ node+    ]++mkResObj :: ApiResource -> Code+mkResObj node =+  rbClass (className $ resId node)+    [ objInitializer+    , if hasAccessor node then get else noCode+    , mkPostFuncs node+    , mkStack . map resGetter . subResources $ node+    ]++mkPostFuncs :: ApiResource -> Code+mkPostFuncs node = mkStack . map mkFunction . filter (postAction . itemInfo) . resItems $ node++mkPreFuncs :: ApiResource -> Code+mkPreFuncs node =+  let (acs, funcs) = partition (isAccessor . itemInfo) . filter ((\i -> not $ postAction i) . itemInfo) $ resItems node+  in mkStack (map mkAccessor acs) <-> mkStack (map mkFunction funcs)++mkAccessor :: ApiAction -> Code+mkAccessor node@(ApiAction rid _ ai) =+  let fParams  = maybeToList mIdent+      urlPart  = (if resDir ai == "" then "" else resDir ai ++ "/")+              ++ maybe "" (\i -> "' + " ++ i ++ " + '/") mIdent+      datType  = maybe ":data" ((':':) . fst3 . mkType) $ chooseType $ outputs ai+      mIdent   = fmap (rbName . cleanName . description) $ ident ai+  in function (rbName $ mkFuncParts node) fParams $ ret $+        new (className rid) ["@url + '" ++ urlPart ++ "'", "@api", datType]++mkFunction :: ApiAction -> Code+mkFunction node@(ApiAction _ _ ai) =+  let fParams   = maybeToList mIdent+              ++ maybeToList (fmap fst3 mInp)+              ++ ["params = {}", "headers = {}"]+      mInp     = fmap mkType . chooseType $ inputs ai+      mOut     = fmap mkType . chooseType $ outputs ai+      urlPart  = (if resDir ai == "" then "" else resDir ai ++ "/")+              ++ maybe "" (\i -> "' + " ++ i ++ " + '/") mIdent+      mIdent   = fmap (rbName . cleanName . description) $ ident ai+  in function (rbName $ mkFuncParts node) fParams $+        call ("internalSilkRequest")+          [ code "@api"+          , code $ ':' : map toLower (show $ method ai)+          , code $ "@url + '" ++ urlPart ++ "'"+          , code "params"+          , string $ maybe "text/plain" snd3 mInp+          , code $ maybe ":data" ((':':) . fst3) mOut+          , maybe (code "nil") (\(p, _, f) -> f (code p)) mInp+          , code "headers"+          ]++accInitializer :: Code+accInitializer =+  function "initialize" ["resUrl", "myApi"]+     [ "@url"      .=. "resUrl"+     , "@api"      .=. "myApi"+     ]++objInitializer :: Code+objInitializer =+  function "initialize" ["resUrl", "myApi", "retData = :data"]+     [ "@url"      .=. "resUrl"+     , "@dataType" .=. "retData"+     , "@api"      .=. "myApi"+     ]++resGetter :: ApiResource -> Code+resGetter node =+  function (className [resName node]) [] $+    ret $ new (accessorName $ resId node) ["@url + '" ++ resName node ++ "/'", "@api"]++get :: Code+get =+  function "get" ["params = {}", "headers = {}"] $+    call "internalSilkRequest" ["@api", ":get", "@url", "params", "'text/plain'", "@dataType", "headers"]++rbName :: [String] -> String+rbName []       = ""+rbName (x : xs) = downFirst x ++ concatMap upFirst xs++className :: ResourceId -> String+className = concatMap upFirst . concatMap cleanName++accessorName :: ResourceId -> String+accessorName = concatMap upFirst . ("Access":) . concatMap cleanName++mkType :: DataDescription -> (String, String, Code -> Code)+mkType ds =+  case dataType ds of+    String -> ("data", "text/plain", id)+    XML    -> ("xml" , "text/xml", (<+> ".to_s"))+    JSON   -> ("json", "text/json", call "mkJson")+    File   -> ("file", "application/octet-stream", id)+    Other  -> ("data", "text/plain", id)
+ src/Rest/Gen/Utils.hs view
@@ -0,0 +1,41 @@+module Rest.Gen.Utils where++import Data.Char+import Data.List.Split++import Paths_rest_gen++import System.FilePath+import Text.StringTemplate++readContent :: String -> IO String+readContent f = getDataFileName f >>= readFile++copyContent :: ToSElem a => [(String, a)] -> String -> String -> IO ()+copyContent ats f t = readContent f >>= return . render . setManyAttrib ats . newSTMP >>= writeFile (t </> last (splitOn "/" f))++groupByFirst :: Eq a => [(a,b)] -> [(a,[b])]+groupByFirst = foldr add []+  where add (k, v) l =+          case lookup k l of+            Nothing -> (k,[v]) : l+            Just vs -> (k, v: vs) : filter ((/=k) . fst) l++fst3 :: (a, b, c) -> a+fst3 (a, _, _) = a++snd3 :: (a, b, c) -> b+snd3 (_, b, _) = b++thd3 :: (a, b, c) -> c+thd3 (_, _, c) = c++upFirst :: String -> String+upFirst = mapHead toUpper++downFirst :: String -> String+downFirst = mapHead toLower++mapHead :: (a -> a) -> [a] -> [a]+mapHead _ [] = []+mapHead f (x : xs) = f x : xs
+ tests/Runner.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE ScopedTypeVariables, OverloadedStrings #-}++import Test.Framework (defaultMain)+import Test.Framework.Providers.HUnit (testCase)+import Test.HUnit (Assertion, assertEqual)++import Rest.Gen.Base.ActionInfo+import Rest.Gen.Base.ApiTree+import Rest.Dictionary (xmlJsonO)+import Rest.Handler+import Rest.Resource+import Rest.Schema++main :: IO ()+main = do+  defaultMain [ testCase "Listing has right parameters." testListingParams+              , testCase "Selects should show up only once." testSingleSelect+              , testCase "Removes should show up only once." testSingleRemove+              , testCase "Listing should have List type." testListingType+              ]++testListingParams :: Assertion+testListingParams = assertEqual "Parameters" ["offset", "count"] (params actionInfo)+  where+    [actionInfo] = resourceToActionInfo resource+    resource :: Resource IO IO Void () Void+    resource = mkResource { name = "resource", schema = Schema (Just (Many ())) (Named []), list = listHandler }+    listHandler () = mkListing id $ \_ -> return []++testSingleSelect :: Assertion+testSingleSelect = assertEqual "Number of select ActionInfos." 1 (length actionInfos)+  where+    actionInfos = filter isSelect $ resourceToActionInfo resource+    resource :: Resource IO IO ServerId Void Void+    resource = mkResource+      { name   = "resource"+      , schema = noListing $+                   named+                     [ ("id", singleBy ById)+                     , ("ip", singleBy ByIp)+                     ]+      , get    = Just handler_+      , selects = [ ("resources", handler_) ]+      }+    handler_ = mkConstHandler id $ return ()+    isSelect ai = actionTarget ai == Any && actionType ai == Retrieve && postAction ai++testSingleRemove :: Assertion+testSingleRemove = assertEqual "Number of remove ActionInfos." 1 (length actionInfos)+  where+    actionInfos = filter isRemove $ resourceToActionInfo resource+    resource :: Resource IO IO ServerId Void Void+    resource = mkResource+      { name   = "resource"+      , schema = noListing $+                   named+                     [ ("id", singleBy ById)+                     , ("ip", singleBy ByIp)+                     ]+      , remove = Just handler_+      }+    handler_ = mkConstHandler id $ return ()+    isRemove ai = actionTarget ai == Self && actionType ai == Delete && postAction ai++data ServerId = ById String | ByIp String++testListingType :: Assertion+testListingType =+  assertEqual "Listing should have List type"+    "Rest.Types.Container.List (())"+    (haskellType . head . outputs . itemInfo . head . resItems $ api)+  where+    api = apiTree (route resource)+    resource :: Resource IO IO Void () Void+    resource = mkResource { name = "resource", schema = Schema (Just (Many ())) (Named []), list = listHandler }+    listHandler () = mkListing xmlJsonO $ \_ -> return [()]