From 580bc49308415953be355f59a2e59b4dc95b1bc0 Mon Sep 17 00:00:00 2001
From: friendica <info@friendica.com>
Date: Fri, 23 Mar 2012 01:18:45 -0700
Subject: [PATCH] "page" addon - higher performance version of "pages" addon

---
 page.tgz      | Bin 0 -> 959 bytes
 page/README   |   3 +++
 page/page.php |  60 ++++++++++++++++++++++++++++++++++++++++++++++++++
 3 files changed, 63 insertions(+)
 create mode 100644 page.tgz
 create mode 100755 page/README
 create mode 100755 page/page.php

diff --git a/page.tgz b/page.tgz
new file mode 100644
index 0000000000000000000000000000000000000000..c684499b2af20280efbbdc4cb584b219d2e57a3b
GIT binary patch
literal 959
zcmV;w13>&AiwFSEF>Fr&1MOBzZ`(!?)|LDf(}i17hD_=$!xfntv4S4rxNwT}U>Md)
zTuBR4B)cT-Iz|3_XO^^VsVSU8<sP~p1QN3|JFjn+tBfy&-`FqOh|y@!=nnd$ZnxiP
z4~E@gzoXY{G&-G8uh;Ii2c++GhG-6hJ?EuS<^@*(jWwSyrMi>JKiFl<!LW0DeEb?Y
zy&^K=pB`Se%JvlF1^&CELH`;5J><XF>-8JZ-cvqX_@DDXeuKQ*{^6kwhwy=~#R>d^
z(?HUh$mdFCg-nwZ__#{%bBJYL<d804p03wrB8vy0*~!WLlTf)f?RagHPs?JJsuMVu
zw*t-|y9?tr%0F$o?V+cT%x63o5u{1w5VE*jqV?=y+tqx<MGT+PB|gXGD3gj8BFVTa
zg!CdozVPSU_M%MYl)H9#BNOB~j@>5wX<JGxu@IqdR%v?cI@&-ak<$W)M^T#iTc?7S
zwaLb=`J?@1Hvo3yd5ALkcY^FhS&D+*?m;OdieuZ>0WA<Q5CB(-Ke)IPm*;6x@Hx^I
z!0#^mIC(#L`zuUkG;P7OR5860<a-M5E-%huTANR8%d&p^d2%^HwJ7dWbvq5fi54nx
z;Pk^8Oc$vt*HiS`sbtKAr0*lvqP;RH?s!}!Xj@e(l;L)Ez7OxQEg%<AtOR5#UC3B~
z%z^LBmTh4`!RIUYsUn`kqoA8zMYy`&#9&w;3&KaED=lBQfKkO;3cWxY8Evhjc#WA_
zUuas2QYEgA@ipcj8FLSK>xYAx&Is$fNa6=rr+0#e8tbHA;pDnrR=1X+K~!SlJc&r5
z>K4T5a#@{*G8f9WaIcH*kHXsgyWq)16D}@6E6MiC!Nxn-i2&M7B%sdzIStM@l6N4Z
zfYHKHE+aAHiorbQc^<HP8R3+%kjT`Q^?D%-j9jE?T<cc7(D4eFz1{FdUyhtLJ!kBr
za_r;oCpQ$Zj&-C1)6BAPT*jfZJFwfczFnH0pKqNB@TlHcZi>+9k2$QASOm=R$T<eO
zq0bKviHphmN<>omsN0$b&)Kvn<}(p9z>5R722A{c$2{RNR+QW_YzozE?ar9T#y-cU
z#4=>nU~Mu)4R)dGSM?+dB0ZO%MY?z@vk4*cO4VWBdgvWaO(n*m_6L8{(a^pL?XP|R
z^+)J(a(Z??+1nlS;{U(?u)hDhqh5D}_kVXV9GUz7HK32IZNG56|JPX>7#J8B7#J8B
h7#J8B7#J8B7#J8B7#J8B7#MsD{sJW}p*;X7007pc<In&A

literal 0
HcmV?d00001

diff --git a/page/README b/page/README
new file mode 100755
index 00000000..6ec314b7
--- /dev/null
+++ b/page/README
@@ -0,0 +1,3 @@
+Pages
+
+Shows lists of community pages
diff --git a/page/page.php b/page/page.php
new file mode 100755
index 00000000..3333bb24
--- /dev/null
+++ b/page/page.php
@@ -0,0 +1,60 @@
+<?php
+/**
+ * Name: Page
+ * Description: Shows lists of community pages
+ * Version: 1.0
+ * Author: Mike Macgirvin <mike@macgirvin.com>
+ * based on pages plugin by
+ * Author: Michael Vogel <ike@piratenpartei.de>
+ *
+ */
+
+function page_install() {
+	register_hook('page_end', 'addon/page/page.php', 'page_page_end');
+}
+
+function page_uninstall() {
+	unregister_hook('page_end', 'addon/page/page.php', 'page_page_end');
+}
+
+
+function page_getpage($uid) {
+
+
+	$pagelist = array();
+
+	$contacts = q("SELECT `id`, `url`, `name` FROM `contact`
+			WHERE `network`= 'dfrn' AND `forum` = 1 AND `uid` = %d",
+			intval($uid)
+	);
+
+	$page = array();
+
+	// Look if the profile is a community page
+	foreach($contacts as $contact) {
+		$page[] = array("url"=>$contact["url"], "name"=>$contact["name"], "id"=>$contact["id"]);
+	}
+	return($page);
+}
+
+function page_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;
+
+	$page = '<div id="page-sidebar" class="widget">
+			<div class="title tool">
+			<h3>'.t("Community Pages").'</h3></div>
+			<div id="sidebar-page-list"><ul>';
+
+	$contacts = page_getpage($a->user['uid']);
+
+	foreach($contacts as $contact) {
+		$page .= '<li class="tool"><a href="'.$a->get_baseurl().'/redir/'.$contact["id"].'" class="label" target="external-link">'.
+				$contact["name"]."</a></li>";
+	}
+	$page .= "</ul></div></div>";
+	if (sizeof($contacts) > 0)
+		$a->page['aside'] = $page . $a->page['aside'];
+}
+?>
-- 
2.39.2