El backend Postgres de `platform/` asumía un solo negocio con un solo token del
CRM. Este cambio lo convierte en una plataforma multi-cuenta y añade la
sincronización selectiva de las cinco entidades del encargo.
## Multi-tenancy
El `locationId` ya era por negocio, pero el token vivía en la variable de entorno
`CRM_TOKEN`, una sola para todo el proceso. Con dos negocios eso usaba el token
del primero contra la subcuenta del segundo: 401 en el mejor caso, escritura en
la subcuenta equivocada en el peor.
- `lib/crypto.ts` — AES-256-GCM para los tokens. Autenticado a propósito: una
fila manipulada hace que el descifrado FALLE, en vez de devolver basura que
acabaríamos mandando como credencial al CRM. La clave maestra vive en
`CRM_MASTER_KEY`, fuera de la base.
- `crm/ctx.ts` — `CrmCtx { businessId, locationId, token }` sustituye al
`locationId: string` suelto que viajaba por once firmas. Es un objeto y no dos
parámetros porque dos `string` seguidos se cruzan sin que el compilador diga
nada, y cruzarlos aquí manda el token de un cliente a la subcuenta de otro. Es
el único sitio donde el token existe descifrado, y solo en memoria.
- `crm/client.ts` — `CrmOptions.token` pasa a ser OBLIGATORIO, sin valor por
defecto: olvidarlo es ahora un error de compilación. El estrangulador pasa a
ser por token y aprende la cuota de las cabeceras `x-ratelimit-*`, que declaran
100 peticiones por 10 s — el cliente iba 6,5x por debajo con una estimación.
- Migración 003: credencial cifrada, calendario y la red de seguridad de mensajes
POR NEGOCIO. Como variable global decidía por todas las cuentas a la vez.
Lo único de la credencial que sale del servidor es la huella de 6 caracteres.
## Consola de superadministración
`/api/admin`, solo para el rol `admin`: alta de cuentas con su dueña en una
transacción, vínculo, desvínculo y suspensión. Las credenciales se COMPRUEBAN
contra el CRM antes de guardarse — un token sin validar traslada el fallo al
primer intento de sincronizar, lejos de donde se cometió. El error distingue
«token inválido» de «subcuenta inexistente» de «token de otra subcuenta».
Pantalla en `/admin/cuentas`, verificada en navegador: el campo del token es de
contraseña y viene vacío, porque no hay valor que traer.
## Sincronización por identificador
`POST /api/crm/sync/:entidad/:id` para contacto, conversación, mensaje, cita y
servicio. La dirección la decide la entidad: las tres primeras se TRAEN porque el
CRM es su dueño; las dos últimas se EMPUJAN, porque el calendario del CRM tiene
una sola cita en dos años y su catálogo de servicios está vacío.
- `crm/conversations.ts` — lectura por id de conversaciones y mensajes sueltos.
- `crm/syncConversations.ts` — el espejo persistido. Las tablas existían desde
002_crm.sql y nadie escribía en ellas: la bandeja consultaba el CRM en vivo.
- `crm/calendars.ts` — escritura de citas al calendario. `isoConDesplazamiento`
escribe la hora de pared del negocio con su desplazamiento; `toISOString()`
habría movido la hora que el CRM enseña en su interfaz.
- `crm/services.ts` — publicación de servicios al catálogo.
## Verificado contra la subcuenta real, no deducido
Las cinco entidades se ejercieron contra el CRM del cliente. Las escrituras van
en un ciclo crear → releer → borrar → confirmar borrado, con la limpieza en un
`finally`, y antes se comprobó que el borrado existe: preguntar si se puede
deshacer ANTES de escribir en el CRM de un cliente, no después. La subcuenta
quedó como estaba.
47 hallazgos medidos en `crm/HALLAZGOS.md`, y la referencia de endpoints en
`crm/API.md`, con la lista explícita de dónde la documentación oficial falla.
110 pruebas de plataforma en verde, typecheck limpio, build correcto. El backend
de demo de `server/` no se ha tocado y sigue con sus 43 pruebas.
## Deuda conocida, dicha sin rodeos
- La bandeja de mensajes todavía lee en vivo del CRM, no del espejo.
- La autenticación sigue siendo el id del usuario en texto plano, también para el
rol admin. Esta consola crea cuentas y guarda credenciales de clientes encima
de esa base: no debe quedar expuesta a internet hasta endurecerla.
Co-Authored-By: Claude Opus 5 (1M context) <[email protected]>
107 lines
3.8 KiB
TypeScript
107 lines
3.8 KiB
TypeScript
import { pool } from "../db/pool.ts";
|
|
import { crmRequest } from "./client.ts";
|
|
import type { CrmCtx } from "./ctx.ts";
|
|
import type { EtapasPipeline } from "./opportunities.ts";
|
|
|
|
export interface CrmConnection {
|
|
id: number;
|
|
business_id: number;
|
|
location_id: string;
|
|
pipeline_id: string | null;
|
|
stage_open_id: string | null;
|
|
stage_won_id: string | null;
|
|
stage_lost_id: string | null;
|
|
allow_duplicate_opp: boolean;
|
|
last_sync_at: string | null;
|
|
last_sync_status: string | null;
|
|
}
|
|
|
|
export async function obtenerConexion(businessId: number): Promise<CrmConnection | null> {
|
|
const { rows } = await pool.query<CrmConnection>(
|
|
`SELECT * FROM crm_connections WHERE business_id = $1`,
|
|
[businessId]
|
|
);
|
|
return rows[0] ?? null;
|
|
}
|
|
|
|
export function etapasDe(c: CrmConnection): EtapasPipeline {
|
|
if (!c.pipeline_id) throw new Error("La conexión con el CRM no tiene pipeline configurado");
|
|
return {
|
|
pipelineId: c.pipeline_id,
|
|
open: c.stage_open_id,
|
|
won: c.stage_won_id,
|
|
lost: c.stage_lost_id,
|
|
};
|
|
}
|
|
|
|
/**
|
|
* Detecta el pipeline y las etapas de la subcuenta y las guarda.
|
|
*
|
|
* Las etapas se eligen por nombre porque sus identificadores son opacos y
|
|
* distintos en cada subcuenta. Se busca «ganado» y «perdido»; si no aparecen,
|
|
* se cae a la primera y la última por posición, que es lo que un embudo suele
|
|
* significar. Ese respaldo se registra en `last_sync_status` para que no pase
|
|
* inadvertido.
|
|
*/
|
|
export async function autoconfigurar(ctx: CrmCtx): Promise<CrmConnection> {
|
|
const r = await crmRequest<any>("GET", "/opportunities/pipelines", {
|
|
token: ctx.token,
|
|
query: { locationId: ctx.locationId },
|
|
});
|
|
const pipelines: any[] = r?.pipelines ?? [];
|
|
if (!pipelines.length) {
|
|
throw new Error("La subcuenta del CRM no tiene ningún pipeline");
|
|
}
|
|
const pipe = pipelines[0];
|
|
const stages: any[] = [...(pipe.stages ?? [])].sort(
|
|
(a, b) => (a.position ?? 0) - (b.position ?? 0)
|
|
);
|
|
|
|
const porNombre = (...palabras: string[]) =>
|
|
stages.find((s) => {
|
|
const n = String(s.name ?? "").toLowerCase();
|
|
return palabras.some((p) => n.includes(p));
|
|
})?.id ?? null;
|
|
|
|
const won = porNombre("ganado", "won", "asisti", "complet");
|
|
const lost = porNombre("perdido", "lost", "cancel", "no asis");
|
|
const open = stages[0]?.id ?? null;
|
|
|
|
// MEDIDO: la subcuenta expone el ajuste que decide si una cita puede estrenar
|
|
// su propia oportunidad o hay que reciclar la de la clienta.
|
|
let permiteDuplicados = false;
|
|
try {
|
|
const loc = await crmRequest<any>("GET", `/locations/${ctx.locationId}`, {
|
|
token: ctx.token,
|
|
});
|
|
permiteDuplicados = Boolean(loc?.location?.settings?.allowDuplicateOpportunity);
|
|
} catch {
|
|
// Si no se puede leer, se asume el caso restrictivo: reciclar nunca rompe,
|
|
// crear a ciegas sí.
|
|
}
|
|
|
|
const nota =
|
|
won && lost
|
|
? `pipeline «${pipe.name}»; etapas detectadas por nombre`
|
|
: `pipeline «${pipe.name}»; OJO: no se hallaron etapas de ganado/perdido por nombre`;
|
|
|
|
// `location_id` NO se escribe aquí: lo puso `guardarCredencial` junto al token,
|
|
// y son la misma decisión. Escribirlo desde dos sitios permite que se separen.
|
|
const { rows } = await pool.query<CrmConnection>(
|
|
`INSERT INTO crm_connections
|
|
(business_id, location_id, pipeline_id, stage_open_id, stage_won_id, stage_lost_id,
|
|
allow_duplicate_opp, last_sync_status)
|
|
VALUES ($1,$2,$3,$4,$5,$6,$7,$8)
|
|
ON CONFLICT (business_id) DO UPDATE SET
|
|
pipeline_id = EXCLUDED.pipeline_id,
|
|
stage_open_id = EXCLUDED.stage_open_id,
|
|
stage_won_id = EXCLUDED.stage_won_id,
|
|
stage_lost_id = EXCLUDED.stage_lost_id,
|
|
allow_duplicate_opp = EXCLUDED.allow_duplicate_opp,
|
|
last_sync_status = EXCLUDED.last_sync_status
|
|
RETURNING *`,
|
|
[ctx.businessId, ctx.locationId, pipe.id, open, won, lost, permiteDuplicados, nota]
|
|
);
|
|
return rows[0];
|
|
}
|