Set SQLite busy_timeout to prevent SQLITE_BUSY errors (see #8)

CHANGES.md

@@ -1,5 +1,14 @@
 # Changelog
 
+## Current merge window
+
+To be released.  Expected January 4th, 2018.
+
+Fixes after first day of heavy load.
+
+ - Set SQLite busy_timeout to prevent SQLITE_BUSY errors (see #8)
+
+
 ## Patch release: v1.0.2
 
 January 2nd, 2018...  Happy new year!

src/Server.hx

@@ -58,6 +58,8 @@ class Server {
 		sys.db.Manager.initialize();
 
 		assert(cnx.dbName() == "SQLite");
+		cnx.request("PRAGMA busy_timeout=5000");
+		trace('sqlite: busy_timeout set');
 		var journalMode = cnx.request("PRAGMA journal_mode").getResult(0);
 		if (journalMode == "delete") {
 			cnx.request("PRAGMA page_size=4096");

src/async/Handler.hx

@@ -29,7 +29,8 @@ class Handler {
 		var inst:Queue = Module.local().getExports()[NAME];
 		if (inst != null) {
 			Server.shortId = Server.requestId = 'async-${crypto.Random.global.readHex(2)}';
-			trace('async: init handler (${Server.codeVersion})');
+			sys.db.Manager.cnx.request("PRAGMA busy_timeout=10000");
+			trace('async: init handler, busy_timeout extended (${Server.codeVersion})');
 			var h = new Handler(inst);
 			h.loop();
 			return true;