Pages: Show every community page - even from foreign servers (with caching)

diff --git a/addon/pages/pages.php b/addon/pages/pages.php
index 13e6c4b5938588ada18717296a410cd610e05d5b..6b242be316e637f79b2d9ab3cbdcfc04293830d3 100755 (executable)
--- a/addon/pages/pages.php
+++ b/addon/pages/pages.php
@@ -15,25 +15,71 @@ function pages_uninstall() {
        unregister_hook('page_end', 'addon/pages/pages.php', 'pages_page_end');
 }
 
+function pages_iscommunity($url, &$pagelist) {
+       // check every week for the status - should be enough
+       if ($pagelist[$url]["checked"]<time()-86400*7) {
+               // When too old or not found fetch the status from the profile
+               $ch = curl_init();
+
+               curl_setopt($ch, CURLOPT_URL, $url);
+               curl_setopt($ch, CURLOPT_HEADER, 0);
+               curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
+               curl_setopt($ch, CURLOPT_TIMEOUT, 2);
+ 
+               $page = curl_exec($ch);
+ 
+               curl_close($ch);
+
+               $iscommunity = (strpos($page, '<meta name="friendika.community" content="true" />') != 0);
+
+               $pagelist[$url] = array("community" => $iscommunity, "checked" => time());
+       } else // Fetch from cache
+               $iscommunity = $pagelist[$url]["community"];
+       return($iscommunity);
+}
+
+function pages_getpages($uid) {
+
+       // Fetch cached pagelist from configuration
+       $pagelist = get_pconfig($uid,'pages','pagelist');
+
+       if (sizeof($pagelist) == 0)
+               $pagelist = array();
+
+       $contacts = q("SELECT `id`, `url`, `Name` FROM `contact`
+                       WHERE `network`= 'dfrn' AND `uid` = %d",
+                       intval($uid));
+
+       $pages = array();
+
+       // Look if the profile is a community page
+       foreach($contacts as $contact) {
+               if (pages_iscommunity($contact["url"], $pagelist))
+                       $pages[] = array("url"=>$contact["url"], "Name"=>$contact["Name"]);
+       }
+
+       // Write back cached pagelist
+       set_pconfig($uid,'pages','pagelist', $pagelist);
+       return($pages);
+}
+
 function pages_page_end($a,&$b) {
+       // Only move on if if it's the "network" module and there is a logged on user
        if (($a->module != "network") OR ($a->user['uid'] == 0))
                return;
 
-       $pages = '<div id="pages-sidebar" class="widget"><h3>'.t("Community").'</h3><ul>';
-       $contacts = q("SELECT `contact`.`id`, `contact`.`url`, `contact`.`Name` FROM `contact`, `user` 
-                       WHERE `network`= 'dfrn' AND `duplex` 
-                       AND `contact`.`nick`=`user`.`nickname`
-                       AND `user`.`page-flags`= %d
-                       AND `contact`.`uid` = %d",
-                       intval(PAGE_COMMUNITY),
-                       intval($a->user['uid']));
+       $pages = '<div id="pages-sidebar" class="widget">
+                       <div class="title tool">
+                       <h3>'.t("Community").'</h3></div>
+                       <div id="sidebar-pages-list"><ul>';
+
+       $contacts = pages_getpages($a->user['uid']);
+
        foreach($contacts as $contact) {
-               $pages .= '<li class="tool"><a href="'.$contact["url"].'">'.$contact["Name"]."</a></li>";
+               $pages .= '<li class="tool"><a href="'.$contact["url"].'" class="label" target="external-link">'.$contact["Name"]."</a></li>";
        }
-       $pages .= "</ul>";
+       $pages .= "</ul></div></div>";
        if (sizeof($contacts) > 0)
                $a->page['aside'] = $pages.$a->page['aside'];
-
 }
-
 ?>

diff --git a/view/theme/diabook/style.css b/view/theme/diabook/style.css
index 0504ce96a992a7be9f5f31c9d5540280a2df1989..ce33076451b0f823a80fa436bab05487edc44aa3 100644 (file)
--- a/view/theme/diabook/style.css
+++ b/view/theme/diabook/style.css
@@ -484,6 +484,9 @@ code {
 #sidebar-group-list .tool:hover {
        background: #EEE;
 }
+#sidebar-pages-list .tool:hover {
+       background: #EEE;
+}
 .tool .label {
   float: left;
 }