Start playing with FB

diff --git a/folks/config/conf.xml b/folks/config/conf.xml
index 7434300..68dfb87 100644 (file)
--- a/folks/config/conf.xml
+++ b/folks/config/conf.xml
@@ -42,6 +42,7 @@
             <configstring name="blacklist" desc="Blacklist table"></configstring>
         </configsection>
        </case>
+      <case name="facebook" desc="FaceBook"></case>
        <case name="application" desc="Application">
             <configsection name="params">
                 <configenum name="app" desc="The application which is providing friends">letter

diff --git a/folks/lib/Friends/facebook.php b/folks/lib/Friends/facebook.php
new file mode 100644 (file)
index 0000000..85a8342
--- /dev/null
+++ b/folks/lib/Friends/facebook.php
@@ -0,0 +1,60 @@
+<?php
+/**
+ * Folks internal firends implementaton
+ *
+ * NOTE: You must add enable facebook in global horde configuration
+ *
+ * $Horde: incubator/letter/lib/Friends/letter.php,v 1.9 2009/01/06 17:50:52 jan Exp $
+ *
+ * Copyright 2007-2009 The Horde Project (http://www.horde.org/)
+ *
+ * See the enclosed file COPYING for license information (GPL). If you
+ * did not receive this file, see http://www.fsf.org/copyleft/gpl.html.
+ *
+ * @author  Duck <duck@obala.net>
+ * @package Folks
+ */
+class Folks_Friends_facebook extends Folks_Friends {
+
+    /**
+     * Get user friends
+     *
+     * @return array of users
+     */
+    protected function _getFriends()
+    {
+        global $conf, $prefs;
+
+        if (!$conf['facebook']['enabled']) {
+            return PEAR::raiseError(_("No Facebook integration exists."));
+        }
+
+        $context = array('http_client' => new Horde_Http_Client(),
+                         'http_request' => new Horde_Controller_Request_Http());
+        $facebook = new Horde_Service_Facebook($conf['facebook']['key'],
+                                               $conf['facebook']['secret'],
+                                               $context);
+
+        $session = unserialize($prefs->getValue('facebook'));
+        $facebook->auth->setUser($session['uid'], $session['sid'], 0);
+
+        $fql = 'SELECT uid, name FROM user WHERE uid IN ('
+            . 'SELECT uid2 FROM friend WHERE uid1=' . $session['uid'] . ')';
+
+        $results = $facebook->fql->run($fql);
+        $friends = array();
+        foreach ($results as $result) {
+            $friends[$result['uid']] = $result['uid'];
+        }
+
+        return $friends;
+    }
+
+    /**
+     * Get avaiable groups
+     */
+    public function getGroups()
+    {
+        return array('whitelist' => _("Friends"));
+    }
+}
\ No newline at end of file