Add a node.js version of analysis.pl.

diff --git a/www/serve-analysis.js b/www/serve-analysis.js
new file mode 100644 (file)
index 0000000..56845ee
--- /dev/null
+++ b/www/serve-analysis.js
@@ -0,0 +1,127 @@
+// node.js version of analysis.pl; hopefully scales a bit better
+// for this specific kind of task.
+
+// Modules.
+var http = require('http');
+var fs = require('fs');
+var url = require('url');
+var querystring = require('querystring');
+
+// Constants.
+var json_filename = '/srv/analysis.sesse.net/www/analysis.json';
+
+// The current contents of the file to hand out, and its last modified time.
+var json_contents = null;
+var json_last_modified = null;
+
+// The list of clients that are waiting for new data to show up,
+// and their associated timers. Uniquely keyed by request_id
+// so that we can take them out of the queue if they time out.
+var sleeping_clients = {};
+var request_id = 0;
+
+// List of when clients were last seen, keyed by their unique ID.
+// Used to show a viewer count to the user.
+var last_seen_clients = {};
+
+var reread_file = function() {
+       fs.open(json_filename, 'r+', function(err, fd) {
+               if (err) throw err;
+               fs.fstat(fd, function(err, st) {
+                       if (err) throw err;
+                       var buffer = new Buffer(1048576);
+                       fs.read(fd, buffer, 0, 1048576, 0, function(err, bytesRead, buffer) {
+                               if (err) throw err;
+                               fs.close(fd, function() {
+                                       json_contents = buffer.toString('utf8', 0, bytesRead);
+                                       json_last_modified = st.mtime.getTime();
+                                       possibly_wakeup_clients();
+                               });
+                       });
+               });
+       });
+}
+var possibly_wakeup_clients = function() {
+       for (var i in sleeping_clients) {
+               clearTimeout(sleeping_clients[i].timer);
+               send_json(sleeping_clients[i].response);
+       }
+       sleeping_clients = {};
+}
+var send_404 = function(response) {
+       response.writeHead(404, {
+               'Content-Type': 'text/plain',
+       });
+       response.write('Something went wrong. Sorry.');
+       response.end();
+}
+var send_json = function(response) {
+       response.writeHead(200, {
+               'Content-Type': 'text/json',
+               'X-Remoteglot-Last-Modified': json_last_modified,
+               'X-Remoteglot-Num-Viewers': count_viewers(),
+               'Access-Control-Allow-Origin': 'http://analysis.sesse.net',
+               'Access-Control-Expose-Headers': 'X-Remoteglot-Last-Modified, X-Remoteglot-Num-Viewers',
+               'Expires': 'Mon, 01 Jan 1970 00:00:00 UTC',
+       });
+       response.write(json_contents);
+       response.end();
+}
+var timeout_client = function(client) {
+       send_json(client.response);
+       delete sleeping_clients[client.request_id];
+}
+var count_viewers = function() {
+       var now = (new Date).getTime();
+
+       // Go through and remove old viewers, and count them at the same time.
+       var new_last_seen_clients = {};
+       var num_viewers = 0;
+       for (var unique in last_seen_clients) {
+               if (now - last_seen_clients[unique] < 60000) {
+                       ++num_viewers;
+                       new_last_seen_clients[unique] = last_seen_clients[unique];
+               }
+       }
+       last_seen_clients = new_last_seen_clients;
+       return num_viewers;
+}
+
+// Set up a watcher to catch changes to the file, then do an initial read
+// to make sure we have a copy.
+fs.watch(json_filename, reread_file);
+reread_file();
+
+http.createServer(function(request, response) {
+       var u = url.parse(request.url, true);
+       var ims = (u.query)['ims'];
+       var unique = (u.query)['unique'];
+
+       console.log((new Date).getTime()*1e-3 + " " + request.url);
+
+       if (u.pathname !== '/analysis.pl') {
+               // This is not the request you are looking for.
+               send_404(response);
+               return;
+       }
+
+       if (unique) {
+               last_seen_clients[unique] = (new Date).getTime();
+       }
+
+       // If we already have something newer than what the user has,
+       // just send it out and be done with it.
+       if (!ims || json_last_modified > ims) {
+               send_json(response);
+               return;
+       }
+
+       // OK, so we need to hang until we have something newer.
+       // Put the user on the wait list; if we don't get anything
+       // in 30 seconds, though, we'll send something anyway.
+       var client = {};
+       client.response = response;
+       client.timer = setTimeout(function() { timeout_client(client); }, 30000);
+       client.request_id = request_id;
+       sleeping_clients[request_id++] = client;
+}).listen(5000);