Add pagination to ClusterTaskHistory (#617)

* Add pagination to cluster task history

* Remove task history limit/offset defaults

Author: strahe

web/api/webrpc/cluster.go

@@ -103,9 +103,8 @@ type TaskHistorySummary struct {
 	CompletedBy string
 }
 
-func (a *WebRPC) ClusterTaskHistory(ctx context.Context) ([]TaskHistorySummary, error) {
-	limit := len(a.taskSPIDs)
-	rows, err := a.deps.DB.Query(ctx, "SELECT id, name, task_id, posted, work_start, work_end, result, err, completed_by_host_and_port FROM harmony_task_history ORDER BY work_end DESC LIMIT $1", limit)
+func (a *WebRPC) ClusterTaskHistory(ctx context.Context, limit, offset int) ([]TaskHistorySummary, error) {
+	rows, err := a.deps.DB.Query(ctx, "SELECT id, name, task_id, posted, work_start, work_end, result, err, completed_by_host_and_port FROM harmony_task_history ORDER BY work_end DESC LIMIT $1 OFFSET $2", limit, offset)
 	if err != nil {
 		return nil, err // Handle error
 	}

web/static/cluster-task-history.mjs

@@ -8,7 +8,7 @@ customElements.define('cluster-task-history', class ClusterTaskHistory extends L
         this.loadData();
     }
     async loadData() {
-        this.data = await RPCCall('ClusterTaskHistory');
+        this.data = await RPCCall('ClusterTaskHistory', [20, 0]);
         setTimeout(() => this.loadData(), 2000);
         this.requestUpdate();
     }