Function json_delpay

lightningd/pay.c:1660–1726

}

static struct command_result *json_delpay(struct command *cmd,
						const char *buffer,
						const jsmntok_t *obj UNNEEDED,
						const jsmntok_t *params)
{
	struct json_stream *response;
	const struct wallet_payment **payments;
	enum wallet_payment_status *status;
	struct sha256 *payment_hash;
	u64 *groupid, *partid;
	bool found;

	if (!param(cmd, buffer, params,
		   p_req("payment_hash", param_sha256, &payment_hash),
		   p_req("status", param_payment_status_nopending, &status),
		   p_opt("partid", param_u64, &partid),
		   p_opt("groupid", param_u64, &groupid),
		   NULL))
		return command_param_failed();

	if ((partid != NULL) != (groupid != NULL))
		return command_fail(cmd, JSONRPC2_INVALID_PARAMS,
				    "Must set both partid and groupid, or neither");

	payments = wallet_payment_list(cmd, cmd->ld->wallet, payment_hash);

	if (tal_count(payments) == 0)
		return command_fail(cmd, PAY_NO_SUCH_PAYMENT, "Unknown payment with payment_hash: %s",
				    type_to_string(tmpctx, struct sha256, payment_hash));

	found = false;
	for (int i = 0; i < tal_count(payments); i++) {
		if (groupid && payments[i]->groupid != *groupid)
			continue;
		if (partid && payments[i]->partid != *partid)
			continue;

		found = true;
		if (payments[i]->status != *status) {
			return command_fail(cmd, PAY_STATUS_UNEXPECTED, "Payment with hash %s has %s status but it should be %s",
					type_to_string(tmpctx, struct sha256, payment_hash),
					payment_status_to_string(payments[i]->status),
					payment_status_to_string(*status));
		}
	}

	if (!found) {
		return command_fail(cmd, PAY_NO_SUCH_PAYMENT,
				    "No payment for that payment_hash with that partid and groupid");
	}

	wallet_payment_delete(cmd->ld->wallet, payment_hash, partid, groupid);

	response = json_stream_success(cmd);
	json_array_start(response, "payments");
	for (int i = 0; i < tal_count(payments); i++) {
		if (groupid && payments[i]->groupid != *groupid)
			continue;