autoclean: new interface

In preparation for more things being autocleaned.

Signed-off-by: Rusty Russell <rusty@rustcorp.com.au>

contrib/pyln-client/pyln/client/lightning.py

@@ -531,6 +531,15 @@ class LightningRpc(UnixDomainSocketRpc):
         }
         return self.call("autocleaninvoice", payload)
 
+    def autoclean_status(self, subsystem=None):
+        """
+        Print status of autocleaning (optionally, just for {subsystem}).
+        """
+        payload = {
+            "subsystem": subsystem,
+        }
+        return self.call("autoclean-status", payload)
+
     def check(self, command_to_check, **kwargs):
         """
         Checks if a command is valid without running it.

doc/lightningd-config.5.md

@@ -430,18 +430,12 @@ have to do that.
 This option specifies that these (comma-separated) types are to be
 accepted, and ignored.
 
-### Invoice control options:
+### Cleanup control options:
 
-* **autocleaninvoice-cycle**=*SECONDS* [plugin `autoclean`]
+* **autoclean-cycle**=*SECONDS* [plugin `autoclean`]
 
-  Perform cleanup of expired invoices every *SECONDS* seconds, or disable
-if 0. Usually unpaid expired invoices are uninteresting, and just take
-up space in the database.
-
-* **autocleaninvoice-expired-by**=*SECONDS* [plugin `autoclean`]
-
-  Control how long invoices must have been expired before they are cleaned
-(if *autocleaninvoice-cycle* is non-zero).
+  Perform search for things to clean every *SECONDS* seconds (default
+3600, or 1 hour, which is usually sufficient).
 
 ### Payment control options:
 

plugins/autoclean.c

@@ -1,14 +1,55 @@
 #include "config.h"
 #include <ccan/array_size/array_size.h>
+#include <ccan/mem/mem.h>
+#include <ccan/tal/str/str.h>
 #include <common/json_param.h>
 #include <common/json_stream.h>
 #include <plugins/libplugin.h>
 
-static u64 cycle_seconds = 0, expired_by = 86400;
+enum subsystem {
+	EXPIREDINVOICES,
+#define NUM_SUBSYSTEM (EXPIREDINVOICES + 1)
+};
+static const char *subsystem_str[] = {
+	"expiredinvoices",
+};
+
+static const char *subsystem_to_str(enum subsystem subsystem)
+{
+	assert(subsystem >= 0 && subsystem < NUM_SUBSYSTEM);
+	return subsystem_str[subsystem];
+}
+
+static bool json_to_subsystem(const char *buffer, const jsmntok_t *tok,
+			      enum subsystem *subsystem)
+{
+	for (size_t i = 0; i < NUM_SUBSYSTEM; i++) {
+		if (memeqstr(buffer + tok->start, tok->end - tok->start,
+			     subsystem_str[i])) {
+			*subsystem = i;
+			return true;
+		}
+	}
+	return false;
+}
+
+/* For deprecated API, setting this to zero disabled autoclean */
+static u64 deprecated_cycle_seconds = UINT64_MAX;
+static u64 cycle_seconds = 3600;
+static u64 subsystem_age[NUM_SUBSYSTEM];
+
 static struct plugin_timer *cleantimer;
 
 static void do_clean(void *cb_arg);
 
+static const char *datastore_path(const tal_t *ctx,
+				  enum subsystem subsystem,
+				  const char *field)
+{
+	return tal_fmt(ctx, "autoclean/%s/%s",
+		       subsystem_to_str(subsystem), field);
+}
+
 static struct command_result *ignore(struct command *timer,
 				     const char *buf,
 				     const jsmntok_t *result,
@@ -22,11 +63,17 @@ static struct command_result *ignore(struct command *timer,
 static void do_clean(void *cb_arg)
 {
 	struct plugin *p = cb_arg;
+
+	if (!subsystem_age[EXPIREDINVOICES]) {
+		ignore(NULL, NULL, NULL, p);
+		return;
+	}
+
 	/* FIXME: delexpiredinvoice should be in our plugin too! */
 	struct out_req *req = jsonrpc_request_start(p, NULL, "delexpiredinvoice",
 						    ignore, ignore, p);
 	json_add_u64(req->js, "maxexpirytime",
-		     time_now().ts.tv_sec - expired_by);
+		     time_now().ts.tv_sec - subsystem_age[EXPIREDINVOICES]);
 
 	send_outreq(p, req);
 }
@@ -45,36 +92,141 @@ static struct command_result *json_autocleaninvoice(struct command *cmd,
 		   NULL))
 		return command_param_failed();
 
-	cycle_seconds = *cycle;
-	expired_by = *exby;
-
 	cleantimer = tal_free(cleantimer);
 
-	if (cycle_seconds == 0) {
+	if (*cycle == 0) {
+		subsystem_age[EXPIREDINVOICES] = 0;
 		response = jsonrpc_stream_success(cmd);
 		json_add_bool(response, "enabled", false);
 		return command_finished(cmd, response);
 	}
 
+	cycle_seconds = *cycle;
+	subsystem_age[EXPIREDINVOICES] = *exby;
 	cleantimer = plugin_timer(cmd->plugin, time_from_sec(cycle_seconds),
 				  do_clean, cmd->plugin);
 
 	response = jsonrpc_stream_success(cmd);
 	json_add_bool(response, "enabled", true);
 	json_add_u64(response, "cycle_seconds", cycle_seconds);
-	json_add_u64(response, "expired_by", expired_by);
+	json_add_u64(response, "expired_by", subsystem_age[EXPIREDINVOICES]);
 	return command_finished(cmd, response);
 }
 
+static struct command_result *param_age(struct command *cmd, const char *name,
+					const char *buffer, const jsmntok_t *tok,
+					uint64_t **num)
+{
+	*num = tal(cmd, uint64_t);
+	if (json_to_u64(buffer, tok, *num) && *num != 0)
+		return NULL;
+
+	if (json_tok_streq(buffer, tok, "never")) {
+		**num = 0;
+		return NULL;
+	}
+
+	return command_fail_badparam(cmd, name, buffer, tok,
+				     "should be an positive 64 bit integer or 'never'");
+}
+
+static struct command_result *param_subsystem(struct command *cmd,
+					      const char *name,
+					      const char *buffer,
+					      const jsmntok_t *tok,
+					      enum subsystem **subsystem)
+{
+	*subsystem = tal(cmd, enum subsystem);
+	if (json_to_subsystem(buffer, tok, *subsystem))
+		return NULL;
+
+	return command_fail_badparam(cmd, name, buffer, tok,
+				     "should be a valid subsystem name");
+}
+
+static struct command_result *json_success_subsystems(struct command *cmd,
+						      const enum subsystem *subsystem)
+{
+	struct json_stream *response = jsonrpc_stream_success(cmd);
+
+	json_object_start(response, "autoclean");
+	for (enum subsystem i = 0; i < NUM_SUBSYSTEM; i++) {
+		if (subsystem && i != *subsystem)
+			continue;
+		json_object_start(response, subsystem_to_str(i));
+		json_add_bool(response, "enabled", subsystem_age[i] != 0);
+		if (subsystem_age[i] != 0)
+			json_add_u64(response, "age", subsystem_age[i]);
+		/* FIXME: Add stats! */
+		json_object_end(response);
+	}
+	json_object_end(response);
+	return command_finished(cmd, response);
+}
+
+static struct command_result *json_autoclean_status(struct command *cmd,
+						    const char *buffer,
+						    const jsmntok_t *params)
+{
+	enum subsystem *subsystem;
+
+	if (!param(cmd, buffer, params,
+		   p_opt("subsystem", param_subsystem, &subsystem),
+		   NULL))
+		return command_param_failed();
+
+	return json_success_subsystems(cmd, subsystem);
+}
+
+static struct command_result *json_autoclean(struct command *cmd,
+					     const char *buffer,
+					     const jsmntok_t *params)
+{
+	enum subsystem *subsystem;
+	u64 *age;
+
+	if (!param(cmd, buffer, params,
+		   p_req("subsystem", param_subsystem, &subsystem),
+		   p_req("age", param_age, &age),
+		   NULL))
+		return command_param_failed();
+
+	subsystem_age[*subsystem] = *age;
+	jsonrpc_set_datastore_string(cmd->plugin, cmd,
+				     datastore_path(tmpctx, *subsystem, "age"),
+				     tal_fmt(tmpctx, "%"PRIu64, *age),
+				     "create-or-replace", NULL, NULL, NULL);
+
+	return json_success_subsystems(cmd, subsystem);
+}
+
 static const char *init(struct plugin *p,
 			const char *buf UNUSED, const jsmntok_t *config UNUSED)
 {
-	if (cycle_seconds) {
-		plugin_log(p, LOG_INFORM, "autocleaning every %"PRIu64" seconds", cycle_seconds);
-		cleantimer = plugin_timer(p, time_from_sec(cycle_seconds),
-					  do_clean, p);
-	} else
-		plugin_log(p, LOG_DBG, "autocleaning not active");
+	if (deprecated_cycle_seconds != UINT64_MAX) {
+		if (deprecated_cycle_seconds == 0) {
+			plugin_log(p, LOG_DBG, "autocleaning not active");
+			return NULL;
+		} else
+			cycle_seconds = deprecated_cycle_seconds;
+	} else {
+		bool active = false;
+		for (enum subsystem i = 0; i < NUM_SUBSYSTEM; i++) {
+			if (!rpc_scan_datastore_str(p, datastore_path(tmpctx, i, "age"),
+						    JSON_SCAN(json_to_u64, &subsystem_age[i])))
+				continue;
+			if (subsystem_age[i]) {
+				/* Only print this once! */
+				if (!active)
+					plugin_log(p, LOG_INFORM, "autocleaning every %"PRIu64" seconds", cycle_seconds);
+				active = true;
+				plugin_log(p, LOG_INFORM, "cleaning %s when age > %"PRIu64" seconds",
+					   subsystem_to_str(i), subsystem_age[i]);
+			}
+		}
+	}
+
+	cleantimer = plugin_timer(p, time_from_sec(cycle_seconds), do_clean, p);
 
 	return NULL;
 }
@@ -85,8 +237,21 @@ static const struct plugin_command commands[] = { {
 	"Set up autoclean of expired invoices. ",
 	"Perform cleanup every {cycle_seconds} (default 3600), or disable autoclean if 0. "
 	"Clean up expired invoices that have expired for {expired_by} seconds (default 86400). ",
-	json_autocleaninvoice
-	}
+	json_autocleaninvoice,
+	true, /* deprecated! */
+	}, {
+	"autoclean",
+	"utility",
+	"Automatic deletion of old data (invoices, pays, forwards).",
+	"Takes {subsystem} and {age} in seconds ",
+	json_autoclean,
+	}, {
+	"autoclean-status",
+	"utility",
+	"Show status of autocleaning",
+	"Takes optional {subsystem}",
+	json_autoclean_status,
+	},
 };
 
 int main(int argc, char *argv[])
@@ -94,16 +259,21 @@ int main(int argc, char *argv[])
 	setup_locale();
 	plugin_main(argv, init, PLUGIN_STATIC, true, NULL, commands, ARRAY_SIZE(commands),
 	            NULL, 0, NULL, 0, NULL, 0,
-		    plugin_option("autocleaninvoice-cycle",
+		    plugin_option_deprecated("autocleaninvoice-cycle",
 				  "string",
 				  "Perform cleanup of expired invoices every"
 				  " given seconds, or do not autoclean if 0",
-				  u64_option, &cycle_seconds),
-		    plugin_option("autocleaninvoice-expired-by",
+				  u64_option, &deprecated_cycle_seconds),
+		    plugin_option_deprecated("autocleaninvoice-expired-by",
 				  "string",
 				  "If expired invoice autoclean enabled,"
 				  " invoices that have expired for at least"
 				  " this given seconds are cleaned",
-				  u64_option, &expired_by),
+				  u64_option, &subsystem_age[EXPIREDINVOICES]),
+		    plugin_option("autoclean-cycle",
+				  "string",
+				  "Perform cleanup every"
+				  " given seconds",
+				  u64_option, &cycle_seconds),
 		    NULL);
 }

tests/test_invoices.py

@@ -569,8 +569,8 @@ def test_waitanyinvoice_reversed(node_factory, executor):
     assert r['label'] == 'inv1'
 
 
-def test_autocleaninvoice(node_factory):
-    l1 = node_factory.get_node()
+def test_autocleaninvoice_deprecated(node_factory):
+    l1 = node_factory.get_node(options={'allow-deprecated-apis': True})
 
     l1.rpc.invoice(amount_msat=12300, label='inv1', description='description1', expiry=4)
     l1.rpc.invoice(amount_msat=12300, label='inv2', description='description2', expiry=12)

tests/test_plugin.py

@@ -2934,6 +2934,54 @@ def test_commando_badrune(node_factory):
                     pass
 
 
+def test_autoclean(node_factory):
+    l1 = node_factory.get_node(options={'autoclean-cycle': 10})
+
+    assert l1.rpc.autoclean_status('expiredinvoices')['autoclean']['expiredinvoices']['enabled'] is False
+    l1.rpc.invoice(amount_msat=12300, label='inv1', description='description1', expiry=5)
+    l1.rpc.invoice(amount_msat=12300, label='inv2', description='description2', expiry=20)
+    l1.rpc.autoclean(subsystem='expiredinvoices', age=2)
+    assert l1.rpc.autoclean_status()['autoclean']['expiredinvoices']['enabled'] is True
+    assert l1.rpc.autoclean_status()['autoclean']['expiredinvoices']['age'] == 2
+
+    # Both should still be there.
+    assert len(l1.rpc.listinvoices('inv1')['invoices']) == 1
+    assert len(l1.rpc.listinvoices('inv2')['invoices']) == 1
+    assert l1.rpc.listinvoices('inv1')['invoices'][0]['description'] == 'description1'
+
+    # First it expires.
+    wait_for(lambda: only_one(l1.rpc.listinvoices('inv1')['invoices'])['status'] == 'expired')
+    # Now will get autocleaned
+    wait_for(lambda: l1.rpc.listinvoices('inv1')['invoices'] == [])
+
+    # Keeps settings across restarts.
+    l1.restart()
+    assert l1.rpc.autoclean_status()['autoclean']['expiredinvoices']['enabled'] is True
+    assert l1.rpc.autoclean_status()['autoclean']['expiredinvoices']['age'] == 2
+
+    # Disabling works
+    l1.rpc.autoclean(subsystem='expiredinvoices', age='never')
+    assert l1.rpc.autoclean_status()['autoclean']['expiredinvoices']['enabled'] is False
+    assert 'age' not in l1.rpc.autoclean_status()['autoclean']['expiredinvoices']
+
+    # Same with inv2.
+    wait_for(lambda: only_one(l1.rpc.listinvoices('inv2')['invoices'])['status'] == 'expired')
+
+    # Give it time to notice.
+    time.sleep(15)
+
+    assert l1.rpc.listinvoices('inv2')['invoices'] != []
+
+    # Restart keeps it disabled.
+    l1.restart()
+    assert l1.rpc.autoclean_status()['autoclean']['expiredinvoices']['enabled'] is False
+    assert 'age' not in l1.rpc.autoclean_status()['autoclean']['expiredinvoices']
+
+    # Now enable: it will get autocleaned
+    l1.rpc.autoclean(subsystem='expiredinvoices', age=2)
+    wait_for(lambda: l1.rpc.listinvoices('inv2')['invoices'] == [])
+
+
 def test_block_added_notifications(node_factory, bitcoind):
     """Test if a plugin gets notifications when a new block is found"""
     base = bitcoind.rpc.getblockchaininfo()["blocks"]