vulcan 0.6.1 → 0.7.0

data/server/node_modules/cradle/node_modules/follow/browser/require.js

@@ -0,0 +1,33 @@
+/*
+ RequireJS 0.26.0 Copyright (c) 2010-2011, The Dojo Foundation All Rights Reserved.
+ Available via the MIT or new BSD license.
+ see: http://github.com/jrburke/requirejs for details
+*/
+var requirejs,require,define;
+(function(){function M(a){return $.call(a)==="[object Function]"}function E(a){return $.call(a)==="[object Array]"}function V(a,c,g){for(var e in c)if(!(e in J)&&(!(e in a)||g))a[e]=c[e];return d}function R(a,c,d){a=Error(c+"\nhttp://requirejs.org/docs/errors.html#"+a);if(d)a.originalError=d;return a}function aa(a,c,d){var e,x,j;for(e=0;j=c[e];e++){j=typeof j==="string"?{name:j}:j;x=j.location;if(d&&(!x||x.indexOf("/")!==0&&x.indexOf(":")===-1))x=d+"/"+(x||j.name);a[j.name]={name:j.name,location:x||
+j.name,main:(j.main||"main").replace(fa,"").replace(ba,"")}}}function W(a,d){a.holdReady?a.holdReady(d):d?a.readyWait+=1:a.ready(!0)}function ga(a){function c(b,h){var n,o;if(b&&b.charAt(0)==="."&&h){p.pkgs[h]?h=[h]:(h=h.split("/"),h=h.slice(0,h.length-1));n=b=h.concat(b.split("/"));var a;for(o=0;a=n[o];o++)if(a===".")n.splice(o,1),o-=1;else if(a==="..")if(o===1&&(n[2]===".."||n[0]===".."))break;else o>0&&(n.splice(o-1,2),o-=2);o=p.pkgs[n=b[0]];b=b.join("/");o&&b===n+"/"+o.main&&(b=n)}return b}function g(b,
+h){var n=b?b.indexOf("!"):-1,o=null,a=h?h.name:null,ha=b,g,l;n!==-1&&(o=b.substring(0,n),b=b.substring(n+1,b.length));o&&(o=c(o,a));b&&(g=o?(n=m[o])?n.normalize?n.normalize(b,function(b){return c(b,a)}):c(b,a):"__$p"+a+"@"+(b||""):c(b,a),l=E[g],l||(l=d.toModuleUrl?d.toModuleUrl(f,g,h):f.nameToUrl(g,null,h),E[g]=l));return{prefix:o,name:g,parentMap:h,url:l,originalName:ha,fullName:o?o+"!"+(g||""):g}}function e(){var b=!0,h=p.priorityWait,n,a;if(h){for(a=0;n=h[a];a++)if(!s[n]){b=!1;break}b&&delete p.priorityWait}return b}
+function x(b){return function(h){b.exports=h}}function j(b,h,n){return function(){var a=[].concat(ia.call(arguments,0)),d;if(n&&M(d=a[a.length-1]))d.__requireJsBuild=!0;a.push(h);return b.apply(null,a)}}function q(b,h){var a=j(f.require,b,h);V(a,{nameToUrl:j(f.nameToUrl,b),toUrl:j(f.toUrl,b),defined:j(f.requireDefined,b),specified:j(f.requireSpecified,b),ready:d.ready,isBrowser:d.isBrowser});if(d.paths)a.paths=d.paths;return a}function v(b){var h=b.prefix,a=b.fullName;y[a]||a in m||(h&&!K[h]&&(K[h]=
+void 0,(S[h]||(S[h]=[])).push(b),(t[h]||(t[h]=[])).push({onDep:function(b){if(b===h){var a,n,d,c,f,e,j=S[h];if(j)for(d=0;a=j[d];d++)if(b=a.fullName,a=g(a.originalName,a.parentMap),a=a.fullName,n=t[b]||[],c=t[a],a!==b){b in y&&(delete y[b],y[a]=!0);t[a]=c?c.concat(n):n;delete t[b];for(c=0;c<n.length;c++){e=n[c].depArray;for(f=0;f<e.length;f++)e[f]===b&&(e[f]=a)}}delete S[h]}}}),v(g(h))),f.paused.push(b))}function w(b){var h,a,c;h=b.callback;var k=b.fullName,e=[],j=b.depArray;if(h&&M(h)){if(j)for(h=
+0;h<j.length;h++)e.push(b.deps[j[h]]);if(p.catchError.define)try{a=d.execCb(k,b.callback,e,m[k])}catch(l){c=l}else a=d.execCb(k,b.callback,e,m[k]);if(k)b.cjsModule&&b.cjsModule.exports!==void 0?a=m[k]=b.cjsModule.exports:a===void 0&&b.usingExports?a=m[k]:m[k]=a}else k&&(a=m[k]=h);if(F[b.waitId])delete F[b.waitId],b.isDone=!0,f.waitCount-=1,f.waitCount===0&&(I=[]);if(c)return a=(k?g(k).url:"")||c.fileName||c.sourceURL,c=R("defineerror",'Error evaluating module "'+k+'" at location "'+a+'":\n'+c+"\nfileName:"+
+a+"\nlineNumber: "+(c.lineNumber||c.line),c),c.moduleName=k,d.onError(c);if(k&&(c=t[k])){for(h=0;h<c.length;h++)c[h].onDep(k,a);delete t[k]}}function z(b,a,c,d){var b=g(b,d),k=b.name,e=b.fullName,j={},l={waitId:k||ja+Q++,depCount:0,depMax:0,prefix:b.prefix,name:k,fullName:e,deps:{},depArray:a,callback:c,onDep:function(b,a){b in l.deps||(l.deps[b]=a,l.depCount+=1,l.depCount===l.depMax&&w(l))}},i,r;if(e){if(e in m||s[e]===!0||e==="jquery"&&p.jQuery&&p.jQuery!==c().fn.jquery)return;y[e]=!0;s[e]=!0;e===
+"jquery"&&c&&T(c())}for(c=0;c<a.length;c++)if(i=a[c])i=g(i,k?b:d),r=i.fullName,a[c]=r,r==="require"?l.deps[r]=q(b):r==="exports"?(l.deps[r]=m[e]={},l.usingExports=!0):r==="module"?(l.cjsModule=i=l.deps[r]={id:k,uri:k?f.nameToUrl(k,null,d):void 0,exports:m[e]},i.setExports=x(i)):r in m&&!(r in F)?l.deps[r]=m[r]:j[r]||(l.depMax+=1,v(i),(t[r]||(t[r]=[])).push(l),j[r]=!0);l.depCount===l.depMax?w(l):(F[l.waitId]=l,I.push(l),f.waitCount+=1)}function u(b){z.apply(null,b);s[b[0]]=!0}function C(b,a){if(!b.isDone){var c=
+b.fullName,d=b.depArray,f,e;if(c){if(a[c])return m[c];a[c]=!0}for(e=0;e<d.length;e++)if((f=d[e])&&!b.deps[f]&&F[f])b.onDep(f,C(F[f],a));return c?m[c]:void 0}}function A(){var b=p.waitSeconds*1E3,a=b&&f.startTime+b<(new Date).getTime(),b="",c=!1,g=!1,k;if(!(f.pausedCount>0)){if(p.priorityWait)if(e())G();else return;for(k in s)if(!(k in J)&&(c=!0,!s[k]))if(a)b+=k+" ";else{g=!0;break}if(c||f.waitCount){if(a&&b)return k=R("timeout","Load timeout for modules: "+b),k.requireType="timeout",k.requireModules=
+b,d.onError(k);if(g||f.scriptCount){if((B||ca)&&!X)X=setTimeout(function(){X=0;A()},50)}else{if(f.waitCount){for(H=0;b=I[H];H++)C(b,{});Y<5&&(Y+=1,A())}Y=0;d.checkReadyState()}}}}function D(b,a){var c=a.name,e=a.fullName,g;if(!(e in m||e in s))K[b]||(K[b]=m[b]),s[e]||(s[e]=!1),g=function(g){if(d.onPluginLoad)d.onPluginLoad(f,b,c,g);w({prefix:a.prefix,name:a.name,fullName:a.fullName,callback:function(){return g}});s[e]=!0},g.fromText=function(b,a){var c=N;f.loaded[b]=!1;f.scriptCount+=1;c&&(N=!1);
+d.exec(a);c&&(N=!0);f.completeLoad(b)},K[b].load(c,q(a.parentMap,!0),g,p)}function L(b){b.prefix&&b.name&&b.name.indexOf("__$p")===0&&m[b.prefix]&&(b=g(b.originalName,b.parentMap));var a=b.prefix,c=b.fullName,e=f.urlFetched;!y[c]&&!s[c]&&(y[c]=!0,a?m[a]?D(a,b):(O[a]||(O[a]=[],(t[a]||(t[a]=[])).push({onDep:function(b){if(b===a){for(var c,d=O[a],b=0;b<d.length;b++)c=d[b],D(a,g(c.originalName,c.parentMap));delete O[a]}}})),O[a].push(b)):e[b.url]||(d.load(f,c,b.url),e[b.url]=!0))}var f,G,p={waitSeconds:7,
+baseUrl:i.baseUrl||"./",paths:{},pkgs:{},catchError:{}},P=[],y={require:!0,exports:!0,module:!0},E={},m={},s={},F={},I=[],Q=0,t={},K={},O={},Z=0,S={};T=function(b){if(!f.jQuery&&(b=b||(typeof jQuery!=="undefined"?jQuery:null))&&!(p.jQuery&&b.fn.jquery!==p.jQuery)&&("holdReady"in b||"readyWait"in b))if(f.jQuery=b,u(["jquery",[],function(){return jQuery}]),f.scriptCount)W(b,!0),f.jQueryIncremented=!0};G=function(){var b,a,c;Z+=1;if(f.scriptCount<=0)f.scriptCount=0;for(;P.length;)if(b=P.shift(),b[0]===
+null)return d.onError(R("mismatch","Mismatched anonymous define() module: "+b[b.length-1]));else u(b);if(!p.priorityWait||e())for(;f.paused.length;){c=f.paused;f.pausedCount+=c.length;f.paused=[];for(a=0;b=c[a];a++)L(b);f.startTime=(new Date).getTime();f.pausedCount-=c.length}Z===1&&A();Z-=1};f={contextName:a,config:p,defQueue:P,waiting:F,waitCount:0,specified:y,loaded:s,urlMap:E,scriptCount:0,urlFetched:{},defined:m,paused:[],pausedCount:0,plugins:K,managerCallbacks:t,makeModuleMap:g,normalize:c,
+configure:function(b){var a,c,e;b.baseUrl&&b.baseUrl.charAt(b.baseUrl.length-1)!=="/"&&(b.baseUrl+="/");a=p.paths;e=p.pkgs;V(p,b,!0);if(b.paths){for(c in b.paths)c in J||(a[c]=b.paths[c]);p.paths=a}if((a=b.packagePaths)||b.packages){if(a)for(c in a)c in J||aa(e,a[c],c);b.packages&&aa(e,b.packages);p.pkgs=e}if(b.priority)c=f.requireWait,f.requireWait=!1,f.takeGlobalQueue(),G(),f.require(b.priority),G(),f.requireWait=c,p.priorityWait=b.priority;if(b.deps||b.callback)f.require(b.deps||[],b.callback);
+b.ready&&d.ready(b.ready)},requireDefined:function(b,a){return g(b,a).fullName in m},requireSpecified:function(b,a){return g(b,a).fullName in y},require:function(b,c,e){if(typeof b==="string"){if(d.get)return d.get(f,b,c);c=g(b,c);b=c.fullName;return!(b in m)?d.onError(R("notloaded","Module name '"+c.fullName+"' has not been loaded yet for context: "+a)):m[b]}z(null,b,c,e);if(!f.requireWait)for(;!f.scriptCount&&f.paused.length;)f.takeGlobalQueue(),G();return f.require},takeGlobalQueue:function(){U.length&&
+(ka.apply(f.defQueue,[f.defQueue.length-1,0].concat(U)),U=[])},completeLoad:function(b){var a;for(f.takeGlobalQueue();P.length;)if(a=P.shift(),a[0]===null){a[0]=b;break}else if(a[0]===b)break;else u(a),a=null;a?u(a):u([b,[],b==="jquery"&&typeof jQuery!=="undefined"?function(){return jQuery}:null]);s[b]=!0;T();d.isAsync&&(f.scriptCount-=1);G();d.isAsync||(f.scriptCount-=1)},toUrl:function(b,a){var c=b.lastIndexOf("."),d=null;c!==-1&&(d=b.substring(c,b.length),b=b.substring(0,c));return f.nameToUrl(b,
+d,a)},nameToUrl:function(b,a,e){var g,j,i,m,l=f.config,b=c(b,e&&e.fullName);if(d.jsExtRegExp.test(b))a=b+(a?a:"");else{g=l.paths;j=l.pkgs;e=b.split("/");for(m=e.length;m>0;m--)if(i=e.slice(0,m).join("/"),g[i]){e.splice(0,m,g[i]);break}else if(i=j[i]){b=b===i.name?i.location+"/"+i.main:i.location;e.splice(0,m,b);break}a=e.join("/")+(a||".js");a=(a.charAt(0)==="/"||a.match(/^\w+:/)?"":l.baseUrl)+a}return l.urlArgs?a+((a.indexOf("?")===-1?"?":"&")+l.urlArgs):a}};f.jQueryCheck=T;f.resume=G;return f}function la(){var a,
+c,d;if(C&&C.readyState==="interactive")return C;a=document.getElementsByTagName("script");for(c=a.length-1;c>-1&&(d=a[c]);c--)if(d.readyState==="interactive")return C=d;return null}var ma=/(\/\*([\s\S]*?)\*\/|\/\/(.*)$)/mg,na=/require\(\s*["']([^'"\s]+)["']\s*\)/g,fa=/^\.\//,ba=/\.js$/,$=Object.prototype.toString,q=Array.prototype,ia=q.slice,ka=q.splice,B=!!(typeof window!=="undefined"&&navigator&&document),ca=!B&&typeof importScripts!=="undefined",oa=B&&navigator.platform==="PLAYSTATION 3"?/^complete$/:
+/^(complete|loaded)$/,da=typeof opera!=="undefined"&&opera.toString()==="[object Opera]",ja="_r@@",J={},z={},U=[],C=null,Y=0,N=!1,d,q={},I,i,u,L,v,A,D,H,Q,ea,w,T,X;if(typeof define==="undefined"){if(typeof requirejs!=="undefined")if(M(requirejs))return;else q=requirejs,requirejs=void 0;typeof require!=="undefined"&&!M(require)&&(q=require,require=void 0);d=requirejs=function(a,c,d){var e="_",i;!E(a)&&typeof a!=="string"&&(i=a,E(c)?(a=c,c=d):a=[]);if(i&&i.context)e=i.context;d=z[e]||(z[e]=ga(e));i&&
+d.configure(i);return d.require(a,c)};d.config=function(a){return d(a)};typeof require==="undefined"&&(require=d);d.toUrl=function(a){return z._.toUrl(a)};d.version="0.26.0";d.isArray=E;d.isFunction=M;d.mixin=V;d.jsExtRegExp=/^\/|:|\?|\.js$/;i=d.s={contexts:z,skipAsync:{},isPageLoaded:!B,readyCalls:[]};if(d.isAsync=d.isBrowser=B)if(u=i.head=document.getElementsByTagName("head")[0],L=document.getElementsByTagName("base")[0])u=i.head=L.parentNode;d.onError=function(a){throw a;};d.load=function(a,c,
+g){var e=a.loaded;e[c]||(e[c]=!1);a.scriptCount+=1;d.attach(g,a,c);if(a.jQuery&&!a.jQueryIncremented)W(a.jQuery,!0),a.jQueryIncremented=!0};define=d.def=function(a,c,g){var e,i;typeof a!=="string"&&(g=c,c=a,a=null);d.isArray(c)||(g=c,c=[]);!a&&!c.length&&d.isFunction(g)&&g.length&&(g.toString().replace(ma,"").replace(na,function(a,d){c.push(d)}),c=(g.length===1?["require"]:["require","exports","module"]).concat(c));if(N&&(e=I||la()))a||(a=e.getAttribute("data-requiremodule")),i=z[e.getAttribute("data-requirecontext")];
+(i?i.defQueue:U).push([a,c,g])};define.amd={multiversion:!0,plugins:!0,jQuery:!0};d.exec=function(a){return eval(a)};d.execCb=function(a,c,d,e){return c.apply(e,d)};d.onScriptLoad=function(a){var c=a.currentTarget||a.srcElement,g;if(a.type==="load"||oa.test(c.readyState))C=null,a=c.getAttribute("data-requirecontext"),g=c.getAttribute("data-requiremodule"),z[a].completeLoad(g),c.detachEvent&&!da?c.detachEvent("onreadystatechange",d.onScriptLoad):c.removeEventListener("load",d.onScriptLoad,!1)};d.attach=
+function(a,c,g,e,q){var j;if(B)return e=e||d.onScriptLoad,j=c&&c.config&&c.config.xhtml?document.createElementNS("http://www.w3.org/1999/xhtml","html:script"):document.createElement("script"),j.type=q||"text/javascript",j.charset="utf-8",j.async=!i.skipAsync[a],c&&j.setAttribute("data-requirecontext",c.contextName),j.setAttribute("data-requiremodule",g),j.attachEvent&&!da?(N=!0,j.attachEvent("onreadystatechange",e)):j.addEventListener("load",e,!1),j.src=a,I=j,L?u.insertBefore(j,L):u.appendChild(j),
+I=null,j;else if(ca)e=c.loaded,e[g]=!1,importScripts(a),c.completeLoad(g);return null};if(B){v=document.getElementsByTagName("script");for(H=v.length-1;H>-1&&(A=v[H]);H--){if(!u)u=A.parentNode;if(D=A.getAttribute("data-main")){if(!q.baseUrl)v=D.split("/"),A=v.pop(),v=v.length?v.join("/")+"/":"./",q.baseUrl=v,D=A.replace(ba,"");q.deps=q.deps?q.deps.concat(D):[D];break}}}i.baseUrl=q.baseUrl;d.pageLoaded=function(){if(!i.isPageLoaded){i.isPageLoaded=!0;Q&&clearInterval(Q);if(ea)document.readyState="complete";
+d.callReady()}};d.checkReadyState=function(){var a=i.contexts,c;for(c in a)if(!(c in J)&&a[c].waitCount)return;i.isDone=!0;d.callReady()};d.callReady=function(){var a=i.readyCalls,c,d,e;if(i.isPageLoaded&&i.isDone){if(a.length){i.readyCalls=[];for(c=0;d=a[c];c++)d()}a=i.contexts;for(e in a)if(!(e in J)&&(c=a[e],c.jQueryIncremented))W(c.jQuery,!1),c.jQueryIncremented=!1}};d.ready=function(a){i.isPageLoaded&&i.isDone?a():i.readyCalls.push(a);return d};if(B){if(document.addEventListener){if(document.addEventListener("DOMContentLoaded",
+d.pageLoaded,!1),window.addEventListener("load",d.pageLoaded,!1),!document.readyState)ea=!0,document.readyState="loading"}else window.attachEvent&&(window.attachEvent("onload",d.pageLoaded),self===self.top&&(Q=setInterval(function(){try{document.body&&(document.documentElement.doScroll("left"),d.pageLoaded())}catch(a){}},30)));document.readyState==="complete"&&d.pageLoaded()}d(q);if(d.isAsync&&typeof setTimeout!=="undefined")w=i.contexts[q.context||"_"],w.requireWait=!0,setTimeout(function(){w.requireWait=
+!1;w.takeGlobalQueue();w.jQueryCheck();w.scriptCount||w.resume();d.checkReadyState()},0)}})();

data/server/node_modules/cradle/node_modules/follow/browser/util.js

@@ -0,0 +1,28 @@
+define([], function() {
+  var exports = {};
+
+  exports.inspect = JSON.stringify;
+
+  // Copy from Node
+  /**
+   * Inherit the prototype methods from one constructor into another.
+   *
+   * The Function.prototype.inherits from lang.js rewritten as a standalone
+   * function (not on Function.prototype). NOTE: If this file is to be loaded
+   * during bootstrapping this function needs to be revritten using some native
+   * functions as prototype setup using normal JavaScript does not work as
+   * expected during bootstrapping (see mirror.js in r114903).
+   *
+   * @param {function} ctor Constructor function which needs to inherit the
+   *     prototype.
+   * @param {function} superCtor Constructor function to inherit prototype from.
+   */
+  exports.inherits = function(ctor, superCtor) {
+    ctor.super_ = superCtor;
+    ctor.prototype = Object.create(superCtor.prototype, {
+      constructor: { value: ctor, enumerable: false }
+    });
+  };
+
+  return exports;
+})

data/server/node_modules/cradle/node_modules/follow/cli.js

@@ -0,0 +1,101 @@
+#!/usr/bin/env node
+// The follow command-line interface.
+//
+// Copyright 2011 Iris Couch
+//
+//    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.
+
+var lib = require('./lib')
+  , couch_changes = require('./api')
+  ;
+
+function puts(str) {
+  process.stdout.write(str + "\n");
+}
+
+function main() {
+  var db = require.isBrowser ? (process.env.db || '/_users') : process.argv[2];
+  puts('Watching: ' + db);
+
+  var feed = new couch_changes.Feed();
+  feed.db = db;
+  feed.since = (process.env.since === 'now') ? 'now' : parseInt(process.env.since || '0');
+
+  feed.heartbeat = (process.env.heartbeat || '3000').replace(/s$/, '000');
+  feed.heartbeat = parseInt(feed.heartbeat);
+
+  if(require.isBrowser)
+    feed.feed = 'longpoll';
+  if(process.env.host)
+    feed.headers.host = process.env.host;
+  if(process.env.inactivity)
+    feed.inactivity_ms = parseInt(process.env.inactivity);
+  if(process.env.limit)
+    feed.limit = parseInt(process.env.limit);
+
+  feed.query_params.pid = process.pid;
+  feed.filter = process.env.filter || example_filter;
+  function example_filter(doc, req) {
+    // This is a local filter. It runs on the client side.
+    var label = 'Filter ' + (req.query.pid || '::');
+
+    if(process.env.show_doc)
+      console.log(label + ' doc: ' + JSON.stringify(doc));
+    if(process.env.show_req)
+      console.log(label + ' for ' + doc._id + ' req: ' + JSON.stringify(req));
+    return true;
+  }
+
+  feed.on('confirm', function() {
+    puts('Database confirmed: ' + db);
+  })
+
+  feed.on('change', function(change) {
+    puts('Change:' + JSON.stringify(change));
+  })
+
+  feed.on('timeout', function(state) {
+    var seconds = state.elapsed_ms / 1000;
+    var hb = state.heartbeat / 1000;
+    puts('Timeout after ' + seconds + 's inactive, heartbeat=' + hb + 's');
+  })
+
+  feed.on('retry', function(state) {
+    if(require.isBrowser)
+      puts('Long polling since ' + state.since);
+    else
+      puts('Retry since ' + state.since + ' after ' + state.after + 'ms');
+  })
+
+  feed.on('response', function() {
+    puts('Streaming response:');
+  })
+
+  feed.on('error', function(er) {
+    //console.error(er);
+    console.error('Changes error ============\n' + er.stack);
+    setTimeout(function() { process.exit(0) }, 100);
+  })
+
+  process.on('uncaughtException', function(er) {
+    puts('========= UNCAUGHT EXCEPTION; This is bad');
+    puts(er.stack);
+    setTimeout(function() { process.exit(1) }, 100);
+  })
+
+  feed.follow();
+}
+
+exports.main = main;
+if(!require.isBrowser && process.argv[1] == module.filename)
+  main();

data/server/node_modules/cradle/node_modules/follow/lib/feed.js

@@ -0,0 +1,556 @@
+// Core routines for event emitters
+//
+// Copyright 2011 Iris Couch
+//
+//    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.
+
+var lib = require('../lib')
+  , util = require('util')
+  , events = require('events')
+  , request = require('request')
+  , Changes = require('./stream').Changes
+  , querystring = require('querystring')
+
+// Use the library timeout functions, primarily so the test suite can catch errors.
+var setTimeout = lib.setTimeout
+  , clearTimeout = lib.clearTimeout
+
+var DEFAULT_HEARTBEAT = 30000;
+var HEARTBEAT_TIMEOUT_COEFFICIENT = 1.25; // E.g. heartbeat 1000ms would trigger a timeout after 1250ms of no heartbeat.
+var DEFAULT_MAX_RETRY_SECONDS     = 60 * 60;
+var INITIAL_RETRY_DELAY           = 1000;
+
+var FEED_PARAMETERS   = ['since', 'limit', 'feed', 'heartbeat', 'filter', 'include_docs'];
+
+var EventEmitter = events.EventEmitter2 || events.EventEmitter;
+
+
+util.inherits(Feed, EventEmitter);
+function Feed (opts) {
+  var self = this;
+  EventEmitter.call(self);
+
+  self.feed = 'continuous';
+  self.heartbeat         = DEFAULT_HEARTBEAT;
+  self.max_retry_seconds = DEFAULT_MAX_RETRY_SECONDS;
+  self.inactivity_ms = null;
+
+  self.headers = {};
+  self.request = {}; // Extra options for potentially future versions of request. The caller can supply them.
+
+  self.since = 0;
+  self.caught_up = false
+  self.retry_delay = INITIAL_RETRY_DELAY; // ms
+
+  self.query_params = {}; // Extra `req.query` values for filter functions
+
+  opts = opts || {};
+  if(typeof opts === 'string')
+    opts = {'db': opts};
+  Object.keys(opts).forEach(function(key) {
+    self[key] = opts[key];
+  })
+
+  self.pending = { request     : null
+                 , activity_at : null
+                 };
+} // Feed
+
+Feed.prototype.start =
+Feed.prototype.follow = function follow_feed() {
+  var self = this;
+
+  if(!self.db)
+    throw new Error('Database URL required');
+
+  if(self.feed !== 'continuous' && self.feed !== 'longpoll')
+    throw new Error('The only valid feed options are "continuous" and "longpoll"');
+
+  if(typeof self.heartbeat !== 'number')
+    throw new Error('Required "heartbeat" value');
+
+  self.log = lib.log4js.getLogger(self.db);
+  self.log.setLevel(process.env.follow_log_level || "info");
+
+  self.emit('start');
+  return self.confirm();
+}
+
+Feed.prototype.confirm = function confirm_feed() {
+  var self = this;
+
+  self.db_safe = lib.scrub_creds(self.db);
+
+  self.log.debug('Checking database: ' + self.db_safe);
+
+  var confirm_timeout = self.heartbeat * 3; // Give it time to look up the name, connect, etc.
+  var timeout_id = setTimeout(function() {
+    return self.die(new Error('Timeout confirming database: ' + self.db_safe));
+  }, confirm_timeout);
+
+  var headers = lib.JP(lib.JS(self.headers));
+  headers.accept = 'application/json';
+
+  var req = request({'uri':self.db, 'headers':headers}, db_response)
+  self.emit('confirm_request', req)
+
+  function db_response(er, resp, body) {
+    clearTimeout(timeout_id);
+
+    if(er)
+      return self.die(er);
+
+    var db;
+    try {
+      db = JSON.parse(body)
+    } catch(json_er) {
+      return self.emit('error', json_er)
+    }
+
+    if(!db.db_name || !db.instance_start_time)
+      return self.emit('error', new Error('Bad DB response: ' + body));
+
+    self.original_db_seq = db.update_seq
+    self.log.debug('Confirmed db: ' + self.db_safe);
+    self.emit('confirm', db);
+
+    if(self.since == 'now') {
+      self.log.debug('Query since "now" is the same as query since -1')
+      self.since = -1
+    }
+
+    if(self.since < 0) {
+      self.log.debug('Query since '+self.since+' will start at ' + (db.update_seq + self.since + 1))
+      self.since = db.update_seq + self.since + 1
+    }
+
+    // If the next change would come after the current update_seq, just fake a catchup event now.
+    if(self.original_db_seq == self.since) {
+      self.caught_up = true
+      self.emit('catchup', db.update_seq)
+    }
+
+    return self.query();
+  }
+}
+
+Feed.prototype.query = function query_feed() {
+  var self = this;
+
+  var query_params = JSON.parse(JSON.stringify(self.query_params));
+
+  FEED_PARAMETERS.forEach(function(key) {
+    if(key in self)
+      query_params[key] = self[key];
+  })
+
+  if(typeof query_params.filter !== 'string')
+    delete query_params.filter;
+
+  if(typeof self.filter === 'function' && !query_params.include_docs) {
+    self.log.debug('Enabling include_docs for client-side filter');
+    query_params.include_docs = true;
+  }
+
+  // Limit the response size for longpoll.
+  var poll_size = 100;
+  if(query_params.feed == 'longpoll' && (!query_params.limit || query_params.limit > poll_size))
+    query_params.limit = poll_size;
+
+  var feed_url = self.db + '/_changes?' + querystring.stringify(query_params);
+
+  self.headers.accept = self.headers.accept || 'application/json';
+  var req = { method : 'GET'
+            , uri    : feed_url
+            , headers: self.headers
+            , encoding: 'utf-8'
+            , onResponse: on_feed_response
+            }
+
+  req.changes_query = query_params;
+  Object.keys(self.request).forEach(function(key) {
+    req[key] = self.request[key];
+  })
+
+  var now = new Date
+    , feed_ts = lib.JDUP(now)
+    , feed_id = process.env.follow_debug ? feed_ts.match(/\.(\d\d\d)Z$/)[1] : feed_ts
+
+  self.log.debug('Feed query ' + feed_id + ': ' + lib.scrub_creds(feed_url))
+  var feed_request = request(req)
+  feed_request.on('response', function() {
+    self.log.debug('Remove feed from agent pool: ' + feed_id)
+    feed_request.req.socket.emit('agentRemove')
+  })
+
+  // The response headers must arrive within one heartbeat.
+  var response_timer = setTimeout(response_timed_out, self.heartbeat)
+    , timed_out = false
+
+  return self.emit('query', feed_request)
+
+  function response_timed_out() {
+    self.log.debug('Feed response timed out: ' + feed_id)
+    timed_out = true
+    return self.retry()
+  }
+
+  function on_feed_response(er, resp, body) {
+    clearTimeout(response_timer)
+
+    if((resp !== undefined && resp.body) || body)
+      return self.die(new Error('Cannot handle a body in the feed response: ' + lib.JS(resp.body || body)))
+
+    if(timed_out) {
+      self.log.debug('Ignoring late response: ' + feed_id);
+      return destroy_response(resp);
+    }
+
+    if(er) {
+      self.log.debug('Request error ' + feed_id + ': ' + er.stack);
+      destroy_response(resp);
+      return self.retry();
+    }
+
+    if(resp.statusCode !== 200) {
+      self.log.debug('Bad changes response ' + feed_id + ': ' + resp.statusCode);
+      destroy_response(resp);
+      return self.retry();
+    }
+
+    self.log.debug('Good response: ' + feed_id);
+    self.retry_delay = INITIAL_RETRY_DELAY;
+
+    self.emit('response', resp);
+
+    var changes_stream = new Changes
+    changes_stream.log = lib.log4js.getLogger('stream ' + self.db)
+    changes_stream.log.setLevel(self.log.level.levelStr)
+    changes_stream.feed = self.feed
+    feed_request.pipe(changes_stream)
+
+    changes_stream.created_at = now
+    changes_stream.id = function() { return feed_id }
+    return self.prep(changes_stream)
+  }
+}
+
+Feed.prototype.prep = function prep_request(changes_stream) {
+  var self = this;
+
+  var now = new Date;
+  self.pending.request = changes_stream;
+  self.pending.activity_at = now;
+  self.pending.wait_timer  = null;
+
+  // The inactivity timer is for time between *changes*, or time between the
+  // initial connection and the first change. Therefore it goes here.
+  self.change_at = now;
+  if(self.inactivity_ms) {
+    clearTimeout(self.inactivity_timer);
+    self.inactivity_timer = setTimeout(function() { self.on_inactivity() }, self.inactivity_ms);
+  }
+
+  changes_stream.on('heartbeat', handler_for('heartbeat'))
+  changes_stream.on('error', handler_for('error'))
+  changes_stream.on('data', handler_for('data'))
+  changes_stream.on('end', handler_for('end'))
+
+  return self.wait();
+
+  function handler_for(ev) {
+    var name = 'on_couch_' + ev;
+    var inner_handler = self[name];
+
+    return handle_confirmed_req_event;
+    function handle_confirmed_req_event() {
+      if(self.pending.request === changes_stream)
+        return inner_handler.apply(self, arguments);
+
+      if(!changes_stream.created_at)
+        return self.die(new Error("Received data from unknown request")); // Pretty sure this is impossible.
+
+      var s_to_now = (new Date() - changes_stream.created_at) / 1000;
+      var s_to_req = '[no req]';
+      if(self.pending.request)
+        s_to_req = (self.pending.request.created_at - changes_stream.created_at) / 1000;
+
+      var msg = ': ' + changes_stream.id() + ' to_req=' + s_to_req + 's, to_now=' + s_to_now + 's';
+
+      if(ev == 'end' || ev == 'data' || ev == 'heartbeat') {
+        self.log.debug('Old "' + ev + '": ' + changes_stream.id())
+        return destroy_req(changes_stream)
+      }
+
+      self.log.warn('Old "'+ev+'"' + msg);
+    }
+  }
+}
+
+Feed.prototype.wait = function wait_for_event() {
+  var self = this;
+  self.emit('wait');
+
+  if(self.pending.wait_timer)
+    return self.die(new Error('wait() called but there is already a wait_timer: ' + self.pending.wait_timer));
+
+  var timeout_ms = self.heartbeat * HEARTBEAT_TIMEOUT_COEFFICIENT;
+  var req_id = self.pending.request && self.pending.request.id()
+  var msg = 'Req ' + req_id + ' timeout=' + timeout_ms;
+  if(self.inactivity_ms)
+    msg += ', inactivity=' + self.inactivity_ms;
+  msg += ': ' + self.db_safe;
+
+  self.log.debug(msg);
+  self.pending.wait_timer = setTimeout(function() { self.on_timeout() }, timeout_ms);
+}
+
+Feed.prototype.got_activity = function() {
+  var self = this
+
+  if(! self.pending.wait_timer)
+    return self.die(new Error('Cannot find wait timer'))
+
+  clearTimeout(self.pending.wait_timer)
+  self.pending.wait_timer = null
+  self.pending.activity_at = new Date
+}
+
+Feed.prototype.on_couch_heartbeat = function on_couch_heartbeat() {
+  var self = this
+
+  self.got_activity()
+  if(self.dead)
+    return self.log.debug('Skip heartbeat processing for dead feed')
+
+  self.emit('heartbeat')
+
+  if(self.dead)
+    return self.log.debug('No wait: heartbeat listener stopped this feed')
+  self.wait()
+}
+
+Feed.prototype.on_couch_data = function on_couch_data(change) {
+  var self = this;
+  self.log.debug('Data from ' + self.pending.request.id());
+
+  self.got_activity()
+  if(self.dead)
+    return self.log.debug('Skip data processing for dead feed')
+
+  // The changes stream guarantees that this data is valid JSON.
+  change = JSON.parse(change)
+
+  //self.log.debug('Object:\n' + util.inspect(change));
+  if('last_seq' in change) {
+    self.log.warn('Stopping upon receiving a final message: ' + JSON.stringify(change))
+    var del_er = new Error('Database deleted after change: ' + change.last_seq)
+    del_er.deleted = true
+    del_er.last_seq = change.last_seq
+    return self.die(del_er)
+  }
+
+  if(!change.seq)
+    return self.die(new Error('Change has no .seq field: ' + JSON.stringify(change)))
+
+  self.on_change(change)
+
+  // on_change() might work its way all the way to a "change" event, and the listener
+  // might call .stop(), which means among other things that no more events are desired.
+  // The die() code sets a self.dead flag to indicate this.
+  if(self.dead)
+    return self.log.debug('No wait: change listener stopped this feed')
+  self.wait()
+}
+
+Feed.prototype.on_timeout = function on_timeout() {
+  var self = this;
+  self.log.debug('Timeout')
+
+  var now = new Date;
+  var elapsed_ms = now - self.pending.activity_at;
+
+  self.emit('timeout', {elapsed_ms:elapsed_ms, heartbeat:self.heartbeat, id:self.pending.request.id()});
+
+  /*
+  var msg = ' for timeout after ' + elapsed_ms + 'ms; heartbeat=' + self.heartbeat;
+  if(!self.pending.request.id)
+    self.log.warn('Closing req (no id) ' + msg + ' req=' + util.inspect(self.pending.request));
+  else
+    self.log.warn('Closing req ' + self.pending.request.id() + msg);
+  */
+
+  destroy_req(self.pending.request);
+  self.retry()
+}
+
+Feed.prototype.retry = function retry() {
+  var self = this;
+
+  clearTimeout(self.pending.wait_timer);
+  self.pending.wait_timer = null;
+
+  self.log.debug('Retry since=' + self.since + ' after ' + self.retry_delay + 'ms ')
+  self.emit('retry', {since:self.since, after:self.retry_delay, db:self.db_safe});
+
+  self.retry_timer = setTimeout(function() { self.query() }, self.retry_delay);
+
+  var max_retry_ms = self.max_retry_seconds * 1000;
+  self.retry_delay *= 2;
+  if(self.retry_delay > max_retry_ms)
+    self.retry_delay = max_retry_ms;
+}
+
+Feed.prototype.on_couch_end = function on_couch_end() {
+  var self = this;
+
+  self.log.debug('Changes feed ended ' + self.pending.request.id());
+  self.pending.request = null;
+  return self.retry();
+}
+
+Feed.prototype.on_couch_error = function on_couch_error(er) {
+  var self = this;
+
+  self.log.debug('Changes query eror: ' + lib.JS(er.stack));
+  return self.retry();
+}
+
+Feed.prototype.stop = function(val) {
+  var self = this
+  self.log.debug('Stop')
+
+  // Die with no errors.
+  self.die()
+  self.emit('stop', val);
+}
+
+Feed.prototype.die = function(er) {
+  var self = this;
+
+  if(er)
+    self.log.fatal('Fatal error: ' + er.stack);
+
+  // Warn code executing later that death has occured.
+  self.dead = true
+
+  clearTimeout(self.retry_timer)
+  clearTimeout(self.inactivity_timer)
+  clearTimeout(self.pending.wait_timer)
+
+  self.inactivity_timer = null
+  self.pending.wait_timer = null
+
+  var req = self.pending.request;
+  self.pending.request = null;
+  if(req) {
+    self.log.debug('Destroying req ' + req.id());
+    destroy_req(req);
+  }
+
+  if(er)
+    self.emit('error', er);
+}
+
+Feed.prototype.on_change = function on_change(change) {
+  var self = this;
+
+  if(!change.seq)
+    return self.die(new Error('No seq value in change: ' + lib.JS(change)));
+
+  if(change.seq <= self.since) {
+    self.log.debug('Bad seq value ' + change.seq + ' since=' + self.since);
+    return destroy_req(self.pending.request);
+  }
+
+  if(!self.caught_up && change.seq >= self.original_db_seq) {
+    self.caught_up = true
+    self.emit('catchup', change.seq)
+  }
+
+  if(typeof self.filter !== 'function')
+    return self.on_good_change(change);
+
+  if(!change.doc)
+    return self.die(new Error('Internal filter needs .doc in change ' + change.seq));
+
+  // Don't let the filter mutate the real data.
+  var doc = lib.JDUP(change.doc);
+  var req = lib.JDUP({'query': self.pending.request.changes_query});
+
+  var result = false;
+  try {
+    result = self.filter.apply(null, [doc, req]);
+  } catch (er) {
+    self.log.debug('Filter error', er);
+  }
+
+  result = (result && true) || false;
+  if(result) {
+    self.log.debug('Builtin filter PASS for change: ' + change.seq);
+    return self.on_good_change(change);
+  } else
+    self.log.debug('Builtin filter FAIL for change: ' + change.seq);
+}
+
+Feed.prototype.on_good_change = function on_good_change(change) {
+  var self = this;
+
+  if(self.inactivity_ms && !self.inactivity_timer)
+    return self.die(new Error('Cannot find inactivity timer during change'));
+
+  clearTimeout(self.inactivity_timer);
+  self.inactivity_timer = null;
+  if(self.inactivity_ms)
+    self.inactivity_timer = setTimeout(function() { self.on_inactivity() }, self.inactivity_ms);
+
+  self.change_at = new Date;
+  self.since = change.seq;
+  self.emit('change', change);
+}
+
+Feed.prototype.on_inactivity = function on_inactivity() {
+  var self = this;
+  var now = new Date;
+  var elapsed_ms = now - self.change_at;
+  var elapsed_s  = elapsed_ms / 1000;
+
+  return self.die(new Error('Req ' + self.pending.request.id() + ' made no changes for ' + elapsed_s + 's'));
+}
+
+module.exports = { "Feed" : Feed
+                 };
+
+
+/*
+ * Utilities
+ */
+
+function destroy_req(req) {
+  if(req)
+    destroy_response(req.response)
+
+  if(req && typeof req.destroy == 'function')
+    req.destroy()
+}
+
+function destroy_response(response) {
+  if(!response)
+    return;
+
+  if(typeof response.abort === 'function')
+    response.abort();
+
+  if(response.connection)
+    response.connection.destroy();
+}