Move fleet retention and concurrency controls into Settings

Persist settings in SQLite, import legacy environment values once, and apply changes to cleanup and deployment queues without restarting.

Closes #51

src/lib/server/db/fleet-settings.ts

@@ -0,0 +1,20 @@
+import type Database from 'better-sqlite3';
+import { defaultFleetSettings, validateFleetSettings, type FleetSettings } from '../../fleet-settings.js';
+
+export const FLEET_SETTINGS_KEY = 'fleet_settings';
+
+/** Import legacy environment values once; persisted settings win on every later boot. */
+export function initializeFleetSettings(handle: Database.Database): void {
+    if (handle.prepare('SELECT 1 FROM settings WHERE key = ?').get(FLEET_SETTINGS_KEY)) return;
+    const values = { ...defaultFleetSettings };
+    const legacy: Record<keyof FleetSettings, string> = {
+        deployKeepDays: 'DEPLOY_KEEP_DAYS', restartConcurrency: 'DEPLOYMENT_RESTART_CONCURRENCY',
+        createConcurrency: 'DEPLOYMENT_CREATE_CONCURRENCY'
+    };
+    for (const key of Object.keys(legacy) as (keyof FleetSettings)[]) {
+        const raw = process.env[legacy[key]];
+        if (raw) values[key] = Number(raw);
+    }
+    handle.prepare('INSERT OR IGNORE INTO settings (key, value) VALUES (?, ?)')
+        .run(FLEET_SETTINGS_KEY, JSON.stringify(validateFleetSettings(values)));
+}

src/lib/server/db/index.ts

@@ -6,6 +6,7 @@ import schemaSql from './schema.sql?raw';
 import { requirement, type BetaPlan, type BetaRequirement } from '../../beta-plan.js';
 import { emptyMetrics } from '../fleet/beta-evaluation.js';
 import { backfillLeaderboard } from '../fleet/leaderboard-ingest.js';
+import { initializeFleetSettings } from './fleet-settings.js';
 
 let _db: Database.Database | null = null;
 
@@ -345,6 +346,7 @@ export function db(): Database.Database {
         migrateGameTelemetry(handle);
         migrateTable(handle, 'leaderboard_matches', [{ name: 'start_players', ddl: 'ALTER TABLE leaderboard_matches ADD COLUMN start_players INTEGER' }]);
         backfillLeaderboard(handle);
+        initializeFleetSettings(handle);
     } catch (err) {
         handle.close();
         throw err;