_define.php

@@ -14,7 +14,7 @@ $this->registerModule(
     'Dotclear Watch',
     'Send report about your Dotclear',
     'Jean-Christian Denis and contributors',
-    '0.5',
+    '0.3',
     [
         'requires' => [
             ['php', '7.4'],

dcstore.xml

@@ -2,10 +2,10 @@
 <modules xmlns:da="http://dotaddict.org/da/">
   <module id="DotclearWatch">
     <name>Dotclear Watch</name>
-    <version>0.5</version>
+    <version>0.3</version>
     <author>Jean-Christian Denis and contributors</author>
     <desc>Send report about your Dotclear</desc>
-    <file>https://github.com/JcDenis/DotclearWatch/releases/download/v0.5/plugin-DotclearWatch.zip</file>
+    <file>https://github.com/JcDenis/DotclearWatch/releases/download/v0.3/plugin-DotclearWatch.zip</file>
     <da:dcmin>2.27</da:dcmin>
     <da:details>http://plugins.dotaddict.org/dc2/details/DotclearWatch</da:details>
     <da:support>https://github.com/JcDenis/DotclearWatch/issues</da:support>

locales/fr/main.lang.php

@@ -18,9 +18,9 @@ L10n::$locales['Settings are globals. Reports are by blog.']
 L10n::$locales['Hidden modules:']                                                                     = 'Modules cachés :';
 L10n::$locales['This is the comma separated list of plugins IDs and themes IDs to ignore in report.'] = 'C\'est la liste des modules cachés séparés par une virgule.';
 L10n::$locales['Distant API URL:']                                                                    = 'URL de l\'API distante :';
-L10n::$locales['This is the URL of the API to send report. Leave empty to reset value.']              = 'C\'est L\'URL de l\'API où sera envoyé le rapport. Laisser vide pour remettre par défaut.';
+L10n::$locales['This is the URL of the API to send report. Leave empty to reset value.']              = 'C\'est L\'URL de l\'API où sera envoyer le rapport. Laisser vide pour remettre par défaut.';
 L10n::$locales['Clear reports cache directory']                                                       = 'Nettoyer le répertoire de cache des rapports.';
 L10n::$locales['This deletes all blogs reports in cache.']                                            = 'Ceci efface tous les rapports des blogs en cache.';
 L10n::$locales['Send report now']                                                                     = 'Envoyer le rapport maintenant';
-L10n::$locales['This sent report for current blog even if report exists in cache.']                   = 'Ceci envoie le rapport pour le blog courant même si un rapport existe en cache.';
+L10n::$locales['This sent report for current blog even if report exists in cache.']                   = 'Ceci envoie le rapport pou r le blog courant même si un rapport existe en cache.';
 L10n::$locales['Report that will be sent for this blog:']                                             = 'Rapport qui sera envoyé pour ce blog :';

locales/fr/main.po

@@ -32,7 +32,7 @@ msgid "Distant API URL:"
 msgstr "URL de l'API distante :"
 
 msgid "This is the URL of the API to send report. Leave empty to reset value."
-msgstr "C'est L'URL de l'API où sera envoyé le rapport. Laisser vide pour remettre par défaut."
+msgstr "C'est L'URL de l'API où sera envoyer le rapport. Laisser vide pour remettre par défaut."
 
 msgid "Clear reports cache directory"
 msgstr "Nettoyer le répertoire de cache des rapports."
@@ -44,7 +44,7 @@ msgid "Send report now"
 msgstr "Envoyer le rapport maintenant"
 
 msgid "This sent report for current blog even if report exists in cache."
-msgstr "Ceci envoie le rapport pour le blog courant même si un rapport existe en cache."
+msgstr "Ceci envoie le rapport pou r le blog courant même si un rapport existe en cache."
 
 msgid "Report that will be sent for this blog:"
 msgstr "Rapport qui sera envoyé pour ce blog :"

src/Config.php

@@ -78,13 +78,8 @@ class Config extends Process
 
         if (!empty($_POST['send_report'])) {
             Utils::sendReport(true);
-            $error = Utils::getError();
-            if (!empty($error)) {
-                Notices::AddWarningNotice($error);
-            } else {
             Notices::AddSuccessNotice(__('Report sent.'));
         }
-        }
 
         dcCore::app()->admin->url->redirect('admin.plugins', ['module' => My::id(), 'conf' => '1']);
 

src/Utils.php

@@ -15,11 +15,11 @@ declare(strict_types=1);
 namespace Dotclear\Plugin\DotclearWatch;
 
 use dcCore;
-use dcLog;
 use dcModuleDefine;
 use dcThemes;
 use Dotclear\Helper\Crypt;
-use Dotclear\Helper\Date;
+use Dotclear\Helper\File\Files;
+use Dotclear\Helper\File\Path;
 use Dotclear\Helper\Network\HttpClient;
 use Exception;
 
@@ -32,7 +32,7 @@ class Utils
     public const DISTANT_API_URL = 'https://dotclear.watch/api';
 
     /** @var    string  The distant API version */
-    public const DISTANT_API_VERSION = '1.1';
+    public const DISTANT_API_VERSION = '1.0';
 
     /** @var    array<int,string>   The hiddens modules IDs */
     private static array $hiddens = [];
@@ -45,14 +45,8 @@ class Utils
      */
     public static function addMark(): void
     {
-        if (My::settings()->getGlobal('distant_api_url')) {
-            echo sprintf(
-                '<ul><li><a href="%s" title="%s" class="outgoing">%s<img src="%s" /></a></ul></li>',
-                'https://dotclear.watch/statistics',
-                __('DotclearWatch plugin statistics'),
-                __('Tracked by dotclear.watch'),
-                My::fileURL('icon.svg')
-            );
+        if (My::settings()->get('distant_api_url')) {
+            echo '<p>' . __('/!\ Tracked by dotclear.watch') . '</p>';
         }
     }
 
@@ -144,18 +138,6 @@ class Utils
         return self::check() ? self::uid() : '';
     }
 
-    /**
-     * Get request error.
-     */
-    public static function getError(): string
-    {
-        $rs = dcCore::app()->log->getLogs([
-            'log_table' => My::id() . '_error',
-        ]);
-
-        return $rs->isEmpty() || !is_string($rs->f('log_msg')) ? '' : $rs->f('log_msg');
-    }
-
     /**
      * Clear cache directory.
      */
@@ -180,46 +162,31 @@ class Utils
             return;
         }
 
-        if (!$force && !self::expired()) {
+        $file = self::file();
+
+        if (!$force && !self::expired($file)) {
             return;
         }
 
         $contents = self::contents();
 
-        self::write($contents);
+        self::write($file, $contents);
 
-        $status   = 500;
-        $response = '';
-        $url      = sprintf(self::url(), 'report');
-        $path     = '';
-        if ($client = HttpClient::initClient($url, $path)) {
         try {
-                $client->setUserAgent('Dotclear.watch ' . My::id() . '/' . self::DISTANT_API_VERSION);
-                $client->useGzip(false);
-                $client->setPersistReferers(false);
-                $client->post($path, ['key' => self::key(), 'report' => $contents]);
-
-                $status   = $client->getStatus();
-                $response = $client->getContent();
-                unset($client);
-                if ($status != 202) {
-                    self::error((string) '(' . $status . ') ' . $response);
+            $rsp = HttpClient::quickPost(sprintf(self::url(), 'report'), ['key' => self::key(), 'report' => $contents]);
+            if ($rsp !== 'ok') {
+                throw new Exception('bad API response');
             }
-
-                return;
         } catch (Exception $e) {
-                unset($client);
-            }
-        }
-
             if ($force) {
-            self::error('Dotclear.watch report failed');
+                dcCore::app()->error->add(__('Dotclear.watch report failed'));
+            }
         }
     }
 
     private static function check(): bool
     {
-        return defined('DC_CRYPT_ALGO');
+        return defined('DC_CRYPT_ALGO') && defined('DC_TPL_CACHE') && is_dir(DC_TPL_CACHE) && is_writable(DC_TPL_CACHE);
     }
 
     private static function key(): string
@@ -245,71 +212,61 @@ class Utils
         return md5(self::uid() . dcCore::app()->blog->uid);
     }
 
-    private static function url(): string
+    private static function url()
     {
         $api_url = My::settings()->getGlobal('distant_api_url');
 
         return (is_string($api_url) ? $api_url : self::DISTANT_API_URL) . '/' . self::DISTANT_API_VERSION . '/%s/' . self::uid();
     }
 
+    private static function file(): string
+    {
+        $file = self::buid();
+
+        return sprintf(
+            '%s/%s/%s/%s/%s.json',
+            (string) Path::real(DC_TPL_CACHE),
+            My::id(),
+            substr($file, 0, 2),
+            substr($file, 2, 2),
+            $file
+        );
+    }
+
     private static function clear(): void
     {
-        $rs = dcCore::app()->log->getLogs([
-            'log_table' => [
-                My::id() . '_report',
-                My::id() . '_error',
-            ],
-        ]);
-
-        if ($rs->isEmpty()) {
-            return;
+        $path = (string) Path::real(DC_TPL_CACHE) . DIRECTORY_SEPARATOR . My::id();
+        if (is_dir($path)) {
+            Files::delTree($path);
+        }
     }
 
-        $logs = [];
-        while ($rs->fetch()) {
-            $logs[] = (int) $rs->f('log_id');
-        }
-        dcCore::app()->log->delLogs($logs);
-    }
-
-    private static function error(string $message): void
+    private static function write(string $file, string $contents): void
     {
-        self::clear();
-
-        $cur = dcCore::app()->con->openCursor(dcCore::app()->prefix . dcLog::LOG_TABLE_NAME);
-        $cur->setField('log_table', My::id() . '_error');
-        $cur->setField('log_msg', $message);
-
-        dcCore::app()->log->addLog($cur);
+        $dir = dirname($file);
+        if (!is_dir($dir)) {
+            Files::makeDir($dir, true);
+        }
+        file_put_contents($file, $contents);
     }
 
-    private static function write(string $contents): void
+    private static function read(string $file): string
     {
-        self::clear();
-
-        $cur = dcCore::app()->con->openCursor(dcCore::app()->prefix . dcLog::LOG_TABLE_NAME);
-        $cur->setField('log_table', My::id() . '_report');
-        $cur->setField('log_msg', $contents);
-
-        dcCore::app()->log->addLog($cur);
+        return is_file($file) && is_readable($file) ? (string) file_get_contents($file) : '';
     }
 
-    private static function read(): string
+    private static function expired(string $file): bool
     {
-        $rs = dcCore::app()->log->getLogs([
-            'log_table' => My::id() . '_report',
-        ]);
-
-        return $rs->isEmpty() || !is_string($rs->f('log_msg')) ? '' : $rs->f('log_msg');
+        if (!is_file($file) || !is_readable($file) || ($time = filemtime($file)) === false) {
+            return true;
         }
 
-    private static function expired(): bool
-    {
-        $rs = dcCore::app()->log->getLogs([
-            'log_table' => My::id() . '_report',
-        ]);
+        $time = date('U', $time);
+        if (!is_numeric($time) || (int) $time + self::EXPIRED_DELAY < time()) {
+            return true;
+        }
 
-        return $rs->isEmpty() || !is_string($rs->f('log_dt')) || (int) Date::str('%s', $rs->f('log_dt')) + self::EXPIRED_DELAY < time();
+        return false;
     }
 
     private static function contents(): string
@@ -318,29 +275,16 @@ class Utils
         return (string) json_encode([
             'uid'    => self::uid(),
             'buid'   => self::buid(),
-            'plugins' => self::getPlugins(), // enabled plugins
-            'themes'  => self::getThemes(), // enabled themes
-            'blog'    => [
-                'lang'  => (string) dcCore::app()->blog->settings->get('system')->get('lang'),
-                'theme' => (string) dcCore::app()->blog->settings->get('system')->get('theme'),
-            ],
-            'blogs' => [
-                'count' => (int) dcCore::app()->getBlogs([], true)->f(0),
-            ],
-            'core' => [
-                'version' => DC_VERSION,
-            ],
-            'php' => [
-                'sapi'    => php_sapi_name() ?: 'php',
-                'version' => phpversion(),
-            ],
-            'system' => [
-                'name'    => php_uname('s'),
-                'version' => php_uname('r'),
+            'plugin' => self::getPlugins(), // enabled plugins
+            'theme'  => self::getThemes(), // enabled themes
+            'server' => [
+                'blogs_count' => (int) dcCore::app()->getBlogs([], true)->f(0),
+                'core'        => DC_VERSION,
+                'php'         => phpversion(),
+                'thm'         => (string) dcCore::app()->blog->settings->get('system')->get('theme'), // selected theme
             ],
             'database' => [
-                'driver'  => dcCore::app()->con->driver(),
-                'version' => dcCore::app()->con->version(),
+                dcCore::app()->con->driver() => dcCore::app()->con->version(),
             ],
         ], JSON_PRETTY_PRINT);
     }