Add more resiliancy to listing kube API resource kinds (#6995)

Signed-off-by: Sebastian Malton <sebastian@malton.name>

Signed-off-by: Sebastian Malton <sebastian@malton.name>

packages/core/src/common/utils/backoff-caller.ts

@@ -0,0 +1,70 @@
+/**
+ * Copyright (c) OpenLens Authors. All rights reserved.
+ * Licensed under MIT License. See LICENSE in root directory for more information.
+ */
+
+import type { AsyncResult } from "./async-result";
+import { delay } from "./delay";
+import { noop } from "./noop";
+
+/**
+ * @param error The error that resulted in the failure
+ * @param attempt The 1-index attempt count
+ */
+export type OnIntermediateError<E> = (error: E, attempt: number) => void;
+
+export interface BackoffCallerOptions<E> {
+  /**
+   * Called when an attempt fails
+   */
+  onIntermediateError?: OnIntermediateError<E>;
+
+  /**
+   * @default 5
+   */
+  maxAttempts?: number;
+
+  /**
+   * In miliseconds
+   * @default 1000
+   */
+  initialTimeout?: number;
+
+  /**
+   * @default 2
+   */
+  scaleFactor?: number;
+}
+
+/**
+ * Calls `fn` once and then again (with exponential delay between each attempt) up to `options.maxAttempts` times.
+ * @param fn The function to repeatedly attempt
+ * @returns The first success or the last failure
+ */
+export const backoffCaller = async <T, E, R extends AsyncResult<T, E>>(fn: () => Promise<R>, options?: BackoffCallerOptions<E>): Promise<R> => {
+  const {
+    initialTimeout = 1000,
+    maxAttempts = 5,
+    onIntermediateError = noop as OnIntermediateError<E>,
+    scaleFactor = 2,
+  } = options ?? {};
+
+  let timeout = initialTimeout;
+  let attempt = 0;
+  let result: R;
+
+  do {
+    result = await fn();
+
+    if (result.callWasSuccessful) {
+      return result;
+    }
+
+    onIntermediateError(result.error, attempt + 1);
+
+    await delay(timeout);
+    timeout *= scaleFactor;
+  } while (attempt += 1, attempt < maxAttempts);
+
+  return result;
+};