@orkastery/cli 0.6.0 → 0.6.1

package/dist/mcp-server.js

@@ -76,6 +76,7 @@ const fila_pesada_1 = require("./fila-pesada");
 const decisao_autonoma_1 = require("./decisao-autonoma");
 const conducao_texto_1 = require("./conducao-texto");
 const mcp_ship_1 = require("./mcp-ship");
+const grok_1 = require("./adapters/grok");
 const company_brain_mcp_1 = require("./company-brain-mcp");
 const claude_bg_1 = require("./adapters/claude-bg");
 const session_watcher_claude_1 = require("./session-watcher-claude");
@@ -113,7 +114,8 @@ const modoDeConducao = zod_1.z.string().trim().min(1).max(40)
 const nova = zod_1.z.object({ nome: zod_1.z.string().trim().min(1).max(200),
     modo: modoDeConducao.optional() }).strict();
 const fase = daThread.extend({ fase: zod_1.z.enum(['GOAL', 'PLAN', 'GO', 'CHECK', 'SHIP', 'MASTER']),
-    prompt: zod_1.z.string().min(1).max(65536), runtime: zod_1.z.enum(['claude-bg', 'codex']).optional(),
+    // RM-067 (F4b): o grok tambem, como o --runtime do CLI, sempre com o model dele.
+    prompt: zod_1.z.string().min(1).max(65536), runtime: zod_1.z.enum(['claude-bg', 'codex', 'grok']).optional(),
     model: zod_1.z.string().trim().min(1).max(200).optional(),
     effort: zod_1.z.enum(['low', 'medium', 'high', 'xhigh', 'max']).optional(),
     // RM-056 (D1): o perfil pedido, validado contra o store pelo mesmo caminho do CLI.
@@ -125,8 +127,11 @@ const resposta = (valor) => ({ content: [{ type: 'text', text: JSON.stringify(va
 function criarServidorMcp(opcoes) {
     if (!path.isAbsolute(opcoes.projeto))
         throw Error('mcp.project.invalid: raiz absoluta obrigatoria');
-    if (!['claude-code', 'codex'].includes(opcoes.host))
+    if (!['claude-code', 'codex', 'grok'].includes(opcoes.host))
         throw Error('mcp.host.invalid');
+    // RM-067 (F4b, G1): o servidor do grok so serve a sessao filha; o despacho grava --thread na config da worktree.
+    if (opcoes.host === 'grok' && opcoes.threadId === undefined)
+        throw Error('mcp.host.child-only: --host grok serve so a sessao filha vinculada a uma thread (--thread), que o despacho do ork grava na config da worktree');
     if (opcoes.permissoesFilho !== undefined && !['interactive', 'worktree'].includes(opcoes.permissoesFilho))
         throw Error('mcp.child-permissions.invalid');
     if (opcoes.threadId !== undefined)
@@ -187,6 +192,18 @@ function criarServidorMcp(opcoes) {
     };
     if (opcoes.threadId)
         thread(opcoes.threadId);
+    // RM-067 (F4b, G1): o servidor do grok lista so as ferramentas do perfil filho; o headless nao aprova outra em dialogo.
+    const doGrok = opcoes.host === 'grok'
+        ? new Set((0, grok_1.ferramentasServidasAoGrok)(opcoes.permissoesFilho ?? 'interactive', (0, mcp_grafo_1.grafoLigado)((0, manifest_1.exigirManifesto)(raiz).manifesto))) : null;
+    // RM-067 (F4c, D4): a lista do despacho e um subconjunto da uniao do perfil filho; fora dela, ou sem o host grok, recusa.
+    if (opcoes.ferramentas !== undefined) {
+        const pedidas = opcoes.ferramentas;
+        if (!doGrok || pedidas.some(n => !doGrok.has(n)) || new Set(pedidas).size !== pedidas.length)
+            throw Error('mcp.tools.invalid: a lista do despacho sai do perfil filho do grok');
+        for (const nome of [...doGrok])
+            if (!pedidas.includes(nome))
+                doGrok.delete(nome);
+    }
     const pendencias = (id) => {
         const t = thread(id), eventos = (0, ledger_1.lerLedger)((0, thread_1.dirThread)(raiz, id)), contexto = (0, hitl_gates_1.contextoHitl)(raiz, id);
         const pedidos = [(0, hitl_presentation_1.pedidoHitlAberto)(raiz, id, t.faseAtual, null),
@@ -195,7 +212,7 @@ function criarServidorMcp(opcoes) {
         // e so ele. Nenhum outro canal mcp-local sai `disponivel` daqui por suposicao.
         return pedidos.filter(p => p && eventos.some(e => e.tipo === 'hitl_requested' && e.contexto === contexto &&
             e.pedido?.id === p.id)).map(p => ({ pedido: p, estado: (0, hitl_contract_1.estadoDoPedido)(p),
-            canais: (0, hitl_presentation_1.ofertaDoPedido)(p, [opcoes.host]), prazoLocal: (0, hitl_presentation_1.prazoLocalDoPedido)(p) }));
+            canais: (0, hitl_presentation_1.ofertaDoPedido)(p, opcoes.host === 'grok' ? [] : [opcoes.host]), prazoLocal: (0, hitl_presentation_1.prazoLocalDoPedido)(p) }));
     };
     const fases = (id) => {
         thread(id);
@@ -334,6 +351,8 @@ function criarServidorMcp(opcoes) {
     function registrarTool(nome, config, executar) {
         if (opcoes.threadId && ['ork_thread_new', 'ork_phase_run', 'ork_request_decision', 'ork_request_master_note', 'ork_preflight'].includes(nome))
             return;
+        if (doGrok && !doGrok.has(nome))
+            return;
         const entrada = config.inputSchema.extend({ projeto: campoProjeto.optional() });
         const schema = converterSchema(entrada, { $refStrategy: 'none' });
         ferramentas.set(nome, { tool: { name: nome, description: config.description, annotations: config.annotations,
@@ -347,6 +366,7 @@ function criarServidorMcp(opcoes) {
     }
     server.setRequestHandler(types_js_1.ListToolsRequestSchema, async () => ({ tools: [...ferramentas.values()].map(f => f.tool) }));
     server.setRequestHandler(types_js_1.CallToolRequestSchema, async (request, extra) => {
+        opcoes.emCurso?.(1);
         try {
             const f = ferramentas.get(request.params.name);
             if (!f)
@@ -358,12 +378,16 @@ function criarServidorMcp(opcoes) {
                 return { ...resposta(e.recusa), isError: true };
             return { ...resposta({ erro: e.message }), isError: true };
         }
+        finally {
+            opcoes.emCurso?.(-1);
+        }
     });
     const conexaoLocal = (0, node_crypto_1.randomUUID)();
     // RM-059 (F9, G3): a caixa de saida do Mensageiro de Sessoes so existe no servidor do dono do Claude Code, na memoria:
     // a resposta a uma sessao claude-bg que entra pelo dialogo deste servidor sai por ela, e o texto nunca vai a disco.
     const caixa = opcoes.host === 'claude-code' && !opcoes.threadId ? (0, entrega_por_mod_1.novaCaixaDeSaida)() : null;
-    const ingresso = (0, hitl_local_1.criarIngressoLocal)(raiz, { host: opcoes.host, connectionId: conexaoLocal }, async (pedido, signal) => {
+    // RM-067 (F4b, G5): o headless do grok nao tem dialogo, e a sessao filha nao pede decisao nem nota: sem ingresso local.
+    const ingresso = opcoes.host === 'grok' ? null : (0, hitl_local_1.criarIngressoLocal)(raiz, { host: opcoes.host, connectionId: conexaoLocal }, async (pedido, signal) => {
         carregar();
         thread(pedido.thread);
         // D12: pergunta nativa que aceita texto NAO vira menu. Um menu sobre pergunta aberta
@@ -388,14 +412,14 @@ function criarServidorMcp(opcoes) {
     }, { caixa });
     // RM-059 (fatia F8, T8.1): a nota do MASTER pelo mesmo ingresso local. O formulario e fixo (a nota de 0 a 5 e o
     // porque); sem a capacidade de formulario no cliente, a recusa vem antes de qualquer escrita.
-    const ingressoDaNota = (0, master_nota_local_1.criarIngressoDaNota)(raiz, { host: opcoes.host, connectionId: conexaoLocal }, async (apresentacao, signal) => {
+    const ingressoDaNota = opcoes.host === 'grok' ? null : (0, master_nota_local_1.criarIngressoDaNota)(raiz, { host: opcoes.host, connectionId: conexaoLocal }, async (apresentacao, signal) => {
         carregar();
         thread(apresentacao.thread);
         const r = await server.elicitInput({ mode: 'form', message: apresentacao.mensagem,
             requestedSchema: apresentacao.esquema }, { signal, timeout: 300000 });
         return r.action === 'accept' ? { action: 'accept', content: r.content } : { action: r.action };
     }, () => Boolean(server.getClientCapabilities()?.elicitation?.form));
-    server.onclose = () => { ingresso.fechar(); ingressoDaNota.fechar(); };
+    server.onclose = () => { ingresso?.fechar(); ingressoDaNota?.fechar(); };
     (0, company_brain_mcp_1.registerBrainTools)(registrarTool, carregar, thread, opcoes.brainWrites ?? []);
     (0, mcp_experiencia_1.registrarConsultasExperiencia)(registrarTool, { raiz, carregar, transporte: opcoes.transporteShip ?? 'github-ssh' });
     // RM-026 K7 (fatia 2): o conhecimento escrito, só leitura, do projeto fixado; também na sessão filha vinculada.
@@ -595,16 +619,18 @@ function criarServidorMcp(opcoes) {
         livre(threadId);
         return resposta((0, hitl_gates_1.abrirPedidoGate)(raiz, threadId, motivo));
     });
-    registrarTool('ork_request_decision', { description: 'Apresenta pedido existente ao dono por dialogo nativo. Somente IDs; nunca forneca resposta nos argumentos.',
-        inputSchema: daDecisao, annotations: { readOnlyHint: false, destructiveHint: false } }, async ({ threadId, pedidoId }, extra) => {
-        thread(threadId);
-        return resposta(await ingresso.solicitar(threadId, pedidoId, extra.signal));
-    });
-    registrarTool('ork_request_master_note', { description: 'Pede ao dono, pelo dialogo nativo do host, a nota de 0 a 5 e o porque de uma entrega. Somente o threadId; nunca forneca nota nem porque nos argumentos.',
-        inputSchema: daThread, annotations: { readOnlyHint: false, destructiveHint: false } }, async ({ threadId }, extra) => {
-        thread(threadId);
-        return resposta(await ingressoDaNota.solicitar(threadId, extra.signal));
-    });
+    if (ingresso)
+        registrarTool('ork_request_decision', { description: 'Apresenta pedido existente ao dono por dialogo nativo. Somente IDs; nunca forneca resposta nos argumentos.',
+            inputSchema: daDecisao, annotations: { readOnlyHint: false, destructiveHint: false } }, async ({ threadId, pedidoId }, extra) => {
+            thread(threadId);
+            return resposta(await ingresso.solicitar(threadId, pedidoId, extra.signal));
+        });
+    if (ingressoDaNota)
+        registrarTool('ork_request_master_note', { description: 'Pede ao dono, pelo dialogo nativo do host, a nota de 0 a 5 e o porque de uma entrega. Somente o threadId; nunca forneca nota nem porque nos argumentos.',
+            inputSchema: daThread, annotations: { readOnlyHint: false, destructiveHint: false } }, async ({ threadId }, extra) => {
+            thread(threadId);
+            return resposta(await ingressoDaNota.solicitar(threadId, extra.signal));
+        });
     // RM-059 (F9, T9.1): o Mensageiro de Sessoes nas duas pontas. Nenhuma das duas entra no --allowedTools do modelo (D8):
     // quem chama e o mod ork-mensageiro, e nenhuma responde, aprova ou abre pedido.
     if (caixa)

package/dist/merge-da-entrega.js

@@ -0,0 +1,85 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.branchRegistradaDaEntrega = branchRegistradaDaEntrega;
+exports.mergesDasEntregasNaBase = mergesDasEntregasNaBase;
+/**
+ * Reconhecimento unico do merge que entrega uma thread na linha de primeiro pai da base.
+ *
+ * A forja pode preservar o titulo `ship(<thread>)` no assunto ou usar sua mensagem padrao.
+ * Nos formatos padrao, a branch e o vinculo: ela precisa ser exatamente a branch registrada
+ * para a thread. O fallback pela convencao existe para o `docs verificar` no CI, que nao tem
+ * `.orkastery/`, e fecha o id antes de aceitar o sufixo da fase (`ork-abc` nao casa `ork-abcd`).
+ */
+const branch_de_estado_1 = require("./branch-de-estado");
+const ledger_1 = require("./ledger");
+const thread_1 = require("./thread");
+const util_1 = require("./util");
+/** A branch da thread como foi registrada, preferindo o evento especifico da worktree. */
+function branchRegistradaDaEntrega(raiz, thread) {
+    try {
+        const eventos = (0, ledger_1.lerLedger)((0, thread_1.dirThread)(raiz, thread));
+        const worktree = [...eventos].reverse().find((e) => e.tipo === ledger_1.TIPOS_DE_EVENTO.worktreeCriada && (0, branch_de_estado_1.branchValida)(e.branch));
+        if (worktree)
+            return String(worktree.branch);
+        const criada = [...eventos].reverse().find((e) => e.tipo === ledger_1.TIPOS_DE_EVENTO.threadCriada);
+        const base = criada?.base;
+        if (base && typeof base === 'object' && !Array.isArray(base)) {
+            const branch = base.branch;
+            if ((0, branch_de_estado_1.branchValida)(branch))
+                return branch;
+        }
+    }
+    catch { /* checkout de CI ou thread sem estado local */ }
+    return null;
+}
+const branchConvencionalDaThread = (branch, thread) => {
+    const prefixo = `ork/${thread}`;
+    return branch === prefixo || branch.startsWith(`${prefixo}-`);
+};
+function threadDoAssunto(assunto, entregas, base) {
+    const ship = /^ship\(([^)]+)\)/.exec(assunto);
+    if (ship?.[1])
+        return ship[1];
+    const github = /^Merge pull request #[1-9][0-9]* from [^/\s]+\/(\S+)$/.exec(assunto);
+    const gitlab = /^Merge branch '(.+)' into '(.+)'$/.exec(assunto);
+    const branch = github?.[1] ?? (gitlab?.[2] === base ? gitlab[1] : null);
+    if (!branch)
+        return null;
+    return entregas.find((entrega) => entrega.branch === null
+        ? branchConvencionalDaThread(branch, entrega.thread)
+        : branch === entrega.branch)?.thread ?? null;
+}
+/**
+ * Merges das entregas na base, em ordem do git log (mais novo primeiro por omissao).
+ *
+ * O assunto e lido por `%s`, portanto uma citacao somente no corpo nao entra. `--first-parent`
+ * tira commits da branch lateral. O segundo pai continua opcional no retorno para preservar a
+ * recusa tipada `entrega.sem-vinculo` de squash/rebase quando a CI e obrigatoria.
+ */
+function mergesDasEntregasNaBase(raiz, refBase, base, entregas, reverse = false) {
+    const saida = new Map(entregas.map((e) => [e.thread, []]));
+    if (!(0, branch_de_estado_1.branchValida)(refBase) || !(0, branch_de_estado_1.branchValida)(base))
+        return saida;
+    const args = ['log', refBase, '--first-parent', '--format=%H%x09%P%x09%cI%x09%s', ...(reverse ? ['--reverse'] : []), '--'];
+    const r = (0, util_1.exec)('git', args, raiz, 60000);
+    if (!r.ok)
+        return saida;
+    for (const linha of r.stdout.split('\n')) {
+        const [sha, pais, em, assunto] = linha.split('\t');
+        if (!(0, branch_de_estado_1.shaValido)(sha) || typeof assunto !== 'string')
+            continue;
+        const thread = threadDoAssunto(assunto, entregas, base);
+        if (!thread)
+            continue;
+        const segundo = (pais ?? '').split(' ')[1] ?? null;
+        const ms = Date.parse(em ?? '');
+        const merges = saida.get(thread) ?? [];
+        merges.push({
+            mergeSha: sha,
+            headSha: segundo && (0, branch_de_estado_1.shaValido)(segundo) ? segundo : null,
+            em: Number.isFinite(ms) ? new Date(ms).toISOString() : null,
+        });
+        saida.set(thread, merges);
+    }
+    return saida;
+}

package/dist/network-roadmap.js

@@ -454,7 +454,7 @@ function maquinasDoPanorama(retratos, local, ctx, lacunas) {
         const idadeMs = Math.max(0, agora - Date.parse(m.publicadoEm));
         const semBatida = idadeMs > fabrica_estado_1.LIMIAR_SEM_BATIDA_MS;
         if (semBatida) {
-            lacunas.push(lacuna('maquina.sem-batida', 'fabrica', m.maquina, `${m.maquina} sem retrato novo há ${(0, horario_1.duracaoCurta)(Math.floor(idadeMs / 60000))} (último em ${(0, horario_1.formatarDataHora)(m.publicadoEm, { fuso: ctx.fuso })}): ` +
+            lacunas.push(lacuna('maquina.sem-batida', 'fabrica', m.maquina, `${m.maquina} sem retrato novo há ${(0, horario_1.duracaoCurta)(Math.floor(idadeMs / 60000))} (último em ${(0, horario_1.formatarDataHora)(m.publicadoEm, { fuso: ctx.fuso, agora: ctx.quando })}): ` +
                 'as threads dela podem ter andado', `confira a ${m.maquina}: ela publica ao criar thread, despachar fase, entregar e a cada batida do pulse`));
         }
         saida.push({ maquina: m.maquina, por: m.por, publicadoEm: m.publicadoEm, idadeMin: Math.floor(idadeMs / 60000), semBatida,
@@ -632,7 +632,7 @@ function lerProjetoDoClone(p, geral) {
             fontes.push({ parte, origem: 'clone', onde, ref: nome, commit: r.ponta, dataDoCommit, lidoEm: ctx.quando, atualizado: r.atualizado, existe: true });
             if (!r.atualizado) {
                 lacunas.push(lacuna(`${parte}.sem-leitura`, parte, onde, `sem leitura nova de ${onde}${porque(r.tentou)}; ` +
-                    `vale a última cópia desta máquina, commit ${r.ponta.slice(0, 7)} de ${(0, horario_1.formatarDataHora)(dataDoCommit, { fuso: ctx.fuso })}`, correcao()));
+                    `vale a última cópia desta máquina, commit ${r.ponta.slice(0, 7)} de ${(0, horario_1.formatarDataHora)(dataDoCommit, { fuso: ctx.fuso, agora: ctx.quando })}`, correcao()));
             }
             return r.ponta;
         }
@@ -1033,15 +1033,15 @@ function descreverProjeto(x) {
 function linhaDaFonte(f, quando, fuso) {
     const m = (0, locale_1.msg)().network.roadmap;
     const parte = m.fonteParte(f.parte);
-    const lido = f.lidoEm === quando ? m.lidoAgora : m.lidoEm((0, horario_1.formatarDataHora)(f.lidoEm, { fuso }));
+    const lido = f.lidoEm === quando ? m.lidoAgora : m.lidoEm((0, horario_1.formatarDataHora)(f.lidoEm, { fuso, agora: quando }));
     if (f.origem === 'estado-local')
         return m.fonteLocal(parte, f.onde, lido);
     if (!f.existe)
         return m.fonteInexistente(parte, f.onde, lido);
     const alvo = f.parte === 'roadmap' ? m.alvoDoRoadmap(f.onde) : f.onde;
-    return m.fonteCommit(parte, alvo, (f.commit ?? '').slice(0, 7), (0, horario_1.formatarDataHora)(f.dataDoCommit, { fuso }), f.atualizado ? lido : m.ultimaCopia);
+    return m.fonteCommit(parte, alvo, (f.commit ?? '').slice(0, 7), (0, horario_1.formatarDataHora)(f.dataDoCommit, { fuso, agora: quando }), f.atualizado ? lido : m.ultimaCopia);
 }
-function linhasDasMaquinas(x, fuso) {
+function linhasDasMaquinas(x, quando, fuso) {
     const m = (0, locale_1.msg)().network.roadmap;
     if (x.maquinas === null)
         return [m.maquinasNaoLidas];
@@ -1051,11 +1051,11 @@ function linhasDasMaquinas(x, fuso) {
         const quem = `${m.maquina}${m.estaMaquina ? (0, locale_1.msg)().network.roadmap.estaMaquina : ''}`;
         // Fatia 3: a maquina so da rede por pessoa; as threads dela neste projeto nao foram lidas.
         if (m.origem === 'rede') {
-            return [(0, locale_1.msg)().network.roadmap.maquinaSoNaRede(quem, (0, horario_1.formatarDataHora)(m.publicadoEm, { fuso }), (0, horario_1.duracaoCurta)(m.idadeMin), m.semBatida, fabrica_estado_1.BRANCH_DA_FABRICA)];
+            return [(0, locale_1.msg)().network.roadmap.maquinaSoNaRede(quem, (0, horario_1.formatarDataHora)(m.publicadoEm, { fuso, agora: quando }), (0, horario_1.duracaoCurta)(m.idadeMin), m.semBatida, fabrica_estado_1.BRANCH_DA_FABRICA)];
         }
         const rm = (0, locale_1.msg)().network.roadmap;
         const batida = m.origem === 'estado-local' ? rm.estadoLocalAgora
-            : rm.retrato((0, horario_1.formatarDataHora)(m.publicadoEm, { fuso }), (0, horario_1.duracaoCurta)(m.idadeMin), m.semBatida);
+            : rm.retrato((0, horario_1.formatarDataHora)(m.publicadoEm, { fuso, agora: quando }), (0, horario_1.duracaoCurta)(m.idadeMin), m.semBatida);
         const cabeca = rm.resumoMaquina(quem, m.ativas.length, m.entreguesSemMaster, batida);
         // RM-037 (rm037noite, defeito 4): o runtime e o modelo de cada thread, quando o retrato os traz.
         return [cabeca, ...m.ativas.map((t) => `  ${t.id} · ${t.modo} · ${t.fase} · ${t.roadmap ?? rm.semItem}` +
@@ -1063,30 +1063,34 @@ function linhasDasMaquinas(x, fuso) {
                 (t.esperaVoce ? rm.esperaVoce(t.pergunta ?? rm.veredito) : ''))];
     });
 }
-function linhasDasReservas(x, fuso) {
+function linhasDasReservas(x, quando, fuso) {
     const m = (0, locale_1.msg)().network.roadmap;
     if (x.reservas === null)
         return [m.reservasNaoLidas];
     if (x.reservas.length === 0)
         return [m.nenhumaReserva];
-    return x.reservas.map((r) => m.reserva(r.item, r.maquina, r.thread ?? m.semThread, (0, horario_1.formatarDataHora)(r.desdeEm, { fuso })));
+    return x.reservas.map((r) => m.reserva(r.item, r.maquina, r.thread ?? m.semThread, (0, horario_1.formatarDataHora)(r.desdeEm, { fuso, agora: quando })));
 }
 /** Fatia 3: a casa da rede por pessoa e as maquinas dela, com a batida e os projetos que declaram. */
 function linhasDaRede(r, quando, fuso) {
     const x = (0, locale_1.msg)().network.roadmap;
-    const lido = r.lidoEm === quando ? x.redeLidaAgora : x.redeLidaEm((0, horario_1.formatarDataHora)(r.lidoEm, { fuso }));
+    const lido = r.lidoEm === quando ? x.redeLidaAgora : x.redeLidaEm((0, horario_1.formatarDataHora)(r.lidoEm, { fuso, agora: quando }));
     const casa = !r.casa ? x.casaAusente
         : r.atualizado === null ? x.casaNaoLida(r.casa)
             : x.casaLida(r.casa, r.ponta ? r.ponta.slice(0, 7) : x.semCommit, r.atualizado ? lido : x.casaUltimaCopia);
     if (r.membros.length === 0)
         return [casa, x.nenhumRetrato];
-    return [casa, ...r.membros.map((m) => x.membro(m.maquina, m.estaMaquina ? x.estaMaquina : '', (0, horario_1.formatarDataHora)(m.publicadoEm, { fuso }), m.idadeMin === null ? x.batidaIlegivel : x.idade((0, horario_1.duracaoCurta)(m.idadeMin)), m.semBatida, m.versaoOrk ? x.versao(m.versaoOrk) : '', m.projetos.length ? x.projetos(m.projetos.join(', ')) : x.nenhumProjeto))];
+    return [casa, ...r.membros.map((m) => x.membro(m.maquina, m.estaMaquina ? x.estaMaquina : '', (0, horario_1.formatarDataHora)(m.publicadoEm, { fuso, agora: quando }), m.idadeMin === null ? x.batidaIlegivel : x.idade((0, horario_1.duracaoCurta)(m.idadeMin)), m.semBatida, m.versaoOrk ? x.versao(m.versaoOrk) : '', m.projetos.length ? x.projetos(m.projetos.join(', ')) : x.nenhumProjeto))];
 }
 const linhaDaLacuna = (l) => {
     const m = (0, locale_1.msg)().network.roadmap;
     return m.lacuna(l.tipo, l.alvo ? ` (${l.alvo})` : '', m.lacunaDetalhe(l.tipo, l.parte, l.alvo, l.detalhe), m.lacunaCorrecao(l.tipo, l.correcao));
 };
-/** O texto de `ork network roadmap`: o consultado e o nao consultado no alto, e cada parte com a fonte e a hora. */
+/**
+ * O texto de `ork network roadmap`: o consultado e o nao consultado no alto, e cada parte com a fonte e a hora. RM-074 (F4):
+ * as datas omitem o ano pelo ano da leitura (`consultadoEm`), nao pelo relogio de quem le o texto: o mesmo panorama da o
+ * mesmo texto em qualquer dia, e o retrato pt-BR F3c nao fica vermelho na virada do ano.
+ */
 function textoDoPanoramaDaRede(p) {
     const m = (0, locale_1.msg)().network.roadmap;
     if (p.contrato !== exports.CONTRATO_PANORAMA_DA_REDE)
@@ -1108,8 +1112,8 @@ function textoDoPanoramaDaRede(p) {
         // Fatia 2 do ensaio (P7): o fuso ja sai no fim do panorama (e no bloco, quando difere): sem a legenda do status.
         linhas.push(x.roadmap ? (0, roadmap_status_1.textoDoStatusDoRoadmap)(x.roadmap, fuso, { legenda: false })
             : m.roadmapNaoLido(x.projeto.nome, x.lacunas.map((l) => l.tipo).filter((t) => t !== 'projeto.sem-clone').join(', ') || m.semFonte));
-        linhas.push('', m.threadsPorMaquina, ...linhasDasMaquinas(x, fuso));
-        linhas.push('', m.reservas, ...linhasDasReservas(x, fuso));
+        linhas.push('', m.threadsPorMaquina, ...linhasDasMaquinas(x, p.consultadoEm, fuso));
+        linhas.push('', m.reservas, ...linhasDasReservas(x, p.consultadoEm, fuso));
         linhas.push('', m.fontes, ...(x.fontes.length ? x.fontes.map((f) => linhaDaFonte(f, p.consultadoEm, fuso)) : [m.nenhumaFonte]));
         linhas.push('', m.lacunas, ...(x.lacunas.length ? x.lacunas.map(linhaDaLacuna) : [m.nenhumaLacuna]));
         // A legenda e a da hora da leitura, como os horarios do panorama: com a de agora, o horario de verao mudava o texto.