]>
git.immae.eu Git - github/wallabag/wallabag.git/blob - inc/poche/Poche.class.php
a8a54ff08589f30bc731a5dcf141f32810bc8fd4
3 * poche, a read it later open source system
6 * @author Nicolas LÅ“uillet <support@inthepoche.com>
8 * @license http://www.wtfpl.net/ see COPYING file
13 public static $canRenderTemplates = true ;
14 public static $configFileAvailable = true ;
22 private $currentTheme = '' ;
23 private $currentLanguage = '' ;
24 private $notInstalledMessage = array ();
26 # @todo make this dynamic (actually install themes and save them in the database including author information et cetera)
27 private $installedThemes = array (
28 'default' => array ( 'requires' => array ()),
29 'dark' => array ( 'requires' => array ( 'default' )),
30 'dmagenta' => array ( 'requires' => array ( 'default' )),
31 'solarized' => array ( 'requires' => array ( 'default' )),
32 'solarized-dark' => array ( 'requires' => array ( 'default' ))
35 public function __construct ()
37 if ( $this- > configFileIsAvailable ()) {
41 if ( $this- > themeIsInstalled ()) {
45 if ( $this- > systemIsInstalled ()) {
46 $this- > store
= new Database ();
47 $this- > messages
= new Messages ();
49 if (! $this- > store
-> isInstalled ()) {
55 private function init ()
58 Session
:: $sessionName = 'poche' ;
61 if ( isset ( $_SESSION [ 'poche_user' ]) && $_SESSION [ 'poche_user' ] != array ()) {
62 $this- > user
= $_SESSION [ 'poche_user' ];
64 # fake user, just for install & login screens
65 $this- > user
= new User ();
66 $this- > user
-> setConfig ( $this- > getDefaultConfig ());
70 $language = $this- > user
-> getConfigValue ( 'language' );
71 putenv ( 'LC_ALL=' . $language );
72 setlocale ( LC_ALL
, $language );
73 bindtextdomain ( $language , LOCALE
);
74 textdomain ( $language );
77 $this- > pagination
= new Paginator ( $this- > user
-> getConfigValue ( 'pager' ), 'p' );
80 $themeDirectory = $this- > user
-> getConfigValue ( 'theme' );
82 if ( $themeDirectory === false ) {
83 $themeDirectory = DEFAULT_THEME
;
86 $this- > currentTheme
= $themeDirectory ;
89 $languageDirectory = $this- > user
-> getConfigValue ( 'language' );
91 if ( $languageDirectory === false ) {
92 $languageDirectory = DEFAULT_THEME
;
95 $this- > currentLanguage
= $languageDirectory ;
98 public function configFileIsAvailable () {
99 if (! self
:: $configFileAvailable ) {
100 $this- > notInstalledMessage
[] = 'You have to rename inc/poche/config.inc.php.new to inc/poche/config.inc.php.' ;
108 public function themeIsInstalled () {
110 # Twig is an absolute requirement for Poche to function. Abort immediately if the Composer installer hasn't been run yet
111 if (! self
:: $canRenderTemplates ) {
112 $this- > notInstalledMessage
[] = 'Twig does not seem to be installed. Please initialize the Composer installation to automatically fetch dependencies. Have a look at <a href="http://doc.inthepoche.com/doku.php?id=users:begin:install">the documentation.</a>' ;
116 if (! is_writable ( CACHE
)) {
117 $this- > notInstalledMessage
[] = 'You don \' t have write access on cache directory.' ;
119 self
:: $canRenderTemplates = false ;
124 # Check if the selected theme and its requirements are present
125 if ( $this- > getTheme () != '' && ! is_dir ( THEME
. '/' . $this- > getTheme ())) {
126 $this- > notInstalledMessage
[] = 'The currently selected theme (' . $this- > getTheme () . ') does not seem to be properly installed (Missing directory: ' . THEME
. '/' . $this- > getTheme () . ')' ;
128 self
:: $canRenderTemplates = false ;
133 foreach ( $this- > installedThemes
[ $this- > getTheme ()][ 'requires' ] as $requiredTheme ) {
134 if (! is_dir ( THEME
. '/' . $requiredTheme )) {
135 $this- > notInstalledMessage
[] = 'The required "' . $requiredTheme . '" theme is missing for the current theme (' . $this- > getTheme () . ')' ;
137 self
:: $canRenderTemplates = false ;
152 * all checks before installation.
153 * @todo move HTML to template
156 public function systemIsInstalled ()
160 $configSalt = defined ( 'SALT' ) ? constant ( 'SALT' ) : '' ;
162 if ( empty ( $configSalt )) {
163 $this- > notInstalledMessage
[] = 'You have not yet filled in the SALT value in the config.inc.php file.' ;
166 if ( STORAGE
== 'sqlite' && ! file_exists ( STORAGE_SQLITE
)) {
167 Tools
:: logm ( 'sqlite file doesn \' t exist' );
168 $this- > notInstalledMessage
[] = 'sqlite file doesn \' t exist, you can find it in install folder. Copy it in /db folder.' ;
171 if ( is_dir ( ROOT
. '/install' ) && ! DEBUG_POCHE
) {
172 $this- > notInstalledMessage
[] = 'you have to delete the /install folder before using poche.' ;
175 if ( STORAGE
== 'sqlite' && ! is_writable ( STORAGE_SQLITE
)) {
176 Tools
:: logm ( 'you don \' t have write access on sqlite file' );
177 $this- > notInstalledMessage
[] = 'You don \' t have write access on sqlite file.' ;
188 public function getNotInstalledMessage () {
189 return $this- > notInstalledMessage
;
192 private function initTpl ()
194 $loaderChain = new Twig_Loader_Chain ();
196 # add the current theme as first to the loader chain so Twig will look there first for overridden template files
198 $loaderChain- > addLoader ( new Twig_Loader_Filesystem ( THEME
. '/' . $this- > getTheme ()));
199 } catch ( Twig_Error_Loader
$e ) {
200 # @todo isInstalled() should catch this, inject Twig later
201 die ( 'The currently selected theme (' . $this- > getTheme () . ') does not seem to be properly installed (' . THEME
. '/' . $this- > getTheme () . ' is missing)' );
204 # add all required themes to the loader chain
205 foreach ( $this- > installedThemes
[ $this- > getTheme ()][ 'requires' ] as $requiredTheme ) {
207 $loaderChain- > addLoader ( new Twig_Loader_Filesystem ( THEME
. '/' . DEFAULT_THEME
));
208 } catch ( Twig_Error_Loader
$e ) {
209 # @todo isInstalled() should catch this, inject Twig later
210 die ( 'The required "' . $requiredTheme . '" theme is missing for the current theme (' . $this- > getTheme () . ')' );
215 $twig_params = array ();
217 $twig_params = array ( 'cache' => CACHE
);
220 $this- > tpl
= new Twig_Environment ( $loaderChain , $twig_params );
221 $this- > tpl
-> addExtension ( new Twig_Extensions_Extension_I18n ());
223 # filter to display domain name of an url
224 $filter = new Twig_SimpleFilter ( 'getDomain' , 'Tools::getDomain' );
225 $this- > tpl
-> addFilter ( $filter );
227 # filter for reading time
228 $filter = new Twig_SimpleFilter ( 'getReadingTime' , 'Tools::getReadingTime' );
229 $this- > tpl
-> addFilter ( $filter );
231 # filter for simple filenames in config view
232 $filter = new Twig_SimpleFilter ( 'getPrettyFilename' , function ( $string ) { return str_replace ( ROOT
, '' , $
string ); });
233 $this- > tpl
-> addFilter ( $filter );
236 private function install ()
238 Tools
:: logm ( 'poche still not installed' );
239 echo $this- > tpl
-> render ( 'install.twig' , array (
240 'token' => Session
:: getToken (),
241 'theme' => $this- > getTheme (),
242 'poche_url' => Tools
:: getPocheUrl ()
244 if ( isset ( $_GET [ 'install' ])) {
245 if (( $_POST [ 'password' ] == $_POST [ 'password_repeat' ])
246 && $_POST [ 'password' ] != "" && $_POST [ 'login' ] != "" ) {
247 # let's rock, install poche baby !
248 if ( $this- > store
-> install ( $_POST [ 'login' ], Tools
:: encodeString ( $_POST [ 'password' ] . $_POST [ 'login' ])))
251 Tools
:: logm ( 'poche is now installed' );
256 Tools
:: logm ( 'error during installation' );
263 public function getTheme () {
264 return $this- > currentTheme
;
267 public function getLanguage () {
268 return $this- > currentLanguage
;
271 public function getInstalledThemes () {
272 $handle = opendir ( THEME
);
275 while (( $theme = readdir ( $handle )) !== false ) {
276 # Themes are stored in a directory, so all directory names are themes
277 # @todo move theme installation data to database
278 if (! is_dir ( THEME
. '/' . $theme ) || in_array ( $theme , array ( '..' , '.' ))) {
284 if ( $theme === $this- > getTheme ()) {
288 $themes [] = array ( 'name' => $theme , 'current' => $current );
295 public function getInstalledLanguages () {
296 $handle = opendir ( LOCALE
);
297 $languages = array ();
299 while (( $language = readdir ( $handle )) !== false ) {
300 # Languages are stored in a directory, so all directory names are languages
301 # @todo move language installation data to database
302 if (! is_dir ( LOCALE
. '/' . $language ) || in_array ( $language , array ( '..' , '.' ))) {
308 if ( $language === $this- > getLanguage ()) {
312 $languages [] = array ( 'name' => $language , 'current' => $current );
318 public function getDefaultConfig ()
321 'pager' => PAGINATION
,
323 'theme' => DEFAULT_THEME
328 * Call action (mark as fav, archive, delete, etc.)
330 public function action ( $action , Url
$url , $id = 0 , $import = FALSE , $autoclose = FALSE )
335 $content = $url- > extract ();
337 if ( $this- > store
-> add ( $url- > getUrl (), $content [ 'title' ], $content [ 'body' ], $this- > user
-> getId ())) {
338 Tools
:: logm ( 'add link ' . $url- > getUrl ());
340 if ( STORAGE
== 'postgres' ) {
341 $sequence = 'entries_id_seq' ;
343 $last_id = $this- > store
-> getLastId ( $sequence );
344 if ( DOWNLOAD_PICTURES
) {
345 $content = filtre_picture ( $content [ 'body' ], $url- > getUrl (), $last_id );
346 Tools
:: logm ( 'updating content article' );
347 $this- > store
-> updateContent ( $last_id , $content , $this- > user
-> getId ());
350 $this- > messages
-> add ( 's' , _ ( 'the link has been added successfully' ));
355 $this- > messages
-> add ( 'e' , _ ( 'error during insertion : the link wasn \' t added' ));
356 Tools
:: logm ( 'error during insertion : the link wasn \' t added ' . $url- > getUrl ());
361 if ( $autoclose == TRUE ) {
362 Tools
:: redirect ( '?view=home' );
364 Tools
:: redirect ( '?view=home&closewin=true' );
369 $msg = 'delete link #' . $id ;
370 if ( $this- > store
-> deleteById ( $id , $this- > user
-> getId ())) {
371 if ( DOWNLOAD_PICTURES
) {
372 remove_directory ( ABS_PATH
. $id );
374 $this- > messages
-> add ( 's' , _ ( 'the link has been deleted successfully' ));
377 $this- > messages
-> add ( 'e' , _ ( 'the link wasn \' t deleted' ));
378 $msg = 'error : can \' t delete link #' . $id ;
381 Tools
:: redirect ( '?' );
384 $this- > store
-> favoriteById ( $id , $this- > user
-> getId ());
385 Tools
:: logm ( 'mark as favorite link #' . $id );
390 case 'toggle_archive' :
391 $this- > store
-> archiveById ( $id , $this- > user
-> getId ());
392 Tools
:: logm ( 'archive link #' . $id );
402 function displayView ( $view , $id = 0 )
409 $dev = $this- > getPocheVersion ( 'dev' );
410 $prod = $this- > getPocheVersion ( 'prod' );
411 $compare_dev = version_compare ( POCHE
, $dev );
412 $compare_prod = version_compare ( POCHE
, $prod );
413 $themes = $this- > getInstalledThemes ();
414 $languages = $this- > getInstalledLanguages ();
415 $token = $this- > user
-> getConfigValue ( 'token' );
416 $http_auth = ( isset ( $_SERVER [ 'PHP_AUTH_USER' ]))? true : false ;
419 'languages' => $languages ,
422 'compare_dev' => $compare_dev ,
423 'compare_prod' => $compare_prod ,
425 'user_id' => $this- > user
-> getId (),
426 'http_auth' => $http_auth ,
428 Tools
:: logm ( 'config view' );
431 $entry = $this- > store
-> retrieveOneById ( $id , $this- > user
-> getId ());
432 if ( $entry != NULL ) {
433 Tools
:: logm ( 'view link #' . $id );
434 $content = $entry [ 'content' ];
435 if ( function_exists ( 'tidy_parse_string' )) {
436 $tidy = tidy_parse_string ( $content , array ( 'indent' => true , 'show-body-only' => true ), 'UTF8' );
437 $tidy- > cleanRepair ();
438 $content = $tidy- > value
;
442 $flattr = new FlattrItem ();
443 $flattr- > checkItem ( $entry [ 'url' ], $entry [ 'id' ]);
447 'content' => $content ,
452 Tools
:: logm ( 'error in view call : entry is null' );
455 default : # home, favorites and archive views
456 $entries = $this- > store
-> getEntriesByView ( $view , $this- > user
-> getId ());
463 if ( count ( $entries ) > 0 ) {
464 $this- > pagination
-> set_total ( count ( $entries ));
465 $page_links = $this- > pagination
-> page_links ( '?view=' . $view . '&sort=' . $_SESSION [ 'sort' ] . '&' );
466 $datas = $this- > store
-> getEntriesByView ( $view , $this- > user
-> getId (), $this- > pagination
-> get_limit ());
467 $tpl_vars [ 'entries' ] = $datas ;
468 $tpl_vars [ 'page_links' ] = $page_links ;
469 $tpl_vars [ 'nb_results' ] = count ( $entries );
471 Tools
:: logm ( 'display ' . $view . ' view' );
479 * update the password of the current user.
480 * if MODE_DEMO is TRUE, the password can't be updated.
481 * @todo add the return value
482 * @todo set the new password in function header like this updatePassword($newPassword)
485 public function updatePassword ()
488 $this- > messages
-> add ( 'i' , _ ( 'in demo mode, you can \' t update your password' ));
489 Tools
:: logm ( 'in demo mode, you can \' t do this' );
490 Tools
:: redirect ( '?view=config' );
493 if ( isset ( $_POST [ 'password' ]) && isset ( $_POST [ 'password_repeat' ])) {
494 if ( $_POST [ 'password' ] == $_POST [ 'password_repeat' ] && $_POST [ 'password' ] != "" ) {
495 $this- > messages
-> add ( 's' , _ ( 'your password has been updated' ));
496 $this- > store
-> updatePassword ( $this- > user
-> getId (), Tools
:: encodeString ( $_POST [ 'password' ] . $this- > user
-> getUsername ()));
498 Tools
:: logm ( 'password updated' );
502 $this- > messages
-> add ( 'e' , _ ( 'the two fields have to be filled & the password must be the same in the two fields' ));
503 Tools
:: redirect ( '?view=config' );
509 public function updateTheme ()
512 if ( empty ( $_POST [ 'theme' ])) {
515 # we are not going to change it to the current theme...
516 if ( $_POST [ 'theme' ] == $this- > getTheme ()) {
517 $this- > messages
-> add ( 'w' , _ ( 'still using the "' . $this- > getTheme () . '" theme!' ));
518 Tools
:: redirect ( '?view=config' );
521 $themes = $this- > getInstalledThemes ();
522 $actualTheme = false ;
524 foreach ( $themes as $theme ) {
525 if ( $theme [ 'name' ] == $_POST [ 'theme' ]) {
531 if (! $actualTheme ) {
532 $this- > messages
-> add ( 'e' , _ ( 'that theme does not seem to be installed' ));
533 Tools
:: redirect ( '?view=config' );
536 $this- > store
-> updateUserConfig ( $this- > user
-> getId (), 'theme' , $_POST [ 'theme' ]);
537 $this- > messages
-> add ( 's' , _ ( 'you have changed your theme preferences' ));
539 $currentConfig = $_SESSION [ 'poche_user' ]-> config
;
540 $currentConfig [ 'theme' ] = $_POST [ 'theme' ];
542 $_SESSION [ 'poche_user' ]-> setConfig ( $currentConfig );
544 Tools
:: redirect ( '?view=config' );
547 public function updateLanguage ()
550 if ( empty ( $_POST [ 'language' ])) {
553 # we are not going to change it to the current language...
554 if ( $_POST [ 'language' ] == $this- > getLanguage ()) {
555 $this- > messages
-> add ( 'w' , _ ( 'still using the "' . $this- > getLanguage () . '" language!' ));
556 Tools
:: redirect ( '?view=config' );
559 $languages = $this- > getInstalledLanguages ();
560 $actualLanguage = false ;
562 foreach ( $languages as $language ) {
563 if ( $language [ 'name' ] == $_POST [ 'language' ]) {
564 $actualLanguage = true ;
569 if (! $actualLanguage ) {
570 $this- > messages
-> add ( 'e' , _ ( 'that language does not seem to be installed' ));
571 Tools
:: redirect ( '?view=config' );
574 $this- > store
-> updateUserConfig ( $this- > user
-> getId (), 'language' , $_POST [ 'language' ]);
575 $this- > messages
-> add ( 's' , _ ( 'you have changed your language preferences' ));
577 $currentConfig = $_SESSION [ 'poche_user' ]-> config
;
578 $currentConfig [ 'language' ] = $_POST [ 'language' ];
580 $_SESSION [ 'poche_user' ]-> setConfig ( $currentConfig );
582 Tools
:: redirect ( '?view=config' );
586 * get credentials from differents sources
587 * it redirects the user to the $referer link
590 private function credentials () {
591 if ( isset ( $_SERVER [ 'PHP_AUTH_USER' ])) {
592 return array ( $_SERVER [ 'PHP_AUTH_USER' ], 'php_auth' );
594 if (! empty ( $_POST [ 'login' ]) && ! empty ( $_POST [ 'password' ])) {
595 return array ( $_POST [ 'login' ], $_POST [ 'password' ]);
597 return array ( false , false );
601 * checks if login & password are correct and save the user in session.
602 * it redirects the user to the $referer link
603 * @param string $referer the url to redirect after login
604 * @todo add the return value
607 public function login ( $referer )
609 list ( $login , $password )= $this- > credentials ();
610 if ( $login === false || $password === false ) {
611 $this- > messages
-> add ( 'e' , _ ( 'login failed: you have to fill all fields' ));
612 Tools
:: logm ( 'login failed' );
615 if (! empty ( $login ) && ! empty ( $password )) {
616 $user = $this- > store
-> login ( $login , Tools
:: encodeString ( $password . $login ));
617 if ( $user != array ()) {
618 # Save login into Session
619 Session
:: login ( $user [ 'username' ], $user [ 'password' ], $login , Tools
:: encodeString ( $password . $login ), array ( 'poche_user' => new User ( $user )));
620 $this- > messages
-> add ( 's' , _ ( 'welcome to your poche' ));
621 Tools
:: logm ( 'login successful' );
622 Tools
:: redirect ( $referer );
624 $this- > messages
-> add ( 'e' , _ ( 'login failed: bad login or password' ));
625 Tools
:: logm ( 'login failed' );
631 * log out the poche user. It cleans the session.
632 * @todo add the return value
635 public function logout ()
637 $this- > user
= array ();
639 $this- > messages
-> add ( 's' , _ ( 'see you soon!' ));
640 Tools
:: logm ( 'logout' );
645 * import from Instapaper. poche needs a ./instapaper-export.html file
646 * @todo add the return value
647 * @param string $targetFile the file used for importing
650 private function importFromInstapaper ( $targetFile )
652 # TODO gestion des articles favs
653 $html = new simple_html_dom ();
654 $html- > load_file ( $targetFile );
655 Tools
:: logm ( 'starting import from instapaper' );
659 foreach ( $html- > find ( 'ol' ) as $ul )
661 foreach ( $ul- > find ( 'li' ) as $li )
664 $url = new Url ( base64_encode ( $a [ 0 ]-> href
));
665 $this- > action ( 'add' , $url , 0 , TRUE );
668 if ( STORAGE
== 'postgres' ) {
669 $sequence = 'entries_id_seq' ;
671 $last_id = $this- > store
-> getLastId ( $sequence );
672 $this- > action ( 'toggle_archive' , $url , $last_id , TRUE );
676 # the second <ol> is for read links
679 $this- > messages
-> add ( 's' , _ ( 'import from instapaper completed' ));
680 Tools
:: logm ( 'import from instapaper completed' );
685 * import from Pocket. poche needs a ./ril_export.html file
686 * @todo add the return value
687 * @param string $targetFile the file used for importing
690 private function importFromPocket ( $targetFile )
692 # TODO gestion des articles favs
693 $html = new simple_html_dom ();
694 $html- > load_file ( $targetFile );
695 Tools
:: logm ( 'starting import from pocket' );
699 foreach ( $html- > find ( 'ul' ) as $ul )
701 foreach ( $ul- > find ( 'li' ) as $li )
704 $url = new Url ( base64_encode ( $a [ 0 ]-> href
));
705 $this- > action ( 'add' , $url , 0 , TRUE );
708 if ( STORAGE
== 'postgres' ) {
709 $sequence = 'entries_id_seq' ;
711 $last_id = $this- > store
-> getLastId ( $sequence );
712 $this- > action ( 'toggle_archive' , $url , $last_id , TRUE );
716 # the second <ul> is for read links
719 $this- > messages
-> add ( 's' , _ ( 'import from pocket completed' ));
720 Tools
:: logm ( 'import from pocket completed' );
725 * import from Readability. poche needs a ./readability file
726 * @todo add the return value
727 * @param string $targetFile the file used for importing
730 private function importFromReadability ( $targetFile )
732 # TODO gestion des articles lus / favs
733 $str_data = file_get_contents ( $targetFile );
734 $data = json_decode ( $str_data , true );
735 Tools
:: logm ( 'starting import from Readability' );
737 foreach ( $data as $key => $value ) {
741 foreach ( $value as $attr => $attr_value ) {
742 if ( $attr == 'article__url' ) {
743 $url = new Url ( base64_encode ( $attr_value ));
746 if ( STORAGE
== 'postgres' ) {
747 $sequence = 'entries_id_seq' ;
749 if ( $attr_value == 'true' ) {
750 if ( $attr == 'favorite' ) {
753 if ( $attr == 'archive' ) {
759 if (! is_null ( $url ) && $url- > isCorrect ()) {
760 $this- > action ( 'add' , $url , 0 , TRUE );
763 $last_id = $this- > store
-> getLastId ( $sequence );
764 $this- > action ( 'toggle_fav' , $url , $last_id , TRUE );
767 $last_id = $this- > store
-> getLastId ( $sequence );
768 $this- > action ( 'toggle_archive' , $url , $last_id , TRUE );
772 $this- > messages
-> add ( 's' , _ ( 'import from Readability completed. ' . $count . ' new links.' ));
773 Tools
:: logm ( 'import from Readability completed' );
778 * import datas into your poche
779 * @param string $from name of the service to import : pocket, instapaper or readability
780 * @todo add the return value
783 public function import ( $from )
786 'pocket' => 'importFromPocket' ,
787 'readability' => 'importFromReadability' ,
788 'instapaper' => 'importFromInstapaper'
791 if (! isset ( $providers [ $from ])) {
792 $this- > messages
-> add ( 'e' , _ ( 'Unknown import provider.' ));
796 $targetDefinition = 'IMPORT_' . strtoupper ( $from ) . '_FILE' ;
797 $targetFile = constant ( $targetDefinition );
799 if (! defined ( $targetDefinition )) {
800 $this- > messages
-> add ( 'e' , _ ( 'Incomplete inc/poche/define.inc.php file, please define "' . $targetDefinition . '".' ));
804 if (! file_exists ( $targetFile )) {
805 $this- > messages
-> add ( 'e' , _ ( 'Could not find required "' . $targetFile . '" import file.' ));
809 $this- > $providers [ $from ]( $targetFile );
813 * export poche entries in json
814 * @return json all poche entries
816 public function export ()
818 $entries = $this- > store
-> retrieveAll ( $this- > user
-> getId ());
819 echo $this- > tpl
-> render ( 'export.twig' , array (
820 'export' => Tools
:: renderJson ( $entries ),
822 Tools
:: logm ( 'export view' );
826 * Checks online the latest version of poche and cache it
827 * @param string $which 'prod' or 'dev'
828 * @return string latest $which version
830 private function getPocheVersion ( $which = 'prod' )
832 $cache_file = CACHE
. '/' . $which ;
834 # checks if the cached version file exists
835 if ( file_exists ( $cache_file ) && ( filemtime ( $cache_file ) > ( time () - 86400 ))) {
836 $version = file_get_contents ( $cache_file );
838 $version = file_get_contents ( 'http://static.inthepoche.com/versions/' . $which );
839 file_put_contents ( $cache_file , $version , LOCK_EX
);
844 public function generateToken ()
846 if ( ini_get ( 'open_basedir' ) === '' ) {
847 $token = substr ( base64_encode ( file_get_contents ( '/dev/urandom' , false , null , 0 , 20 )), 0 , 15 );
850 $token = substr ( base64_encode ( uniqid ( mt_rand (), true )), 0 , 20 );
853 $this- > store
-> updateUserConfig ( $this- > user
-> getId (), 'token' , $token );
854 $currentConfig = $_SESSION [ 'poche_user' ]-> config
;
855 $currentConfig [ 'token' ] = $token ;
856 $_SESSION [ 'poche_user' ]-> setConfig ( $currentConfig );
859 public function generateFeeds ( $token , $user_id , $type = 'home' )
861 $allowed_types = array ( 'home' , 'fav' , 'archive' );
862 $config = $this- > store
-> getConfigUser ( $user_id );
864 if (! in_array ( $type , $allowed_types ) ||
865 $token != $config [ 'token' ]) {
866 die ( _ ( 'Uh, there is a problem while generating feeds.' ));
870 $feed = new FeedWriter ( ATOM
);
871 $feed- > setTitle ( 'poche - ' . $type . ' feed' );
872 $feed- > setLink ( Tools
:: getPocheUrl ());
873 $feed- > setChannelElement ( 'updated' , date ( DATE_ATOM
, time ()));
874 $feed- > setChannelElement ( 'author' , 'poche' );
876 $entries = $this- > store
-> getEntriesByView ( $type , $user_id );
877 if ( count ( $entries ) > 0 ) {
878 foreach ( $entries as $entry ) {
879 $newItem = $feed- > createNewItem ();
880 $newItem- > setTitle ( htmlentities ( $entry [ 'title' ]));
881 $newItem- > setLink ( Tools
:: getPocheUrl () . '?view=view&id=' . $entry [ 'id' ]);
882 $newItem- > setDate ( time ());
883 $newItem- > setDescription ( $entry [ 'content' ]);
884 $feed- > addItem ( $newItem );
888 $feed- > genarateFeed ();