Bugfix y se hace que se actualicen los créditos en el login sólo si es

[z.facultad/75.43/tp1.git] / src / lib / file.creditos.php

diff --git a/src/lib/file.creditos.php b/src/lib/file.creditos.php
index a178911e6783ecc24ccfe5a3e8048c312124c598..c07370bf86cf5c2a3f163cb6485bbd46b1e6d8f9 100644 (file)
--- a/src/lib/file.creditos.php
+++ b/src/lib/file.creditos.php
@@ -14,16 +14,20 @@ require_once 'lib/file.php';
  * Actualiza el archivo de créditos al loguearse.
  * Calcula si hay que restar créditos por días sin preguntar.
  *
- * @return Array con los nuevos valores de crétigos.
+ * @return false si hay error
  */
 function file_creditos_login($user)
 {
-    $row = file_creditos_get($user);
-    if (!$row) return false;
+    if (!($row = file_creditos_get($user))) return false;
     list($fecha, $creditos, $bonus, $dias) = $row;
-    $dias = $dias + secs2dias(time() - $fecha);
-    return file_creditos_write($user, $creditos - intval($dias / 30), $bonus,
-        $dias % 30);
+    $dias2 = $dias + secs2dias(time() - $fecha);
+    $creditos2 = $creditos - intval($dias2 / 30);
+    $dias2 %= 30;
+    if ($dias2 != $dias or $creditos2 != $creditos)
+    {
+        return (bool)file_creditos_write($user, $creditos2, $bonus, $dias2);
+    }
+    return true;
 }
 
 /**
@@ -76,17 +80,20 @@ function file_creditos_get($user)
 
 /**
  * Escribe una nueva entrada en el archivo de créditos (actualiza el 'índice').
+ *
+ * @returns array con los campos escritos.
  */
 function file_creditos_write($user, $creditos, $bonus, $dias)
 {
-    if (($f = fopen("data/creditos.$user.csv", 'a+')) === false) return false;
+    if (($f = fopen("data/creditos.$user.csv", 'r+')) === false) return false;
+    fseek($f, 0, SEEK_END);
     $seek = ftell($f);
     $fecha = time();
     fputcsv($f, array($fecha, $creditos, $bonus, $dias));
-    fseek($f, 0);
+    rewind($f);
     fwrite($f, sprintf("%010d\n", $seek), 11);
     fclose($f);
-    return true;
+    return array($fecha, $creditos, $bonus, $dias);
 }
 
 /**