fix(pago): diagnose and harden IMAP email validation

- PagoValidadorService: add detailed Log::info at every step (emails count,
  body preview, parser result, which filter fails) so failures are visible in laravel.log
- CorreoImapService::cleanBody: detect and decode base64-encoded BODY[1] before
  QP decoding — critical fix when Bancolombia sends HTML part as base64
- BancolombiaParser: make esBancolombia() broader (includes 'valor','$','abono' etc.),
  add extraerPrimero() helper, add multiple regex fallbacks for remitente/fecha/hora/valor
  to handle different Bancolombia email HTML formats beyond the SMS text pattern

Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
Lizandro
2026-07-18 17:01:34 +00:00
co-authored by Claude Sonnet 4.6
parent 1fd9a92afa
commit 595c75837f
3 changed files with 147 additions and 79 deletions
+59 -54
View File
@@ -9,74 +9,85 @@ use Illuminate\Support\Facades\Log;
class PagoValidadorService
{
/**
* @param array $datosPago ['banco','valor','referencia','fecha','hora','remitente','llave']
* @param int|null $usuarioId
* @param string|null $nombreUsuario nombre registrado en la plataforma
* @param string $canal
* @return array ['estado' => confirmado|no_encontrado|monto_incorrecto|ya_usado, 'correo' => array|null]
*/
public function validar(array $datosPago, ?int $usuarioId = null, ?string $nombreUsuario = null, string $canal = 'telegram'): array
{
if (WhatsappSystemConfig::get('correo_imap_enabled', '0') !== '1') {
Log::info('[PagoValidador] IMAP deshabilitado (correo_imap_enabled != 1)');
return ['estado' => 'no_encontrado', 'correo' => null, 'motivo' => 'correo_deshabilitado'];
}
try {
$correos = $this->fetchCorreos();
} catch (\Throwable $e) {
Log::warning('[PagoValidador] Error leyendo correos: ' . $e->getMessage());
return ['estado' => 'no_encontrado', 'correo' => null, 'motivo' => 'error_imap'];
Log::warning('[PagoValidador] Error IMAP: ' . $e->getMessage());
return ['estado' => 'no_encontrado', 'correo' => null, 'motivo' => 'error_imap', 'debug' => $e->getMessage()];
}
Log::info('[PagoValidador] Correos obtenidos: ' . count($correos));
if (empty($correos)) {
return ['estado' => 'no_encontrado', 'correo' => null, 'motivo' => 'sin_correos'];
}
$valorIA = (int) ($datosPago['valor'] ?? 0);
$tolerancia = (int) ChatConfig::get('validacion_monto_tolerancia', '0');
$horaIA = $datosPago['hora'] ?? '';
$fechaIA = $datosPago['fecha'] ?? '';
$llaveIA = strtolower(preg_replace('/\s+/', '', $datosPago['llave'] ?? ''));
$valorIA = (int) ($datosPago['valor'] ?? 0);
$tolerancia = (int) ChatConfig::get('validacion_monto_tolerancia', '0');
$horaIA = $datosPago['hora'] ?? '';
$fechaIA = $datosPago['fecha'] ?? '';
$llaveIA = strtolower(preg_replace('/\s+/', '', $datosPago['llave'] ?? ''));
foreach ($correos as $correo) {
$datosCorreo = BancolombiaParser::parse($correo['body'] ?? '');
Log::info('[PagoValidador] Buscando: valor=' . $valorIA . ' fecha=' . $fechaIA . ' hora=' . $horaIA . ' llave=' . $llaveIA);
foreach ($correos as $i => $correo) {
$fuera = $correo['fuera_de_ventana'] ?? false;
$from = $correo['from'] ?? '';
$subj = $correo['subject'] ?? '';
$date = $correo['date'] ?? '';
$body = $correo['body'] ?? '';
Log::info("[PagoValidador] Correo #{$i}: from={$from} | subj={$subj} | date={$date} | fuera_ventana=" . ($fuera ? 'SI' : 'NO') . " | body(200)=" . substr($body, 0, 200));
$datosCorreo = BancolombiaParser::parse($body);
if (! $datosCorreo) {
Log::info("[PagoValidador] Correo #{$i}: NO es Bancolombia (parser retornó null)");
continue;
}
Log::info("[PagoValidador] Correo #{$i} parseado: " . json_encode($datosCorreo));
// ── 1. Valor ────────────────────────────────────────────
$valorCorreo = (int) preg_replace('/[^0-9]/', '', (string) ($datosCorreo['valor'] ?? '0'));
if ($valorIA <= 0 || $valorCorreo <= 0 || abs($valorIA - $valorCorreo) > $tolerancia) {
if ($valorCorreo > 0 && $valorIA > 0 && abs($valorIA - $valorCorreo) > $tolerancia) {
// Monto distinto — seguir buscando en el siguiente correo
continue;
}
if ($valorIA <= 0 || $valorCorreo <= 0) {
continue;
}
if ($valorIA <= 0 || $valorCorreo <= 0) {
Log::info("[PagoValidador] Correo #{$i}: valor inválido (ia={$valorIA} correo={$valorCorreo})");
continue;
}
// ── 2. Hash único del correo (anti-doble-uso) ───────────
$emailHash = sha1(($correo['body'] ?? '') . ($correo['date'] ?? ''));
if (abs($valorIA - $valorCorreo) > $tolerancia) {
Log::info("[PagoValidador] Correo #{$i}: monto no coincide (ia={$valorIA} correo={$valorCorreo} tol={$tolerancia})");
continue;
}
// ── 2. Hash único (anti-doble-uso) ─────────────────────
$emailHash = sha1($body . $date);
if (PagoConfirmado::yaUsado($emailHash)) {
// Este correo ya confirmó a otro usuario
return ['estado' => 'ya_usado', 'correo' => $datosCorreo,
'motivo' => 'correo_ya_aplicado'];
Log::info("[PagoValidador] Correo #{$i}: ya usado (hash={$emailHash})");
return ['estado' => 'ya_usado', 'correo' => $datosCorreo, 'motivo' => 'correo_ya_aplicado'];
}
// ── 3. Fecha (mismo día) ────────────────────────────────
// ── 3. Fecha (mismo día) — solo si ambos tienen fecha ──
if ($fechaIA && ($datosCorreo['fecha'] ?? '')) {
if (! $this->mismoDia($fechaIA, $datosCorreo['fecha'])) {
Log::info("[PagoValidador] Correo #{$i}: fecha no coincide (ia={$fechaIA} correo={$datosCorreo['fecha']})");
continue;
}
}
// ── 4. Hora (±10 min) ───────────────────────────────────
// ── 4. Hora (±15 min) — solo si ambos tienen hora ──────
if ($horaIA && ($datosCorreo['hora'] ?? '')) {
if (! $this->horaProxima($horaIA, $datosCorreo['hora'], 10)) {
if (! $this->horaProxima($horaIA, $datosCorreo['hora'], 15)) {
Log::info("[PagoValidador] Correo #{$i}: hora fuera de rango (ia={$horaIA} correo={$datosCorreo['hora']})");
continue;
}
}
@@ -85,17 +96,16 @@ class PagoValidadorService
if ($llaveIA) {
$llaveCorreo = strtolower(preg_replace('/\s+/', '', $datosCorreo['llave'] ?? ''));
if ($llaveCorreo && $llaveIA !== $llaveCorreo) {
Log::info("[PagoValidador] Correo #{$i}: llave no coincide (ia={$llaveIA} correo={$llaveCorreo})");
continue;
}
}
// ── 6. Remitente (coincidencia parcial con nombre de usuario) ──
$coincideRemitente = $this->remitenteCoincide(
$datosCorreo['remitente'] ?? '',
$nombreUsuario ?? ''
);
// ── 6. Remitente (informativo, no bloquea) ──────────────
$coincideRemitente = $this->remitenteCoincide($datosCorreo['remitente'] ?? '', $nombreUsuario ?? '');
Log::info("[PagoValidador] Correo #{$i}: CONFIRMADO (remitente_coincide=" . ($coincideRemitente ? 'SI' : 'NO') . ")");
// Todos los filtros pasados → confirmar
PagoConfirmado::marcar($emailHash, [
'usuario_id' => $usuarioId,
'valor' => $valorIA,
@@ -105,22 +115,20 @@ class PagoValidadorService
]);
return [
'estado' => 'confirmado',
'correo' => $datosCorreo,
'coincide_remitente' => $coincideRemitente,
'estado' => 'confirmado',
'correo' => $datosCorreo,
'coincide_remitente' => $coincideRemitente,
];
}
// Si algún correo tenía el monto correcto pero otro campo falló, devolver monto_incorrecto
// de lo contrario no_encontrado
return ['estado' => 'no_encontrado', 'correo' => null, 'motivo' => 'sin_coincidencia'];
Log::info('[PagoValidador] Ningún correo coincidió con los criterios');
return ['estado' => 'no_encontrado', 'correo' => null, 'motivo' => 'sin_coincidencia', 'emails_revisados' => count($correos)];
}
// ── Helpers ──────────────────────────────────────────────────────────
private function mismoDia(string $fechaA, string $fechaB): bool
{
// Normaliza dd/mm/yyyy o dd/mm/yy
$normA = $this->normalizarFecha($fechaA);
$normB = $this->normalizarFecha($fechaB);
return $normA && $normB && $normA === $normB;
@@ -152,15 +160,12 @@ class PagoValidadorService
if (! $remitenteEmail || ! $nombreUsuario) {
return false;
}
// Comparación parcial insensible a mayúsculas y tildes
$normalizar = fn (string $s): string => strtolower(
iconv('UTF-8', 'ASCII//TRANSLIT//IGNORE', $s) ?: $s
);
$re = $normalizar($remitenteEmail);
$nu = $normalizar($nombreUsuario);
// Basta con que una palabra del nombre de usuario aparezca en el remitente del email
foreach (explode(' ', $nu) as $palabra) {
if (strlen($palabra) >= 3 && str_contains($re, $palabra)) {
return true;
@@ -174,12 +179,12 @@ class PagoValidadorService
$minutos = (int) WhatsappSystemConfig::get('correo_imap_minutos', '5');
$service = new CorreoImapService(
host: WhatsappSystemConfig::get('correo_imap_host', ''),
port: (int) WhatsappSystemConfig::get('correo_imap_port', '993'),
useSsl: WhatsappSystemConfig::get('correo_imap_ssl', '1') === '1',
user: WhatsappSystemConfig::get('correo_imap_user', ''),
password: WhatsappSystemConfig::get('correo_imap_password', ''),
folder: WhatsappSystemConfig::get('correo_imap_folder', 'INBOX'),
host: WhatsappSystemConfig::get('correo_imap_host', ''),
port: (int) WhatsappSystemConfig::get('correo_imap_port', '993'),
useSsl: WhatsappSystemConfig::get('correo_imap_ssl', '1') === '1',
user: WhatsappSystemConfig::get('correo_imap_user', ''),
password: WhatsappSystemConfig::get('correo_imap_password', ''),
folder: WhatsappSystemConfig::get('correo_imap_folder', 'INBOX'),
);
return $service->fetchLatest(limit: 10, minutesBack: $minutos);