<?php
require_once "/web/inc/vars.inc.php";
if (file_exists('/web/inc/vars.local.inc.php')) {
  include_once('/web/inc/vars.local.inc.php');
}
ini_set('error_reporting', 0);
// Init database
//$dsn = $database_type . ':host=' . $database_host . ';dbname=' . $database_name;
$dsn = $database_type . ":unix_socket=" . $database_sock . ";dbname=" . $database_name;
$opt = [
  PDO::ATTR_ERRMODE            => PDO::ERRMODE_EXCEPTION,
  PDO::ATTR_DEFAULT_FETCH_MODE => PDO::FETCH_ASSOC,
  PDO::ATTR_EMULATE_PREPARES   => false,
];
try {
  $pdo = new PDO($dsn, $database_user, $database_pass, $opt);
}
catch (PDOException $e) {
  echo($e->getMessage() . PHP_EOL);
  exit(1);
}


$dateThreshold = new DateTime();
$dateThreshold->modify('-31 days');
$dateThresholdFormatted = $dateThreshold->format('Y-m-d H:i:s');

$batchSize = 1000;
$lastProcessedDatetime = null;
$lastProcessedUsername = "";
$lastProcessedService = "";
$loopCounter = 0;
$rowCounter = 0;
$clearedRowCounter = 0;

try {
  do {
    $loopCounter++;
    echo("Processing batch $loopCounter\n");

    $stmt = $pdo->prepare("
      SELECT service, real_rip, username, datetime
      FROM sasl_log
      WHERE datetime < :dateThreshold
      AND (:lastProcessedDatetime IS NULL OR datetime >= :lastProcessedDatetime2)
      ORDER BY datetime ASC
      LIMIT :limit
    ");
    $stmt->execute(array(
      ':dateThreshold' => $dateThresholdFormatted,
      ':lastProcessedDatetime' => $lastProcessedDatetime,
      ':lastProcessedDatetime2' => $lastProcessedDatetime,
      ':limit' => $batchSize
    ));

    $rows = $stmt->fetchAll(PDO::FETCH_ASSOC);
    $rowCount = count($rows);
    $rowCounter += $rowCount;

    echo("Fetched $rowCount rows (total of $rowCounter)\n");

    $pdo->beginTransaction();
    foreach ($rows as $row) {
      $stmt = $pdo->prepare("
        SELECT MAX(datetime) as max_date
        FROM sasl_log
        WHERE datetime < :dateThreshold AND service = :service AND username = :username
      ");
      $stmt->execute(array(
        ':dateThreshold' => $dateThresholdFormatted,
        ':service' => $row['service'],
        ':username' => $row['username']
      ));
      $subrow = $stmt->fetch(PDO::FETCH_ASSOC);

      if ($row['datetime'] < $subrow['max_date']) {
        $stmt = $pdo->prepare("
          DELETE FROM sasl_log
          WHERE username = :username AND service = :service AND datetime = :datetime
        ");
        $stmt->execute(array(
          ':username' => $row['username'],
          ':service' => $row['service'],
          ':datetime' => $row['datetime']
        ));

        $clearedRowCounter++;
      }
    }
    $pdo->commit();

    if ($lastProcessedDatetime == $rows[$rowCount - 1]['datetime'] &&
      $lastProcessedUsername == $rows[$rowCount - 1]['username'] &&
      $lastProcessedService == $rows[$rowCount - 1]['service'] ||
      $rowCount != $batchSize) {
      $rowCount = 0;
    }

    // Update last processed datetime
    if ($rowCount > 0) {
      $lastProcessedDatetime = $rows[$rowCount - 1]['datetime'];
      $lastProcessedUsername = $rows[$rowCount - 1]['username'];
      $lastProcessedService = $rows[$rowCount - 1]['service'];
    }

  } while ($rowCount > 0);
}
catch (PDOException $e) {
  echo($e->getMessage() . PHP_EOL);
  exit(1);
}

echo("Succesfully cleared $clearedRowCounter rows of $rowCounter rows");
exit(0);