Files
fn_registry/functions/infra/services_status.go
T
egutierrez 625569485f feat(doctor): add fn doctor CLI + 14 functions for system management
Adds `fn doctor` read-only diagnostic command with subcommands artefacts,
services, sync, uses-functions, unused, and --json flag for agents.
Each subcommand wraps a registry function in functions/infra/.

New functions:
- artefact_doctor, services_status, pc_locations_drift,
  audit_uses_functions, find_unused_functions (Go diagnostics)
- backup_sqlite_db, rotate_backups, wait_for_http, wait_for_port,
  port_kill, tail_journal, pre_commit_hook_install (bash utilities)
- notify_telegram (Go HTTP)
- backup_all pipeline (tag launcher)

Plus prior session leftovers (scan_secrets_in_dirty, append_diary_entry,
git utilities, http_session_cookie_middleware, compile/full-git pipelines).

Fixes pc_locations_drift filepath.Join bug with absolute dir_path.
Documents fn doctor in CLAUDE.md, .claude/rules/fn_doctor.md (rule 23),
docs/architecture.md, CHANGELOG.md (2026-05-07), and diary entry.

First fn doctor uses-functions run found drift in 7/12 apps (deuda
para sincronizar app.md con imports reales).

Co-Authored-By: Claude Opus 4.7 (1M context) <noreply@anthropic.com>
2026-05-07 01:42:10 +02:00

135 lines
3.9 KiB
Go

package infra
import (
"database/sql"
"fmt"
"net"
"os/exec"
"regexp"
"strconv"
"strings"
"time"
_ "github.com/mattn/go-sqlite3"
)
// ServiceStatus holds the runtime status of a registered service app.
type ServiceStatus struct {
AppID string // e.g. "registry_api_go_infra"
Name string // e.g. "registry_api"
UnitName string // e.g. "registry_api.service"
UnitActive string // "active", "inactive", "failed", "not-installed", "unknown"
Port int // declared port parsed from notes/description, 0 if none
PortListening bool // true if Port > 0 and 127.0.0.1:Port is accepting TCP connections
HostMatch string // pc_id from ~/.fn_pc, or "" if unreadable
}
var portRe = regexp.MustCompile(`\b([1-9][0-9]{3,4})\b`)
// ServicesStatus queries registry.db for apps tagged "service" and returns
// their current systemd unit state and port reachability.
func ServicesStatus(registryRoot string) ([]ServiceStatus, error) {
dbPath := registryRoot + "/registry.db"
db, err := sql.Open("sqlite3", dbPath+"?_journal_mode=WAL&mode=ro")
if err != nil {
return nil, fmt.Errorf("services_status: open db: %w", err)
}
defer db.Close()
rows, err := db.Query(`SELECT id, name, COALESCE(notes,''), COALESCE(description,'') FROM apps WHERE tags LIKE '%service%'`)
if err != nil {
return nil, fmt.Errorf("services_status: query: %w", err)
}
defer rows.Close()
pcID, _ := readFnPC()
var results []ServiceStatus
for rows.Next() {
var id, name, notes, description string
if err := rows.Scan(&id, &name, &notes, &description); err != nil {
continue
}
unit := name + ".service"
active := queryUnitActive(unit)
port := parseFirstPort(notes + " " + description)
listening := false
if port > 0 {
listening = tcpListening("127.0.0.1", port, 500*time.Millisecond)
}
results = append(results, ServiceStatus{
AppID: id,
Name: name,
UnitName: unit,
UnitActive: active,
Port: port,
PortListening: listening,
HostMatch: pcID,
})
}
if err := rows.Err(); err != nil {
return nil, fmt.Errorf("services_status: rows: %w", err)
}
return results, nil
}
// queryUnitActive runs systemctl is-active, trying --user first then system.
func queryUnitActive(unit string) string {
// try user scope
out, err := exec.Command("systemctl", "--user", "is-active", unit).Output()
if err == nil {
return strings.TrimSpace(string(out))
}
combined, _ := exec.Command("systemctl", "--user", "is-active", unit).CombinedOutput()
if strings.Contains(string(combined), "could not be found") ||
strings.Contains(string(combined), "not found") ||
strings.Contains(string(combined), "No such") {
// try system scope
out2, err2 := exec.Command("systemctl", "is-active", unit).Output()
if err2 == nil {
return strings.TrimSpace(string(out2))
}
combined2, _ := exec.Command("systemctl", "is-active", unit).CombinedOutput()
if strings.Contains(string(combined2), "could not be found") ||
strings.Contains(string(combined2), "not found") ||
strings.Contains(string(combined2), "No such") {
return "not-installed"
}
s := strings.TrimSpace(string(out2))
if s == "" {
return "unknown"
}
return s
}
// systemctl returned non-zero but unit exists (e.g. "inactive", "failed")
if len(out) > 0 {
return strings.TrimSpace(string(out))
}
return "unknown"
}
// parseFirstPort returns the first integer in [1024, 65535] found in text.
func parseFirstPort(text string) int {
for _, m := range portRe.FindAllString(text, -1) {
n, err := strconv.Atoi(m)
if err == nil && n >= 1024 && n <= 65535 {
return n
}
}
return 0
}
// tcpListening attempts a TCP connection to addr:port with the given timeout.
func tcpListening(host string, port int, timeout time.Duration) bool {
conn, err := net.DialTimeout("tcp", fmt.Sprintf("%s:%d", host, port), timeout)
if err != nil {
return false
}
conn.Close()
return true
}