3 files changed, 495 insertions, 0 deletions

diff --git a/inc/poche/pocheCore.php b/inc/poche/pocheCore.php
new file mode 100644
index 00000000..52c603ac
--- /dev/null
+++ b/inc/poche/pocheCore.php
@@ -0,0 +1,257 @@
+<?php
+/**
+ * poche, a read it later open source system
+ *
+ * @category   poche
+ * @author     Nicolas Lœuillet <support@inthepoche.com>
+ * @copyright  2013
+ * @license    http://www.wtfpl.net/ see COPYING file
+ */
+
+function encode_string($string) 
+{
+    return sha1($string . SALT);
+}
+
+function get_external_file($url)
+{
+    $timeout = 15;
+    $useragent = "Mozilla/5.0 (Windows NT 5.1; rv:18.0) Gecko/20100101 Firefox/18.0";
+
+    if  (in_array ('curl', get_loaded_extensions())) {
+        # Fetch feed from URL
+        $curl = curl_init();
+        curl_setopt($curl, CURLOPT_URL, $url);
+        curl_setopt($curl, CURLOPT_TIMEOUT, $timeout);
+        curl_setopt($curl, CURLOPT_FOLLOWLOCATION, true);
+        curl_setopt($curl, CURLOPT_RETURNTRANSFER, true);
+        curl_setopt($curl, CURLOPT_HEADER, false);
+
+        # for ssl, do not verified certificate
+        curl_setopt($curl, CURLOPT_SSL_VERIFYPEER, FALSE);
+        curl_setopt($curl, CURLOPT_AUTOREFERER, TRUE );
+
+        # FeedBurner requires a proper USER-AGENT...
+        curl_setopt($curl, CURL_HTTP_VERSION_1_1, true);
+        curl_setopt($curl, CURLOPT_ENCODING, "gzip, deflate");
+        curl_setopt($curl, CURLOPT_USERAGENT, $useragent);
+
+        $data = curl_exec($curl);
+        $httpcode = curl_getinfo($curl, CURLINFO_HTTP_CODE);
+        $httpcodeOK = isset($httpcode) and ($httpcode == 200 or $httpcode == 301);
+        curl_close($curl);
+    } else {
+        # create http context and add timeout and user-agent
+        $context = stream_context_create(
+            array(
+                'http' => array(
+                    'timeout' => $timeout,
+                    'header' => "User-Agent: " . $useragent,
+                    'follow_location' => true
+                ),
+                'ssl' => array(
+                    'verify_peer' => false,
+                    'allow_self_signed' => true
+                )
+            )
+        );
+
+        # only download page lesser than 4MB
+        $data = @file_get_contents($url, false, $context, -1, 4000000); 
+
+        if (isset($http_response_header) and isset($http_response_header[0])) {
+            $httpcodeOK = isset($http_response_header) and isset($http_response_header[0]) and ((strpos($http_response_header[0], '200 OK') !== FALSE) or (strpos($http_response_header[0], '301 Moved Permanently') !== FALSE));
+        }
+    }
+
+    # if response is not empty and response is OK
+    if (isset($data) and isset($httpcodeOK) and $httpcodeOK) {
+
+        # take charset of page and get it
+        preg_match('#<meta .*charset=.*>#Usi', $data, $meta);
+
+        # if meta tag is found
+        if (!empty($meta[0])) {
+            preg_match('#charset="?(.*)"#si', $meta[0], $encoding);
+            # if charset is found set it otherwise, set it to utf-8
+            $html_charset = (!empty($encoding[1])) ? strtolower($encoding[1]) : 'utf-8';
+        } else {
+            $html_charset = 'utf-8';
+            $encoding[1] = '';
+        }
+
+        # replace charset of url to charset of page
+        $data = str_replace('charset=' . $encoding[1], 'charset=' . $html_charset, $data);
+
+        return $data;
+    }
+    else {
+        return FALSE;
+    }
+}
+
+function fetch_url_content($url)
+{
+    $url = base64_decode($url);
+    if (pocheTool::isUrl($url)) {
+        $url = pocheTool::cleanURL($url);
+        $html = Encoding::toUTF8(get_external_file($url));
+
+        # if get_external_file if not able to retrieve HTTPS content, try the same URL with HTTP protocol
+        if (!preg_match('!^https?://!i', $url) && (!isset($html) || strlen($html) <= 0)) {
+            $url = 'http://' . $url;
+            $html = Encoding::toUTF8(get_external_file($url));
+        }
+
+        if (function_exists('tidy_parse_string')) {
+            $tidy = tidy_parse_string($html, array(), 'UTF8');
+            $tidy->cleanRepair();
+            $html = $tidy->value;
+        }
+
+        $parameters = array();
+        if (isset($html) and strlen($html) > 0)
+        {
+            $readability = new Readability($html, $url);
+            $readability->convertLinksToFootnotes = CONVERT_LINKS_FOOTNOTES;
+            $readability->revertForcedParagraphElements = REVERT_FORCED_PARAGRAPH_ELEMENTS;
+
+            if($readability->init())
+            {
+                $content = $readability->articleContent->innerHTML;
+                $parameters['title'] = $readability->articleTitle->innerHTML;
+                $parameters['content'] = $content;
+
+                return $parameters;
+            }
+        }
+    }
+    else {
+        #$msg->add('e', _('error during url preparation : the link is not valid'));
+        pocheTool::logm($url . ' is not a valid url');
+    }
+
+    return FALSE;
+}
+
+function display_view($view, $id = 0, $full_head = 'yes')
+{
+    global $tpl, $store, $msg;
+
+    switch ($view)
+    {
+        case 'export':
+            $entries = $store->retrieveAll();
+            $tpl->assign('export', pocheTool::renderJson($entries));
+            $tpl->draw('export');
+            pocheTool::logm('export view');
+            break;
+        case 'config':
+            $tpl->assign('load_all_js', 0);
+            $tpl->draw('head');
+            $tpl->draw('home');
+            $tpl->draw('config');
+            $tpl->draw('js');
+            $tpl->draw('footer');
+            pocheTool::logm('config view');
+            break;
+        case 'view':
+            $entry = $store->retrieveOneById($id);
+
+            if ($entry != NULL) {
+                $tpl->assign('id', $entry['id']);
+                $tpl->assign('url', $entry['url']);
+                $tpl->assign('title', $entry['title']);
+                $content = $entry['content'];
+                if (function_exists('tidy_parse_string')) {
+                    $tidy = tidy_parse_string($content, array('indent'=>true, 'show-body-only' => true), 'UTF8');
+                    $tidy->cleanRepair();
+                    $content = $tidy->value;
+                }
+                $tpl->assign('content', $content);
+                $tpl->assign('is_fav', $entry['is_fav']);
+                $tpl->assign('is_read', $entry['is_read']);
+                $tpl->assign('load_all_js', 0);
+                $tpl->draw('view');
+            }
+            else {
+                pocheTool::logm('error in view call : entry is NULL');
+            }
+
+            pocheTool::logm('view link #' . $id);
+            break;
+        default: # home view
+            $entries = $store->getEntriesByView($view);
+
+            $tpl->assign('entries', $entries);
+
+            if ($full_head == 'yes') {
+                $tpl->assign('load_all_js', 1);
+                $tpl->draw('head');
+                $tpl->draw('home');
+            }
+
+            $tpl->draw('entries');
+
+            if ($full_head == 'yes') {
+                $tpl->draw('js');
+                $tpl->draw('footer');
+            }
+            break;
+    }
+}
+
+/**
+ * Appel d'une action (mark as fav, archive, delete)
+ */
+function action_to_do($action, $url, $id = 0)
+{
+    global $store, $msg;
+
+    switch ($action)
+    {
+        case 'add':
+            if($parametres_url = fetch_url_content($url)) {
+                if ($store->add($url, $parametres_url['title'], $parametres_url['content'])) {
+                    pocheTool::logm('add link ' . $url);
+                    $last_id = $store->getLastId();
+                    if (DOWNLOAD_PICTURES) {
+                        $content = filtre_picture($parametres_url['content'], $url, $last_id);
+                    }
+                    #$msg->add('s', _('the link has been added successfully'));
+                }
+                else {
+                    #$msg->add('e', _('error during insertion : the link wasn\'t added'));
+                    pocheTool::logm('error during insertion : the link wasn\'t added');
+                }
+            }
+            else {
+                #$msg->add('e', _('error during url preparation : the link wasn\'t added'));
+                pocheTool::logm('error during content fetch');
+            }
+            break;
+        case 'delete':
+            if ($store->deleteById($id)) {
+                if (DOWNLOAD_PICTURES) {
+                    remove_directory(ABS_PATH . $id);
+                }
+                #$msg->add('s', _('the link has been deleted successfully'));
+                pocheTool::logm('delete link #' . $id);
+            }
+            else {
+                #$msg->add('e', _('the link wasn\'t deleted'));
+                pocheTool::logm('error : can\'t delete link #' . $id);
+            }
+            break;
+        case 'toggle_fav' :
+            $store->favoriteById($id);
+            pocheTool::logm('mark as favorite link #' . $id);
+            break;
+        case 'toggle_archive' :
+            $store->archiveById($id);
+            pocheTool::logm('archive link #' . $id);
+            break;
+        default:
+            break;
+    }
+}
diff --git a/inc/poche/pochePictures.php b/inc/poche/pochePictures.php
new file mode 100644
index 00000000..bfc80657
--- /dev/null
+++ b/inc/poche/pochePictures.php
@@ -0,0 +1,114 @@
+<?php
+/**
+ * poche, a read it later open source system
+ *
+ * @category   poche
+ * @author     Nicolas Lœuillet <support@inthepoche.com>
+ * @copyright  2013
+ * @license    http://www.wtfpl.net/ see COPYING file
+ */
+
+/**
+ * On modifie les URLS des images dans le corps de l'article
+ */
+function filtre_picture($content, $url, $id)
+{
+    $matches = array();
+    preg_match_all('#<\s*(img)[^>]+src="([^"]*)"[^>]*>#Si', $content, $matches, PREG_SET_ORDER);
+    foreach($matches as $i => $link)
+    {
+        $link[1] = trim($link[1]);
+        if (!preg_match('#^(([a-z]+://)|(\#))#', $link[1]) )
+        {
+            $absolute_path = get_absolute_link($link[2],$url);
+            $filename = basename(parse_url($absolute_path, PHP_URL_PATH));
+            $directory = create_assets_directory($id);
+            $fullpath = $directory . '/' . $filename;
+            download_pictures($absolute_path, $fullpath);
+            $content = str_replace($matches[$i][2], $fullpath, $content);
+        }
+
+    }
+
+    return $content;
+}
+
+/**
+ * Retourne le lien absolu
+ */
+function get_absolute_link($relative_link, $url)
+{
+    /* return if already absolute URL */
+    if (parse_url($relative_link, PHP_URL_SCHEME) != '') return $relative_link;
+
+    /* queries and anchors */
+    if ($relative_link[0]=='#' || $relative_link[0]=='?') return $url . $relative_link;
+
+    /* parse base URL and convert to local variables:
+       $scheme, $host, $path */
+    extract(parse_url($url));
+
+    /* remove non-directory element from path */
+    $path = preg_replace('#/[^/]*$#', '', $path);
+
+    /* destroy path if relative url points to root */
+    if ($relative_link[0] == '/') $path = '';
+
+    /* dirty absolute URL */
+    $abs = $host . $path . '/' . $relative_link;
+
+    /* replace '//' or '/./' or '/foo/../' with '/' */
+    $re = array('#(/\.?/)#', '#/(?!\.\.)[^/]+/\.\./#');
+    for($n=1; $n>0; $abs=preg_replace($re, '/', $abs, -1, $n)) {}
+
+    /* absolute URL is ready! */
+    return $scheme.'://'.$abs;
+}
+
+/**
+ * Téléchargement des images
+ */
+
+function download_pictures($absolute_path, $fullpath)
+{
+    $rawdata = get_external_file($absolute_path);
+
+    if(file_exists($fullpath)) {
+        unlink($fullpath);
+    }
+    $fp = fopen($fullpath, 'x');
+    fwrite($fp, $rawdata);
+    fclose($fp);
+}
+
+/**
+ * Crée un répertoire de médias pour l'article
+ */
+function create_assets_directory($id)
+{
+    $assets_path = ABS_PATH;
+    if(!is_dir($assets_path)) {
+        mkdir($assets_path, 0705);
+    }
+
+    $article_directory = $assets_path . $id;
+    if(!is_dir($article_directory)) {
+        mkdir($article_directory, 0705);
+    }
+
+    return $article_directory;
+}
+
+/**
+ * Suppression du répertoire d'images
+ */
+function remove_directory($directory)
+{
+    if(is_dir($directory)) {
+        $files = array_diff(scandir($directory), array('.','..'));
+        foreach ($files as $file) {
+            (is_dir("$directory/$file")) ? remove_directory("$directory/$file") : unlink("$directory/$file");
+        }
+        return rmdir($directory);
+    }
+}
diff --git a/inc/poche/pocheTool.class.php b/inc/poche/pocheTool.class.php
new file mode 100644
index 00000000..cade115e
--- /dev/null
+++ b/inc/poche/pocheTool.class.php
@@ -0,0 +1,124 @@
+<?php
+/**
+ * poche, a read it later open source system
+ *
+ * @category   poche
+ * @author     Nicolas Lœuillet <support@inthepoche.com>
+ * @copyright  2013
+ * @license    http://www.wtfpl.net/ see COPYING file
+ */
+ 
+class pocheTools
+{
+    public static function initPhp()
+    {
+        define('START_TIME', microtime(true));
+
+        if (phpversion() < 5) {
+            die(_('Oops, it seems you don\'t have PHP 5.'));
+        }
+
+        error_reporting(E_ALL);
+
+        function stripslashesDeep($value) {
+            return is_array($value)
+                ? array_map('stripslashesDeep', $value)
+                : stripslashes($value);
+        }
+
+        if (get_magic_quotes_gpc()) {
+            $_POST = array_map('stripslashesDeep', $_POST);
+            $_GET = array_map('stripslashesDeep', $_GET);
+            $_COOKIE = array_map('stripslashesDeep', $_COOKIE);
+        }
+
+        ob_start();
+        register_shutdown_function('ob_end_flush');
+    }
+
+    public static function isUrl($url)
+    {
+        $pattern = '|^http(s)?://[a-z0-9-]+(.[a-z0-9-]+)*(:[0-9]+)?(/.*)?$|i';
+
+        return preg_match($pattern, $url);
+    }
+
+    public static function getUrl()
+    {
+        $https = (!empty($_SERVER['HTTPS'])
+                    && (strtolower($_SERVER['HTTPS']) == 'on'))
+            || (isset($_SERVER["SERVER_PORT"])
+                    && $_SERVER["SERVER_PORT"] == '443'); // HTTPS detection.
+        $serverport = (!isset($_SERVER["SERVER_PORT"])
+            || $_SERVER["SERVER_PORT"] == '80'
+            || ($https && $_SERVER["SERVER_PORT"] == '443')
+            ? '' : ':' . $_SERVER["SERVER_PORT"]);
+
+        $scriptname = str_replace('/index.php', '/', $_SERVER["SCRIPT_NAME"]);
+
+        if (!isset($_SERVER["SERVER_NAME"])) {
+            return $scriptname;
+        }
+
+        return 'http' . ($https ? 's' : '') . '://'
+            . $_SERVER["SERVER_NAME"] . $serverport . $scriptname;
+    }
+
+    public static function redirect($url = '')
+    {
+        if ($url === '') {
+            $url = (empty($_SERVER['HTTP_REFERER'])?'?':$_SERVER['HTTP_REFERER']);
+            if (isset($_POST['returnurl'])) {
+                $url = $_POST['returnurl'];
+            }
+        }
+
+        # prevent loop
+        if (empty($url) || parse_url($url, PHP_URL_QUERY) === $_SERVER['QUERY_STRING']) {
+            $url = pocheTool::getUrl();
+        }
+
+        if (substr($url, 0, 1) !== '?') {
+            $ref = pocheTool::getUrl();
+            if (substr($url, 0, strlen($ref)) !== $ref) {
+                $url = $ref;
+            }
+        }
+        header('Location: '.$url);
+        exit();
+    }
+
+    public static function cleanURL($url)
+    {
+
+        $url = html_entity_decode(trim($url));
+
+        $stuff = strpos($url,'&utm_source=');
+        if ($stuff !== FALSE)
+            $url = substr($url, 0, $stuff);
+        $stuff = strpos($url,'?utm_source=');
+        if ($stuff !== FALSE)
+            $url = substr($url, 0, $stuff);
+        $stuff = strpos($url,'#xtor=RSS-');
+        if ($stuff !== FALSE)
+            $url = substr($url, 0, $stuff);
+
+        return $url;
+    }
+
+    public static function renderJson($data)
+    {
+        header('Cache-Control: no-cache, must-revalidate');
+        header('Expires: Sat, 26 Jul 1997 05:00:00 GMT');
+        header('Content-type: application/json; charset=UTF-8');
+
+        echo json_encode($data);
+        exit();
+    }
+
+    public static function logm($message)
+    {
+        $t = strval(date('Y/m/d_H:i:s')).' - '.$_SERVER["REMOTE_ADDR"].' - '.strval($message)."\n";
+        file_put_contents('./log.txt',$t,FILE_APPEND);
+    }
+}
\ No newline at end of file