Add block size query in script interface

diff --git a/lib/functions.php b/lib/functions.php
index 868d76e980f0323dd91a1ce87c4359a67519a3b4..96f4c2faa77d76a1ecca51c5c9cbd20f43473b9f 100755 (executable)
--- a/lib/functions.php
+++ b/lib/functions.php
@@ -1006,6 +1006,43 @@ jirafeau_block_init ($size)
     return $id . NL . $code;
 }
 
+/** Get block size in bytes.
+  * @param $id identifier of the block
+  * @return  block size in bytes
+  */
+function
+jirafeau_block_get_size ($id)
+{
+    $p = VAR_BLOCK . s2p ($id) . $id;
+    if (!file_exists ($p))
+        return "Error";
+
+    /* Check date. */
+    $f = file ($p . '_infos');
+    $date = trim ($f[0]);
+    $block_size = trim ($f[1]);
+    $stored_code = trim ($f[2]);
+    /* Update date. */
+    if (date ('U') - $date > JIRAFEAU_HOUR
+        && date ('U') - $date < JIRAFEAU_MONTH)
+    {
+        if (file_put_contents ($p . '_infos', date ('U') . NL . $block_size . NL . $stored_code) === FALSE)
+        {
+            jirafeau_block_delete_ ($id);
+            return "Error";
+        }
+    }
+    /* Remove data. */
+    elseif (date ('U') - $date >= JIRAFEAU_MONTH)
+    {
+        echo date ('U'). " $date ";
+        jirafeau_block_delete_ ($id);
+        return "Error";
+    }
+
+    return $block_size;
+}
+
 /**
   * Read some data in a block.
   * @param $id identifier of the block

diff --git a/lib/lang/fr.php b/lib/lang/fr.php
index 8e20a4b5c1e388a69dc637b9fe6683202ae79fb7..fff1e96c25d4b5c2a5dc03c5c98342ab3e04fab8 100755 (executable)
--- a/lib/lang/fr.php
+++ b/lib/lang/fr.php
@@ -164,6 +164,7 @@ $tr = array (
             'This interface permits to create a block of data filled with zeros.' => 'Cette interface permet de creer un bloque de données remplies de zeros.',
             'You can read selected parts, write (using a code) and delete the block.' => 'Vous pouvez lire, écrire (en utilisant un code) et supprimer le bloque.',
             'Blocks may be removed after a month of non usage.' => 'Les bloques non utilisés depuis plus d\'un mois seront probablement supprimés.',
+            'Get block size' => 'Récupérer la taille d\'un bloque',
             'Read data in a block' => 'Lire des données dans un bloque',
             'Write data in a block' => 'Ecrire des données dans un bloque',
             'First line is a block id the second line the edit/delete code.' => 'La premiere ligne est l\'identifiant du bloque, la seconde est son code d\'écriture/suppression.',

diff --git a/script.php b/script.php
index 45ca63556b0550be720aa5d24f5a91a98b1aceb6..9bf9578fc49d7136adc6608ed12a752d966e093c 100755 (executable)
--- a/script.php
+++ b/script.php
@@ -199,6 +199,15 @@ if ($_SERVER['REQUEST_METHOD'] == "GET" && count ($_GET) == 0)
         echo '<p>' . t('This will return brut text content.') . ' ' .\r
              t('First line is a block id the second line the edit/delete code.') . '<br /></p>';\r
 \r
+        echo '<h3>' . t('Get block size') . ':</h3>';\r
+        echo '<p>';\r
+        echo t('Send a GET query to') . ': <i>' . $web_root . 'script.php?get_block_size</i><br />';\r
+        echo '<br />';\r
+        echo t('Parameters') . ':<br />';\r
+        echo "<b>id=</b>block_id<i> (" . t('Required') . ")</i> <br />";\r
+        echo '</p>';\r
+        echo '<p>' . t('This will return asked data or "Error" string.') . '<br /></p>';\r
+\r
         echo '<h3>' . t('Read data in a block') . ':</h3>';\r
         echo '<p>';\r
         echo t('Send a GET query to') . ': <i>' . $web_root . 'script.php?read_block</i><br />';\r
@@ -574,6 +583,14 @@ elseif (isset ($_GET['init_block']) && $cfg['enable_blocks'])
     else\r
         echo jirafeau_block_init ($_POST['size']);\r
 }\r
+/* Get block size. */\r
+elseif (isset ($_GET['get_block_size']) && $cfg['enable_blocks'])\r
+{\r
+    if (!isset ($_POST['id']))\r
+        echo "Error";\r
+    else\r
+        echo jirafeau_block_get_size ($_POST['id']);\r
+}\r
 /* Read data in block. */\r
 elseif (isset ($_GET['read_block']) && $cfg['enable_blocks'])\r
 {\r