agent/pkg/agentic/status.go

// SPDX-License-Identifier: EUPL-1.2

package agentic

import (
	"context"
	"time"

	core "dappco.re/go/core"
	"github.com/modelcontextprotocol/go-sdk/mcp"
)

// result := ReadStatusResult(workspaceDir)
// if result.OK && result.Value.(*WorkspaceStatus).Status == "completed" { autoCreatePR(workspaceDir) }
type WorkspaceStatus struct {
	Status    string    `json:"status"`               // running, completed, blocked, failed
	Agent     string    `json:"agent"`                // gemini, claude, codex
	Repo      string    `json:"repo"`                 // target repo
	Org       string    `json:"org,omitempty"`        // forge org (e.g. "core")
	Task      string    `json:"task"`                 // task description
	Branch    string    `json:"branch,omitempty"`     // git branch name
	Issue     int       `json:"issue,omitempty"`      // forge issue number
	PID       int       `json:"pid,omitempty"`        // OS process ID (if running)
	ProcessID string    `json:"process_id,omitempty"` // go-process ID for managed lookup
	StartedAt time.Time `json:"started_at"`           // when dispatch started
	UpdatedAt time.Time `json:"updated_at"`           // last status change
	Question  string    `json:"question,omitempty"`   // from BLOCKED.md
	Runs      int       `json:"runs"`                 // how many times dispatched/resumed
	PRURL     string    `json:"pr_url,omitempty"`     // pull request URL (after PR created)
}

// r := c.QUERY(agentic.WorkspaceQuery{})
// if r.OK { reg := r.Value.(*core.Registry[*WorkspaceStatus]) }
// r := c.QUERY(agentic.WorkspaceQuery{Name: "core/go-io/task-5"})
type WorkspaceQuery struct {
	Name   string // specific workspace (empty = all)
	Status string // filter by status (empty = all)
}

func writeStatus(workspaceDir string, status *WorkspaceStatus) error {
	r := writeStatusResult(workspaceDir, status)
	if !r.OK {
		err, _ := r.Value.(error)
		if err == nil {
			err = core.E("writeStatus", "failed to write status", nil)
		}
		return err
	}
	return nil
}

// result := writeStatusResult("/srv/core/workspace/core/go-io/task-5", &WorkspaceStatus{Status: "running"})
// if result.OK { return }
func writeStatusResult(workspaceDir string, status *WorkspaceStatus) core.Result {
	if status == nil {
		return core.Result{Value: core.E("writeStatus", "status is required", nil), OK: false}
	}
	status.UpdatedAt = time.Now()
	statusPath := WorkspaceStatusPath(workspaceDir)
	if r := fs.WriteAtomic(statusPath, core.JSONMarshalString(status)); !r.OK {
		err, _ := r.Value.(error)
		if err == nil {
			core.Warn("agentic.writeStatus: failed to write status", "path", statusPath)
			return core.Result{Value: core.E("writeStatus", "failed to write status", nil), OK: false}
		}
		core.Warn("agentic.writeStatus: failed to write status", "path", statusPath, "reason", err)
		return core.Result{Value: core.E("writeStatus", "failed to write status", err), OK: false}
	}
	return core.Result{OK: true}
}

// result := ReadStatusResult("/path/to/workspace")
// if result.OK { workspaceStatus := result.Value.(*WorkspaceStatus) }
func ReadStatusResult(workspaceDir string) core.Result {
	r := fs.Read(WorkspaceStatusPath(workspaceDir))
	if !r.OK {
		err, _ := r.Value.(error)
		if err == nil {
			return core.Result{Value: core.E("ReadStatusResult", "status not found", nil), OK: false}
		}
		return core.Result{Value: core.E("ReadStatusResult", core.Concat("status not found for ", workspaceDir), err), OK: false}
	}
	var s WorkspaceStatus
	if parseResult := core.JSONUnmarshalString(r.Value.(string), &s); !parseResult.OK {
		err, _ := parseResult.Value.(error)
		if err == nil {
			return core.Result{Value: core.E("ReadStatusResult", "invalid status json", nil), OK: false}
		}
		return core.Result{Value: core.E("ReadStatusResult", "invalid status json", err), OK: false}
	}
	return core.Result{Value: &s, OK: true}
}

// result := ReadStatusResult("/path/to/workspace")
// workspaceStatus, ok := workspaceStatusValue(result)
func workspaceStatusValue(result core.Result) (*WorkspaceStatus, bool) {
	workspaceStatus, ok := result.Value.(*WorkspaceStatus)
	if !ok || workspaceStatus == nil {
		return nil, false
	}
	return workspaceStatus, true
}

// input := agentic.StatusInput{Workspace: "core/go-io/task-42", Limit: 50}
type StatusInput struct {
	Workspace string `json:"workspace,omitempty"` // specific workspace name, or empty for all
	Limit     int    `json:"limit,omitempty"`     // max results (default 100)
	Status    string `json:"status,omitempty"`    // filter: running, completed, failed, blocked
}

// out := agentic.StatusOutput{Total: 42, Running: 3, Queued: 10, Completed: 25}
type StatusOutput struct {
	Total     int           `json:"total"`
	Running   int           `json:"running"`
	Queued    int           `json:"queued"`
	Completed int           `json:"completed"`
	Failed    int           `json:"failed"`
	Blocked   []BlockedInfo `json:"blocked,omitempty"`
}

// info := agentic.BlockedInfo{Name: "core/go-io/task-4", Repo: "go-io", Question: "Which API version?"}
type BlockedInfo struct {
	Name     string `json:"name"`
	Repo     string `json:"repo"`
	Agent    string `json:"agent"`
	Question string `json:"question"`
}

func (s *PrepSubsystem) registerStatusTool(server *mcp.Server) {
	mcp.AddTool(server, &mcp.Tool{
		Name:        "agentic_status",
		Description: "List agent workspaces and their status (running, completed, blocked, failed). Shows blocked agents with their questions.",
	}, s.status)
}

func (s *PrepSubsystem) status(ctx context.Context, _ *mcp.CallToolRequest, input StatusInput) (*mcp.CallToolResult, StatusOutput, error) {
	statusFiles := WorkspaceStatusPaths()
	var runtime *core.Core
	if s.ServiceRuntime != nil {
		runtime = s.Core()
	}

	var out StatusOutput

	for _, statusPath := range statusFiles {
		workspaceDir := core.PathDir(statusPath)
		name := WorkspaceName(workspaceDir)

		result := ReadStatusResult(workspaceDir)
		workspaceStatus, ok := workspaceStatusValue(result)
		if !ok {
			out.Total++
			out.Failed++
			continue
		}

		// If status is "running", check whether the managed process is still alive.
		if workspaceStatus.Status == "running" && (workspaceStatus.ProcessID != "" || workspaceStatus.PID > 0) {
			if !ProcessAlive(runtime, workspaceStatus.ProcessID, workspaceStatus.PID) {
				blockedPath := workspaceBlockedPath(workspaceDir)
				if r := fs.Read(blockedPath); r.OK {
					workspaceStatus.Status = "blocked"
					workspaceStatus.Question = core.Trim(r.Value.(string))
				} else {
					if len(workspaceLogFiles(workspaceDir)) == 0 {
						workspaceStatus.Status = "failed"
						workspaceStatus.Question = "Agent process died (no output log)"
					} else {
						workspaceStatus.Status = "completed"
					}
				}
				writeStatusResult(workspaceDir, workspaceStatus)
			}
		}

		out.Total++
		switch workspaceStatus.Status {
		case "running":
			out.Running++
		case "queued":
			out.Queued++
		case "completed":
			out.Completed++
		case "failed":
			out.Failed++
		case "blocked":
			out.Blocked = append(out.Blocked, BlockedInfo{
				Name:     name,
				Repo:     workspaceStatus.Repo,
				Agent:    workspaceStatus.Agent,
				Question: workspaceStatus.Question,
			})
		}
	}

	return nil, out, nil
}