update Piwik to version 2.16 (fixes #91)

www/analytics/plugins/SEO/Metric/DomainAge.php

@@ -0,0 +1,141 @@
+<?php
+/**
+ * Piwik - free/libre analytics platform
+ *
+ * @link http://piwik.org
+ * @license http://www.gnu.org/licenses/gpl-3.0.html GPL v3 or later
+ */
+
+namespace Piwik\Plugins\SEO\Metric;
+
+use Piwik\Http;
+use Piwik\Metrics\Formatter;
+use Psr\Log\LoggerInterface;
+
+/**
+ * Fetches the domain age using archive.org, who.is and whois.com.
+ */
+class DomainAge implements MetricsProvider
+{
+    /**
+     * @var Formatter
+     */
+    private $formatter;
+
+    /**
+     * @var LoggerInterface
+     */
+    private $logger;
+
+    public function __construct(Formatter $formatter, LoggerInterface $logger)
+    {
+        $this->formatter = $formatter;
+        $this->logger = $logger;
+    }
+
+    public function getMetrics($domain)
+    {
+        $ages = array();
+
+        $age = $this->getAgeArchiveOrg($domain);
+        if ($age > 0) {
+            $ages[] = $age;
+        }
+
+        $age = $this->getAgeWhoIs($domain);
+        if ($age > 0) {
+            $ages[] = $age;
+        }
+
+        $age = $this->getAgeWhoisCom($domain);
+        if ($age > 0) {
+            $ages[] = $age;
+        }
+
+        if (count($ages) > 0) {
+            $value = min($ages);
+            $value = $this->formatter->getPrettyTimeFromSeconds(time() - $value, true);
+        } else {
+            $value = null;
+        }
+
+        return array(
+            new Metric('domain-age', 'SEO_DomainAge', $value, 'plugins/SEO/images/whois.png')
+        );
+    }
+
+    /**
+     * Returns the domain age archive.org lists for the current url
+     *
+     * @param string $domain
+     * @return int
+     */
+    private function getAgeArchiveOrg($domain)
+    {
+        $url = str_replace('www.', '', $domain);
+        $data = $this->getUrl('http://wayback.archive.org/web/*/' . urlencode($url));
+        preg_match('#<a href=\"([^>]*)' . preg_quote($url) . '/\">([^<]*)<\/a>#', $data, $p);
+        if (!empty($p[2])) {
+            $value = strtotime($p[2]);
+            if ($value === false) {
+                return 0;
+            }
+            return $value;
+        }
+        return 0;
+    }
+
+    /**
+     * Returns the domain age who.is lists for the current url
+     *
+     * @param string $domain
+     * @return int
+     */
+    private function getAgeWhoIs($domain)
+    {
+        $url = preg_replace('/^www\./', '', $domain);
+        $url = 'http://www.who.is/whois/' . urlencode($url);
+        $data = $this->getUrl($url);
+        preg_match('#(?:Creation Date|Created On|created|Registered on)\.*:\s*([ \ta-z0-9\/\-:\.]+)#si', $data, $p);
+        if (!empty($p[1])) {
+            $value = strtotime(trim($p[1]));
+            if ($value === false) {
+                return 0;
+            }
+            return $value;
+        }
+        return 0;
+    }
+
+    /**
+     * Returns the domain age whois.com lists for the current url
+     *
+     * @param string $domain
+     * @return int
+     */
+    private function getAgeWhoisCom($domain)
+    {
+        $url = preg_replace('/^www\./', '', $domain);
+        $url = 'http://www.whois.com/whois/' . urlencode($url);
+        $data = $this->getUrl($url);
+        preg_match('#(?:Creation Date|Created On|created):\s*([ \ta-z0-9\/\-:\.]+)#si', $data, $p);
+        if (!empty($p[1])) {
+            $value = strtotime(trim($p[1]));
+            if ($value === false) {
+                return 0;
+            }
+            return $value;
+        }
+        return 0;
+    }
+
+    private function getUrl($url)
+    {
+        try {
+            return str_replace('&nbsp;', ' ', Http::sendHttpRequest($url, $timeout = 10, @$_SERVER['HTTP_USER_AGENT']));
+        } catch (\Exception $e) {
+            $this->logger->warning('Error while getting SEO stats (domain age): {message}', array('message' => $e->getMessage()));
+            return '';
+        }
+    }
+}