3 * Name: Facebook Connector
5 * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
6 * Tobias Hößl <https://github.com/CatoTH/>
10 * Installing the Friendica/Facebook connector
12 * 1. register an API key for your site from developer.facebook.com
13 * a. We'd be very happy if you include "Friendica" in the application name
14 * to increase name recognition. The Friendica icons are also present
15 * in the images directory and may be uploaded as a Facebook app icon.
16 * Use images/friendica-16.jpg for the Icon and images/friendica-128.jpg for the Logo.
17 * b. The url should be your site URL with a trailing slash.
18 * Friendica is a software application and does not require a Privacy Policy
19 * or Terms of Service, though your installation of it might. Facebook may require
20 * that you provide a Privacy Policy, which we find ironic.
21 * c. Set the following values in your .htconfig.php file
22 * $a->config['facebook']['appid'] = 'xxxxxxxxxxx';
23 * $a->config['facebook']['appsecret'] = 'xxxxxxxxxxxxxxx';
24 * Replace with the settings Facebook gives you.
25 * d. Navigate to Set Web->Site URL & Domain -> Website Settings. Set
26 * Site URL to yoursubdomain.yourdomain.com. Set Site Domain to your
28 * 2. (This step is now obsolete. Enable the plugin via the Admin panel.)
29 * Enable the facebook plugin by including it in .htconfig.php - e.g.
30 * $a->config['system']['addon'] = 'plugin1,plugin2,facebook';
31 * 3. Visit the Facebook Settings section of the "Settings->Plugin Settings" page.
32 * and click 'Install Facebook Connector'.
33 * 4. This will ask you to login to Facebook and grant permission to the
34 * plugin to do its stuff. Allow it to do so.
35 * 5. Optional step: If you want to use Facebook Real Time Updates (so new messages
36 * and new contacts are added ~1min after they are postet / added on FB), go to
37 * Settings -> plugins -> facebook and press the "Activate Real-Time Updates"-button.
38 * 6. You're done. To turn it off visit the Plugin Settings page again and
39 * 'Remove Facebook posting'.
41 * Vidoes and embeds will not be posted if there is no other content. Links
42 * and images will be converted to a format suitable for the Facebook API and
43 * long posts truncated - with a link to view the full post.
45 * Facebook contacts will not be able to view private photos, as they are not able to
46 * authenticate to your site to establish identity. We will address this
47 * in a future release.
51 * - Implement a method for the administrator to delete all configuration data the plugin has created,
52 * e.g. the app_access_token
53 * - Implement a configuration option to set the polling interval system-wide
56 define('FACEBOOK_MAXPOSTLEN', 420);
57 define('FACEBOOK_SESSION_ERR_NOTIFICATION_INTERVAL', 259200); // 3 days
60 function facebook_install() {
61 register_hook('post_local', 'addon/facebook/facebook.php', 'facebook_post_local');
62 register_hook('notifier_normal', 'addon/facebook/facebook.php', 'facebook_post_hook');
63 register_hook('jot_networks', 'addon/facebook/facebook.php', 'facebook_jot_nets');
64 register_hook('connector_settings', 'addon/facebook/facebook.php', 'facebook_plugin_settings');
65 register_hook('cron', 'addon/facebook/facebook.php', 'facebook_cron');
66 register_hook('enotify', 'addon/facebook/facebook.php', 'facebook_enotify');
67 register_hook('queue_predeliver', 'addon/facebook/facebook.php', 'fb_queue_hook');
71 function facebook_uninstall() {
72 unregister_hook('post_local', 'addon/facebook/facebook.php', 'facebook_post_local');
73 unregister_hook('notifier_normal', 'addon/facebook/facebook.php', 'facebook_post_hook');
74 unregister_hook('jot_networks', 'addon/facebook/facebook.php', 'facebook_jot_nets');
75 unregister_hook('connector_settings', 'addon/facebook/facebook.php', 'facebook_plugin_settings');
76 unregister_hook('cron', 'addon/facebook/facebook.php', 'facebook_cron');
77 unregister_hook('enotify', 'addon/facebook/facebook.php', 'facebook_enotify');
78 unregister_hook('queue_predeliver', 'addon/facebook/facebook.php', 'fb_queue_hook');
81 unregister_hook('post_local_end', 'addon/facebook/facebook.php', 'facebook_post_hook');
82 unregister_hook('plugin_settings', 'addon/facebook/facebook.php', 'facebook_plugin_settings');
86 /* declare the facebook_module function so that /facebook url requests will land here */
88 function facebook_module() {}
92 // If a->argv[1] is a nickname, this is a callback from Facebook oauth requests.
93 // If $_REQUEST["realtime_cb"] is set, this is a callback from the Real-Time Updates API
95 function facebook_init(&$a) {
97 if (x($_REQUEST, "realtime_cb") && x($_REQUEST, "realtime_cb")) {
98 logger("facebook_init: Facebook Real-Time callback called", LOGGER_DEBUG);
100 if (x($_REQUEST, "hub_verify_token")) {
101 // this is the verification callback while registering for real time updates
103 $verify_token = get_config('facebook', 'cb_verify_token');
104 if ($verify_token != $_REQUEST["hub_verify_token"]) {
105 logger('facebook_init: Wrong Facebook Callback Verifier - expected ' . $verify_token . ', got ' . $_REQUEST["hub_verify_token"]);
109 if (x($_REQUEST, "hub_challenge")) {
110 logger('facebook_init: Answering Challenge: ' . $_REQUEST["hub_challenge"], LOGGER_DATA);
111 echo $_REQUEST["hub_challenge"];
116 require_once('include/items.php');
118 // this is a status update
119 $content = file_get_contents("php://input");
120 if (is_numeric($content)) $content = file_get_contents("php://input");
121 $js = json_decode($content);
122 logger(print_r($js, true), LOGGER_DATA);
124 if (!isset($js->object) || $js->object != "user" || !isset($js->entry)) {
125 logger('facebook_init: Could not parse Real-Time Update data', LOGGER_DEBUG);
129 $affected_users = array("feed" => array(), "friends" => array());
131 foreach ($js->entry as $entry) {
132 $fbuser = $entry->uid;
133 foreach ($entry->changed_fields as $field) {
134 if (!isset($affected_users[$field])) {
135 logger('facebook_init: Unknown field "' . $field . '"');
138 if (in_array($fbuser, $affected_users[$field])) continue;
140 $r = q("SELECT `uid` FROM `pconfig` WHERE `cat` = 'facebook' AND `k` = 'self_id' AND `v` = '%s' LIMIT 1", dbesc($fbuser));
145 $access_token = get_pconfig($uid,'facebook','access_token');
151 logger('facebook_init: FB-User ' . $fbuser . ' / feed', LOGGER_DEBUG);
153 if(! get_pconfig($uid,'facebook','no_wall')) {
154 $private_wall = intval(get_pconfig($uid,'facebook','private_wall'));
155 $s = fetch_url('https://graph.facebook.com/me/feed?access_token=' . $access_token);
157 $j = json_decode($s);
158 if (isset($j->data)) {
159 logger('facebook_init: wall: ' . print_r($j,true), LOGGER_DATA);
160 fb_consume_stream($uid,$j,($private_wall) ? false : true);
162 logger('facebook_init: wall: got no data from Facebook: ' . print_r($j,true), LOGGER_NORMAL);
169 logger('facebook_init: FB-User ' . $fbuser . ' / friends', LOGGER_DEBUG);
171 fb_get_friends($uid, false);
172 set_pconfig($uid,'facebook','friend_check',time());
175 logger('facebook_init: Unknown callback field for ' . $fbuser, LOGGER_NORMAL);
177 $affected_users[$field][] = $fbuser;
187 $r = q("SELECT `uid` FROM `user` WHERE `nickname` = '%s' LIMIT 1",
194 $auth_code = (x($_GET, 'code') ? $_GET['code'] : '');
195 $error = (x($_GET, 'error_description') ? $_GET['error_description'] : '');
199 logger('facebook_init: Error: ' . $error);
201 if($auth_code && $uid) {
203 $appid = get_config('facebook','appid');
204 $appsecret = get_config('facebook', 'appsecret');
206 $x = fetch_url('https://graph.facebook.com/oauth/access_token?client_id='
207 . $appid . '&client_secret=' . $appsecret . '&redirect_uri='
208 . urlencode($a->get_baseurl() . '/facebook/' . $nick)
209 . '&code=' . $auth_code);
211 logger('facebook_init: returned access token: ' . $x, LOGGER_DATA);
213 if(strpos($x,'access_token=') !== false) {
214 $token = str_replace('access_token=', '', $x);
215 if(strpos($token,'&') !== false)
216 $token = substr($token,0,strpos($token,'&'));
217 set_pconfig($uid,'facebook','access_token',$token);
218 set_pconfig($uid,'facebook','post','1');
219 if(get_pconfig($uid,'facebook','no_linking') === false)
220 set_pconfig($uid,'facebook','no_linking',1);
222 fb_get_friends($uid, true);
223 fb_consume_all($uid);
232 function fb_get_self($uid) {
233 $access_token = get_pconfig($uid,'facebook','access_token');
236 $s = fetch_url('https://graph.facebook.com/me/?access_token=' . $access_token);
238 $j = json_decode($s);
239 set_pconfig($uid,'facebook','self_id',(string) $j->id);
243 function fb_get_friends_sync_new($uid, $access_token, $person) {
244 $link = 'http://facebook.com/profile.php?id=' . $person->id;
246 $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `url` = '%s' LIMIT 1",
251 if (count($r) == 0) {
252 logger('fb_get_friends: new contact found: ' . $link, LOGGER_DEBUG);
254 fb_get_friends_sync_full($uid, $access_token, $person);
258 function fb_get_friends_sync_full($uid, $access_token, $person) {
259 $s = fetch_url('https://graph.facebook.com/' . $person->id . '?access_token=' . $access_token);
261 $jp = json_decode($s);
262 logger('fb_get_friends: info: ' . print_r($jp,true), LOGGER_DATA);
264 // always use numeric link for consistency
266 $jp->link = 'http://facebook.com/profile.php?id=' . $person->id;
268 // check if we already have a contact
270 $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `url` = '%s' LIMIT 1",
277 // check that we have all the photos, this has been known to fail on occasion
279 if((! $r[0]['photo']) || (! $r[0]['thumb']) || (! $r[0]['micro'])) {
280 require_once("Photo.php");
282 $photos = import_profile_photo('https://graph.facebook.com/' . $jp->id . '/picture', $uid, $r[0]['id']);
284 $r = q("UPDATE `contact` SET `photo` = '%s',
290 WHERE `id` = %d LIMIT 1
295 dbesc(datetime_convert()),
296 dbesc(datetime_convert()),
297 dbesc(datetime_convert()),
305 // create contact record
306 $r = q("INSERT INTO `contact` ( `uid`, `created`, `url`, `nurl`, `addr`, `alias`, `notify`, `poll`,
307 `name`, `nick`, `photo`, `network`, `rel`, `priority`,
308 `writable`, `blocked`, `readonly`, `pending` )
309 VALUES ( %d, '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', '%s', %d, %d, %d, 0, 0, 0 ) ",
311 dbesc(datetime_convert()),
313 dbesc(normalise_link($jp->link)),
317 dbesc('facebook ' . $jp->id),
319 dbesc(($jp->nickname) ? $jp->nickname : strtolower($jp->first_name)),
320 dbesc('https://graph.facebook.com/' . $jp->id . '/picture'),
321 dbesc(NETWORK_FACEBOOK),
322 intval(CONTACT_IS_FRIEND),
328 $r = q("SELECT * FROM `contact` WHERE `url` = '%s' AND `uid` = %d LIMIT 1",
338 $contact_id = $r[0]['id'];
340 require_once("Photo.php");
342 $photos = import_profile_photo($r[0]['photo'],$uid,$contact_id);
344 $r = q("UPDATE `contact` SET `photo` = '%s',
350 WHERE `id` = %d LIMIT 1
355 dbesc(datetime_convert()),
356 dbesc(datetime_convert()),
357 dbesc(datetime_convert()),
364 // if $fullsync is true, only new contacts are searched for
366 function fb_get_friends($uid, $fullsync = true) {
368 $r = q("SELECT `uid` FROM `user` WHERE `uid` = %d AND `account_expired` = 0 LIMIT 1",
374 $access_token = get_pconfig($uid,'facebook','access_token');
376 $no_linking = get_pconfig($uid,'facebook','no_linking');
382 $s = fetch_url('https://graph.facebook.com/me/friends?access_token=' . $access_token);
384 logger('facebook: fb_get_friends: ' . $s, LOGGER_DATA);
385 $j = json_decode($s);
386 logger('facebook: fb_get_friends: json: ' . print_r($j,true), LOGGER_DATA);
389 foreach($j->data as $person)
391 fb_get_friends_sync_full($uid, $access_token, $person);
393 fb_get_friends_sync_new($uid, $access_token, $person);
397 // This is the POST method to the facebook settings page
398 // Content is posted to Facebook in the function facebook_post_hook()
400 function facebook_post(&$a) {
405 $value = ((x($_POST,'post_by_default')) ? intval($_POST['post_by_default']) : 0);
406 set_pconfig($uid,'facebook','post_by_default', $value);
408 $no_linking = get_pconfig($uid,'facebook','no_linking');
410 $no_wall = ((x($_POST,'facebook_no_wall')) ? intval($_POST['facebook_no_wall']) : 0);
411 set_pconfig($uid,'facebook','no_wall',$no_wall);
413 $private_wall = ((x($_POST,'facebook_private_wall')) ? intval($_POST['facebook_private_wall']) : 0);
414 set_pconfig($uid,'facebook','private_wall',$private_wall);
417 set_pconfig($uid,'facebook','blocked_apps',escape_tags(trim($_POST['blocked_apps'])));
419 $linkvalue = ((x($_POST,'facebook_linking')) ? intval($_POST['facebook_linking']) : 0);
420 set_pconfig($uid,'facebook','no_linking', (($linkvalue) ? 0 : 1));
422 // FB linkage was allowed but has just been turned off - remove all FB contacts and posts
424 if((! intval($no_linking)) && (! intval($linkvalue))) {
425 $r = q("SELECT `id` FROM `contact` WHERE `uid` = %d AND `network` = '%s' ",
427 dbesc(NETWORK_FACEBOOK)
430 require_once('include/Contact.php');
432 contact_remove($rr['id']);
435 elseif(intval($no_linking) && intval($linkvalue)) {
436 // FB linkage is now allowed - import stuff.
438 fb_get_friends($uid, true);
439 fb_consume_all($uid);
442 info( t('Settings updated.') . EOL);
448 // Facebook settings form
450 function facebook_content(&$a) {
453 notice( t('Permission denied.') . EOL);
457 if($a->argc > 1 && $a->argv[1] === 'remove') {
458 del_pconfig(local_user(),'facebook','post');
459 info( t('Facebook disabled') . EOL);
462 if($a->argc > 1 && $a->argv[1] === 'friends') {
463 fb_get_friends(local_user(), true);
464 info( t('Updating contacts') . EOL);
468 $fb_installed = get_pconfig(local_user(),'facebook','post');
470 $appid = get_config('facebook','appid');
473 notice( t('Facebook API key is missing.') . EOL);
477 $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="'
478 . $a->get_baseurl() . '/addon/facebook/facebook.css' . '" media="all" />' . "\r\n";
480 $o .= '<h3>' . t('Facebook Connect') . '</h3>';
482 if(! $fb_installed) {
483 $o .= '<div id="facebook-enable-wrapper">';
485 $o .= '<a href="https://www.facebook.com/dialog/oauth?client_id=' . $appid . '&redirect_uri='
486 . $a->get_baseurl() . '/facebook/' . $a->user['nickname'] . '&scope=publish_stream,read_stream,offline_access">' . t('Install Facebook connector for this account.') . '</a>';
491 $o .= '<div id="facebook-disable-wrapper">';
493 $o .= '<a href="' . $a->get_baseurl() . '/facebook/remove' . '">' . t('Remove Facebook connector') . '</a></div>';
495 $o .= '<div id="facebook-enable-wrapper">';
497 $o .= '<a href="https://www.facebook.com/dialog/oauth?client_id=' . $appid . '&redirect_uri='
498 . $a->get_baseurl() . '/facebook/' . $a->user['nickname'] . '&scope=publish_stream,read_stream,offline_access">' . t('Re-authenticate [This is necessary whenever your Facebook password is changed.]') . '</a>';
501 $o .= '<div id="facebook-post-default-form">';
502 $o .= '<form action="facebook" method="post" >';
503 $post_by_default = get_pconfig(local_user(),'facebook','post_by_default');
504 $checked = (($post_by_default) ? ' checked="checked" ' : '');
505 $o .= '<input type="checkbox" name="post_by_default" value="1"' . $checked . '/>' . ' ' . t('Post to Facebook by default') . EOL;
507 $no_linking = get_pconfig(local_user(),'facebook','no_linking');
508 $checked = (($no_linking) ? '' : ' checked="checked" ');
509 $o .= '<input type="checkbox" name="facebook_linking" value="1"' . $checked . '/>' . ' ' . t('Link all your Facebook friends and conversations on this website') . EOL ;
511 $o .= '<p>' . t('Facebook conversations consist of your <em>profile wall</em> and your friend <em>stream</em>.');
512 $o .= ' ' . t('On this website, your Facebook friend stream is only visible to you.');
513 $o .= ' ' . t('The following settings determine the privacy of your Facebook profile wall on this website.') . '</p>';
515 $private_wall = get_pconfig(local_user(),'facebook','private_wall');
516 $checked = (($private_wall) ? ' checked="checked" ' : '');
517 $o .= '<input type="checkbox" name="facebook_private_wall" value="1"' . $checked . '/>' . ' ' . t('On this website your Facebook profile wall conversations will only be visible to you') . EOL ;
520 $no_wall = get_pconfig(local_user(),'facebook','no_wall');
521 $checked = (($no_wall) ? ' checked="checked" ' : '');
522 $o .= '<input type="checkbox" name="facebook_no_wall" value="1"' . $checked . '/>' . ' ' . t('Do not import your Facebook profile wall conversations') . EOL ;
524 $o .= '<p>' . t('If you choose to link conversations and leave both of these boxes unchecked, your Facebook profile wall will be merged with your profile wall on this website and your privacy settings on this website will be used to determine who may see the conversations.') . '</p>';
527 $blocked_apps = get_pconfig(local_user(),'facebook','blocked_apps');
529 $o .= '<div><label id="blocked-apps-label" for="blocked-apps">' . t('Comma separated applications to ignore') . ' </label></div>';
530 $o .= '<div><textarea id="blocked-apps" name="blocked_apps" >' . htmlspecialchars($blocked_apps) . '</textarea></div>';
532 $o .= '<input type="submit" name="submit" value="' . t('Submit') . '" /></form></div>';
540 function facebook_cron($a,$b) {
542 $last = get_config('facebook','last_poll');
544 $poll_interval = intval(get_config('facebook','poll_interval'));
546 $poll_interval = 3600;
549 $next = $last + $poll_interval;
554 logger('facebook_cron');
557 // Find the FB users on this site and randomize in case one of them
558 // uses an obscene amount of memory. It may kill this queue run
559 // but hopefully we'll get a few others through on each run.
561 $r = q("SELECT * FROM `pconfig` WHERE `cat` = 'facebook' AND `k` = 'post' AND `v` = '1' ORDER BY RAND() ");
564 if(get_pconfig($rr['uid'],'facebook','no_linking'))
566 $ab = intval(get_config('system','account_abandon_days'));
568 $z = q("SELECT `uid` FROM `user` WHERE `uid` = %d AND `login_date` > UTC_TIMESTAMP() - INTERVAL %d DAY LIMIT 1",
576 // check for new friends once a day
577 $last_friend_check = get_pconfig($rr['uid'],'facebook','friend_check');
578 if($last_friend_check)
579 $next_friend_check = $last_friend_check + 86400;
580 if($next_friend_check <= time()) {
581 fb_get_friends($rr['uid'], true);
582 set_pconfig($rr['uid'],'facebook','friend_check',time());
584 fb_consume_all($rr['uid']);
588 if (get_config('facebook', 'realtime_active') == 1) {
589 if (!facebook_check_realtime_active()) {
591 logger('facebook_cron: Facebook is not sending Real-Time Updates any more, although it is supposed to. Trying to fix it...', LOGGER_NORMAL);
592 facebook_subscription_add_users();
594 if (facebook_check_realtime_active())
595 logger('facebook_cron: Successful', LOGGER_NORMAL);
597 logger('facebook_cron: Failed', LOGGER_NORMAL);
599 if(strlen($a->config['admin_email']) && !get_config('facebook', 'realtime_err_mailsent')) {
600 $res = mail($a->config['admin_email'], t('Problems with Facebook Real-Time Updates'),
601 "Hi!\n\nThere's a problem with the Facebook Real-Time Updates that cannot be solved automatically. Maybe a permission issue?\n\nPlease try to re-activate it on " . $a->config["system"]["url"] . "/admin/plugins/facebook\n\nThis e-mail will only be sent once.",
602 'From: ' . t('Administrator') . '@' . $_SERVER['SERVER_NAME'] . "\n"
603 . 'Content-type: text/plain; charset=UTF-8' . "\n"
604 . 'Content-transfer-encoding: 8bit'
607 set_config('facebook', 'realtime_err_mailsent', 1);
610 } else { // !facebook_check_realtime_active()
611 del_config('facebook', 'realtime_err_mailsent');
615 set_config('facebook','last_poll', time());
621 function facebook_plugin_settings(&$a,&$b) {
623 $b .= '<div class="settings-block">';
624 $b .= '<h3>' . t('Facebook') . '</h3>';
625 $b .= '<a href="facebook">' . t('Facebook Connector Settings') . '</a><br />';
631 function facebook_plugin_admin(&$a, &$o){
633 $activated = facebook_check_realtime_active();
635 $o = t('Real-Time Updates are activated.') . '<br><br>';
636 $o .= '<input type="submit" name="real_time_deactivate" value="' . t('Deactivate Real-Time Updates') . '">';
638 $o = t('Real-Time Updates not activated.') . '<br><input type="submit" name="real_time_activate" value="' . t('Activate Real-Time Updates') . '">';
642 function facebook_plugin_admin_post(&$a, &$o){
643 if (x($_REQUEST,'real_time_activate')) {
644 facebook_subscription_add_users();
646 if (x($_REQUEST,'real_time_deactivate')) {
647 facebook_subscription_del_users();
651 function facebook_jot_nets(&$a,&$b) {
655 $fb_post = get_pconfig(local_user(),'facebook','post');
656 if(intval($fb_post) == 1) {
657 $fb_defpost = get_pconfig(local_user(),'facebook','post_by_default');
658 $selected = ((intval($fb_defpost) == 1) ? ' checked="checked" ' : '');
659 $b .= '<div class="profile-jot-net"><input type="checkbox" name="facebook_enable"' . $selected . ' value="1" /> '
660 . t('Post to Facebook') . '</div>';
665 function facebook_post_hook(&$a,&$b) {
668 if($b['deleted'] || ($b['created'] !== $b['edited']))
672 * Post to Facebook stream
675 require_once('include/group.php');
676 require_once('include/html2plain.php');
678 logger('Facebook post');
683 $toplevel = (($b['id'] == $b['parent']) ? true : false);
686 $linking = ((get_pconfig($b['uid'],'facebook','no_linking')) ? 0 : 1);
688 if((! $toplevel) && ($linking)) {
689 $r = q("SELECT * FROM `item` WHERE `id` = %d AND `uid` = %d LIMIT 1",
690 intval($b['parent']),
693 if(count($r) && substr($r[0]['uri'],0,4) === 'fb::')
694 $reply = substr($r[0]['uri'],4);
695 elseif(count($r) && substr($r[0]['extid'],0,4) === 'fb::')
696 $reply = substr($r[0]['extid'],4);
700 $u = q("SELECT * FROM user where uid = %d limit 1",
706 // only accept comments from the item owner. Other contacts are unknown to FB.
708 if(! link_compare($b['author-link'], $a->get_baseurl() . '/profile/' . $u[0]['nickname']))
712 logger('facebook reply id=' . $reply);
715 if(strstr($b['postopts'],'facebook') || ($b['private']) || ($reply)) {
717 if($b['private'] && $reply === false) {
718 $allow_people = expand_acl($b['allow_cid']);
719 $allow_groups = expand_groups(expand_acl($b['allow_gid']));
720 $deny_people = expand_acl($b['deny_cid']);
721 $deny_groups = expand_groups(expand_acl($b['deny_gid']));
723 $recipients = array_unique(array_merge($allow_people,$allow_groups));
724 $deny = array_unique(array_merge($deny_people,$deny_groups));
726 $allow_str = dbesc(implode(', ',$recipients));
728 $r = q("SELECT `notify` FROM `contact` WHERE `id` IN ( $allow_str ) AND `network` = 'face'");
729 $allow_arr = array();
732 $allow_arr[] = $rr['notify'];
735 $deny_str = dbesc(implode(', ',$deny));
737 $r = q("SELECT `notify` FROM `contact` WHERE `id` IN ( $deny_str ) AND `network` = 'face'");
741 $deny_arr[] = $rr['notify'];
744 if(count($deny_arr) && (! count($allow_arr))) {
746 // One or more FB folks were denied access but nobody on FB was specifically allowed access.
747 // This might cause the post to be open to public on Facebook, but only to selected members
748 // on another network. Since this could potentially leak a post to somebody who was denied,
749 // we will skip posting it to Facebook with a slightly vague but relevant message that will
750 // hopefully lead somebody to this code comment for a better explanation of what went wrong.
752 notice( t('Post to Facebook cancelled because of multi-network access permission conflict.') . EOL);
757 // if it's a private message but no Facebook members are allowed or denied, skip Facebook post
759 if((! count($allow_arr)) && (! count($deny_arr)))
763 if($b['verb'] == ACTIVITY_LIKE)
767 $appid = get_config('facebook', 'appid' );
768 $secret = get_config('facebook', 'appsecret' );
770 if($appid && $secret) {
772 logger('facebook: have appid+secret');
774 $fb_token = get_pconfig($b['uid'],'facebook','access_token');
777 // post to facebook if it's a public post and we've ticked the 'post to Facebook' box,
778 // or it's a private message with facebook participants
779 // or it's a reply or likes action to an existing facebook post
781 if($fb_token && ($toplevel || $b['private'] || $reply)) {
782 logger('facebook: able to post');
783 require_once('library/facebook.php');
784 require_once('include/bbcode.php');
788 logger('Facebook post: original msg=' . $msg, LOGGER_DATA);
790 // make links readable before we strip the code
792 // unless it's a dislike - just send the text as a comment
794 if($b['verb'] == ACTIVITY_DISLIKE)
795 $msg = trim(strip_tags(bbcode($msg)));
797 /*$search_str = $a->get_baseurl() . '/search';
799 if(preg_match("/\[url=(.*?)\](.*?)\[\/url\]/is",$msg,$matches)) {
801 // don't use hashtags for message link
803 if(strpos($matches[2],$search_str) === false) {
805 if(substr($matches[2],0,5) != '[img]')
806 $linkname = $matches[2];
810 // strip tag links to avoid link clutter, this really should be
811 // configurable because we're losing information
813 $msg = preg_replace("/\#\[url=(.*?)\](.*?)\[\/url\]/is",'#$2',$msg);
815 // provide the link separately for normal links
816 $msg = preg_replace("/\[url=(.*?)\](.*?)\[\/url\]/is",'$2 $1',$msg);
818 if(preg_match("/\[img\](.*?)\[\/img\]/is",$msg,$matches))
819 $image = $matches[1];
821 $msg = preg_replace("/\[img\](.*?)\[\/img\]/is", t('Image: ') . '$1', $msg);
823 if((strpos($link,z_root()) !== false) && (! $image))
824 $image = $a->get_baseurl() . '/images/friendica-64.jpg';
826 $msg = trim(strip_tags(bbcode($msg)));*/
830 // Looking for images
831 if(preg_match("/\[img\=([0-9]*)x([0-9]*)\](.*?)\[\/img\]/is",$b['body'],$matches))
832 $image = $matches[3];
834 if(preg_match("/\[img\](.*?)\[\/img\]/is",$b['body'],$matches))
835 $image = $matches[1];
837 $html = bbcode($b['body']);
838 $msg = trim($b['title']." \n".html2plain($html, 0, true));
839 $msg = html_entity_decode($msg,ENT_QUOTES,'UTF-8');
843 // add any attachments as text urls
845 $arr = explode(',',$b['attach']);
849 foreach($arr as $r) {
851 $cnt = preg_match('|\[attach\]href=\"(.*?)\" size=\"(.*?)\" type=\"(.*?)\" title=\"(.*?)\"\[\/attach\]|',$r,$matches);
853 $msg .= "\n".$matches[1];
858 // To-Do: look for bookmark-bbcode and handle it with priority
860 $links = collecturls($html);
861 if (sizeof($links) > 0) {
863 $link = current($links);
864 /*if (strlen($msg."\n".$link) <= FACEBOOK_MAXPOSTLEN)
870 if ((strlen($msg) > FACEBOOK_MAXPOSTLEN) or $toolong) {
872 require_once('library/slinky.php');
874 $display_url = $b['plink'];
876 $slinky = new Slinky( $display_url );
877 // setup a cascade of shortening services
878 // try to get a short link from these services
879 // in the order ur1.ca, trim, id.gd, tinyurl
880 $slinky->set_cascade( array( new Slinky_UR1ca(), new Slinky_Trim(), new Slinky_IsGd(), new Slinky_TinyURL() ) );
881 $shortlink = $slinky->short();
882 // the new message will be shortened such that "... $shortlink"
883 // will fit into the character limit
884 $msg = substr($msg, 0, FACEBOOK_MAXPOSTLEN - strlen($shortlink) - 4);
885 $msg .= '... ' . $shortlink;
890 logger('Facebook post: msg=' . $msg, LOGGER_DATA);
893 $postvars = array('access_token' => $fb_token);
897 'access_token' => $fb_token,
901 $postvars['picture'] = $image;
903 $postvars['link'] = $link;
905 $postvars['name'] = $linkname;
908 if(($b['private']) && ($toplevel)) {
909 $postvars['privacy'] = '{"value": "CUSTOM", "friends": "SOME_FRIENDS"';
910 if(count($allow_arr))
911 $postvars['privacy'] .= ',"allow": "' . implode(',',$allow_arr) . '"';
913 $postvars['privacy'] .= ',"deny": "' . implode(',',$deny_arr) . '"';
914 $postvars['privacy'] .= '}';
919 $url = 'https://graph.facebook.com/' . $reply . '/' . (($likes) ? 'likes' : 'comments');
922 $url = 'https://graph.facebook.com/me/feed';
924 $postvars['actions'] = '{"name": "' . t('View on Friendica') . '", "link": "' . $b['plink'] . '"}';
927 logger('facebook: post to ' . $url);
928 logger('facebook: postvars: ' . print_r($postvars,true));
930 // "test_mode" prevents anything from actually being posted.
931 // Otherwise, let's do it.
933 if(! get_config('facebook','test_mode')) {
934 $x = post_url($url, $postvars);
935 logger('Facebook post returns: ' . $x, LOGGER_DEBUG);
937 $retj = json_decode($x);
939 q("UPDATE `item` SET `extid` = '%s' WHERE `id` = %d LIMIT 1",
940 dbesc('fb::' . $retj->id),
946 $s = serialize(array('url' => $url, 'item' => $b['id'], 'post' => $postvars));
947 require_once('include/queue_fn.php');
948 add_to_queue($a->contact,NETWORK_FACEBOOK,$s);
949 notice( t('Facebook post failed. Queued for retry.') . EOL);
952 if (isset($retj->error) && $retj->error->type == "OAuthException" && $retj->error->code == 190) {
953 logger('Facebook session has expired due to changed password.', LOGGER_DEBUG);
955 $last_notification = get_pconfig($b['uid'], 'facebook', 'session_expired_mailsent');
956 if (!$last_notification || $last_notification < (time() - FACEBOOK_SESSION_ERR_NOTIFICATION_INTERVAL)) {
957 require_once('include/enotify.php');
959 $r = q("SELECT * FROM `user` WHERE `uid` = %d LIMIT 1", intval($b['uid']) );
962 'type' => NOTIFY_SYSTEM,
963 'system_type' => 'facebook_connection_invalid',
964 'language' => $r[0]['language'],
965 'to_name' => $r[0]['username'],
966 'to_email' => $r[0]['email'],
969 set_pconfig($b['uid'], 'facebook', 'session_expired_mailsent', time());
970 } else logger('Facebook: No notification, as the last one was sent on ' . $last_notification, LOGGER_DEBUG);
979 function facebook_enotify(&$app, &$data) {
980 if (x($data, 'params') && $data['params']['type'] == NOTIFY_SYSTEM && x($data['params'], 'system_type') && $data['params']['system_type'] == 'facebook_connection_invalid') {
981 $data['itemlink'] = '/facebook';
982 $data['epreamble'] = $data['preamble'] = t('Your Facebook connection became invalid. Please Re-authenticate.');
983 $data['subject'] = t('Facebook connection became invalid');
984 $data['body'] = sprintf( t("Hi %1\$s,\n\nThe connection between your accounts on %2\$s and Facebook became invalid. This usually happens after you change your Facebook-password. To enable the connection again, you have to %3\$sre-authenticate the Facebook-connector%4\$s."), $data['params']['to_name'], "[url=" . $app->config["system"]["url"] . "]" . $app->config["sitename"] . "[/url]", "[url=" . $app->config["system"]["url"] . "/facebook]", "[/url]");
988 function facebook_post_local(&$a,&$b) {
990 // Figure out if Facebook posting is enabled for this post and file it in 'postopts'
991 // where we will discover it during background delivery.
993 // This can only be triggered by a local user posting to their own wall.
995 if((local_user()) && (local_user() == $b['uid'])) {
997 $fb_post = intval(get_pconfig(local_user(),'facebook','post'));
998 $fb_enable = (($fb_post && x($_REQUEST,'facebook_enable')) ? intval($_REQUEST['facebook_enable']) : 0);
1000 // if API is used, default to the chosen settings
1001 if($_REQUEST['api_source'] && intval(get_pconfig(local_user(),'facebook','post_by_default')))
1007 if(strlen($b['postopts']))
1008 $b['postopts'] .= ',';
1009 $b['postopts'] .= 'facebook';
1014 function fb_queue_hook(&$a,&$b) {
1016 $qi = q("SELECT * FROM `queue` WHERE `network` = '%s'",
1017 dbesc(NETWORK_FACEBOOK)
1022 require_once('include/queue_fn.php');
1024 foreach($qi as $x) {
1025 if($x['network'] !== NETWORK_FACEBOOK)
1028 logger('facebook_queue: run');
1030 $r = q("SELECT `user`.* FROM `user` LEFT JOIN `contact` on `contact`.`uid` = `user`.`uid`
1031 WHERE `contact`.`self` = 1 AND `contact`.`id` = %d LIMIT 1",
1039 $appid = get_config('facebook', 'appid' );
1040 $secret = get_config('facebook', 'appsecret' );
1042 if($appid && $secret) {
1043 $fb_post = intval(get_pconfig($user['uid'],'facebook','post'));
1044 $fb_token = get_pconfig($user['uid'],'facebook','access_token');
1046 if($fb_post && $fb_token) {
1047 logger('facebook_queue: able to post');
1048 require_once('library/facebook.php');
1050 $z = unserialize($x['content']);
1052 $j = post_url($z['url'],$z['post']);
1054 $retj = json_decode($j);
1056 q("UPDATE `item` SET `extid` = '%s' WHERE `id` = %d LIMIT 1",
1057 dbesc('fb::' . $retj->id),
1060 logger('facebook_queue: success: ' . $j);
1061 remove_queue_item($x['id']);
1064 logger('facebook_queue: failed: ' . $j);
1065 update_queue_time($x['id']);
1072 function fb_consume_all($uid) {
1074 require_once('include/items.php');
1076 $access_token = get_pconfig($uid,'facebook','access_token');
1080 if(! get_pconfig($uid,'facebook','no_wall')) {
1081 $private_wall = intval(get_pconfig($uid,'facebook','private_wall'));
1082 $s = fetch_url('https://graph.facebook.com/me/feed?access_token=' . $access_token);
1084 $j = json_decode($s);
1085 if (isset($j->data)) {
1086 logger('fb_consume_stream: wall: ' . print_r($j,true), LOGGER_DATA);
1087 fb_consume_stream($uid,$j,($private_wall) ? false : true);
1089 logger('fb_consume_stream: wall: got no data from Facebook: ' . print_r($j,true), LOGGER_NORMAL);
1093 $s = fetch_url('https://graph.facebook.com/me/home?access_token=' . $access_token);
1095 $j = json_decode($s);
1096 if (isset($j->data)) {
1097 logger('fb_consume_stream: feed: ' . print_r($j,true), LOGGER_DATA);
1098 fb_consume_stream($uid,$j,false);
1100 logger('fb_consume_stream: feed: got no data from Facebook: ' . print_r($j,true), LOGGER_NORMAL);
1106 function fb_get_photo($uid,$link) {
1107 $access_token = get_pconfig($uid,'facebook','access_token');
1108 if(! $access_token || (! stristr($link,'facebook.com/photo.php')))
1109 return "\n" . '[url=' . $link . ']' . t('link') . '[/url]';
1110 $ret = preg_match('/fbid=([0-9]*)/',$link,$match);
1112 $photo_id = $match[1];
1113 $x = fetch_url('https://graph.facebook.com/' . $photo_id . '?access_token=' . $access_token);
1114 $j = json_decode($x);
1116 return "\n\n" . '[url=' . $link . '][img]' . $j->picture . '[/img][/url]';
1118 return "\n" . '[url=' . $link . ']' . t('link') . '[/url]';
1121 function fb_consume_stream($uid,$j,$wall = false) {
1126 $user = q("SELECT * FROM `user` WHERE `uid` = %d AND `account_expired` = 0 LIMIT 1",
1132 $my_local_url = $a->get_baseurl() . '/profile/' . $user[0]['nickname'];
1134 $no_linking = get_pconfig($uid,'facebook','no_linking');
1138 $self = q("SELECT * FROM `contact` WHERE `self` = 1 AND `uid` = %d LIMIT 1",
1142 $blocked_apps = get_pconfig($uid,'facebook','blocked_apps');
1143 $blocked_apps_arr = explode(',',$blocked_apps);
1145 $self_id = get_pconfig($uid,'facebook','self_id');
1146 if(! count($j->data) || (! strlen($self_id)))
1149 foreach($j->data as $entry) {
1150 logger('fb_consume: entry: ' . print_r($entry,true), LOGGER_DATA);
1151 $datarray = array();
1153 $r = q("SELECT * FROM `item` WHERE ( `uri` = '%s' OR `extid` = '%s') AND `uid` = %d LIMIT 1",
1154 dbesc('fb::' . $entry->id),
1155 dbesc('fb::' . $entry->id),
1159 $post_exists = true;
1161 $top_item = $r[0]['id'];
1164 $post_exists = false;
1169 $datarray['gravity'] = 0;
1170 $datarray['uid'] = $uid;
1171 $datarray['wall'] = (($wall) ? 1 : 0);
1172 $datarray['uri'] = $datarray['parent-uri'] = 'fb::' . $entry->id;
1173 $from = $entry->from;
1174 if($from->id == $self_id)
1175 $datarray['contact-id'] = $self[0]['id'];
1177 $r = q("SELECT * FROM `contact` WHERE `notify` = '%s' AND `uid` = %d AND `blocked` = 0 AND `readonly` = 0 LIMIT 1",
1182 $datarray['contact-id'] = $r[0]['id'];
1185 // don't store post if we don't have a contact
1187 if(! x($datarray,'contact-id')) {
1188 logger('no contact: post ignored');
1192 $datarray['verb'] = ACTIVITY_POST;
1194 $datarray['owner-name'] = $self[0]['name'];
1195 $datarray['owner-link'] = $self[0]['url'];
1196 $datarray['owner-avatar'] = $self[0]['thumb'];
1198 if(isset($entry->application) && isset($entry->application->name) && strlen($entry->application->name))
1199 $datarray['app'] = strip_tags($entry->application->name);
1201 $datarray['app'] = 'facebook';
1203 $found_blocked = false;
1205 if(count($blocked_apps_arr)) {
1206 foreach($blocked_apps_arr as $bad_appl) {
1207 if(strlen(trim($bad_appl)) && (stristr($datarray['app'],trim($bad_appl)))) {
1208 $found_blocked = true;
1213 if($found_blocked) {
1214 logger('facebook: blocking application: ' . $datarray['app']);
1218 $datarray['author-name'] = $from->name;
1219 $datarray['author-link'] = 'http://facebook.com/profile.php?id=' . $from->id;
1220 $datarray['author-avatar'] = 'https://graph.facebook.com/' . $from->id . '/picture';
1221 $datarray['plink'] = $datarray['author-link'] . '&v=wall&story_fbid=' . substr($entry->id,strpos($entry->id,'_') + 1);
1223 $datarray['body'] = escape_tags($entry->message);
1225 if($entry->picture && $entry->link) {
1226 $datarray['body'] .= "\n\n" . '[url=' . $entry->link . '][img]' . $entry->picture . '[/img][/url]';
1230 $datarray['body'] .= "\n\n" . '[img]' . $entry->picture . '[/img]';
1231 // if just a link, it may be a wall photo - check
1233 $datarray['body'] .= fb_get_photo($uid,$entry->link);
1236 $datarray['body'] .= "\n" . $entry->name;
1238 $datarray['body'] .= "\n" . $entry->caption;
1239 if($entry->description)
1240 $datarray['body'] .= "\n" . $entry->description;
1241 $datarray['created'] = datetime_convert('UTC','UTC',$entry->created_time);
1242 $datarray['edited'] = datetime_convert('UTC','UTC',$entry->updated_time);
1244 // If the entry has a privacy policy, we cannot assume who can or cannot see it,
1245 // as the identities are from a foreign system. Mark it as private to the owner.
1247 if($entry->privacy && $entry->privacy->value !== 'EVERYONE') {
1248 $datarray['private'] = 1;
1249 $datarray['allow_cid'] = '<' . $self[0]['id'] . '>';
1252 if(trim($datarray['body']) == '') {
1253 logger('facebook: empty body');
1257 $top_item = item_store($datarray);
1258 $r = q("SELECT * FROM `item` WHERE `id` = %d AND `uid` = %d LIMIT 1",
1264 logger('fb: new top level item posted');
1268 if(isset($entry->likes) && isset($entry->likes->data))
1269 $likers = $entry->likes->data;
1273 if(isset($entry->comments) && isset($entry->comments->data))
1274 $comments = $entry->comments->data;
1278 if(is_array($likers)) {
1279 foreach($likers as $likes) {
1284 // If we posted the like locally, it will be found with our url, not the FB url.
1286 $second_url = (($likes->id == $self_id) ? $self[0]['url'] : 'http://facebook.com/profile.php?id=' . $likes->id);
1288 $r = q("SELECT * FROM `item` WHERE `parent-uri` = '%s' AND `uid` = %d AND `verb` = '%s'
1289 AND ( `author-link` = '%s' OR `author-link` = '%s' ) LIMIT 1",
1290 dbesc($orig_post['uri']),
1292 dbesc(ACTIVITY_LIKE),
1293 dbesc('http://facebook.com/profile.php?id=' . $likes->id),
1300 $likedata = array();
1301 $likedata['parent'] = $top_item;
1302 $likedata['verb'] = ACTIVITY_LIKE;
1303 $likedata['gravity'] = 3;
1304 $likedata['uid'] = $uid;
1305 $likedata['wall'] = (($wall) ? 1 : 0);
1306 $likedata['uri'] = item_new_uri($a->get_baseurl(), $uid);
1307 $likedata['parent-uri'] = $orig_post['uri'];
1308 if($likes->id == $self_id)
1309 $likedata['contact-id'] = $self[0]['id'];
1311 $r = q("SELECT * FROM `contact` WHERE `notify` = '%s' AND `uid` = %d AND `blocked` = 0 AND `readonly` = 0 LIMIT 1",
1316 $likedata['contact-id'] = $r[0]['id'];
1318 if(! x($likedata,'contact-id'))
1319 $likedata['contact-id'] = $orig_post['contact-id'];
1321 $likedata['app'] = 'facebook';
1322 $likedata['verb'] = ACTIVITY_LIKE;
1323 $likedata['author-name'] = $likes->name;
1324 $likedata['author-link'] = 'http://facebook.com/profile.php?id=' . $likes->id;
1325 $likedata['author-avatar'] = 'https://graph.facebook.com/' . $likes->id . '/picture';
1327 $author = '[url=' . $likedata['author-link'] . ']' . $likedata['author-name'] . '[/url]';
1328 $objauthor = '[url=' . $orig_post['author-link'] . ']' . $orig_post['author-name'] . '[/url]';
1329 $post_type = t('status');
1330 $plink = '[url=' . $orig_post['plink'] . ']' . $post_type . '[/url]';
1331 $likedata['object-type'] = ACTIVITY_OBJ_NOTE;
1333 $likedata['body'] = sprintf( t('%1$s likes %2$s\'s %3$s'), $author, $objauthor, $plink);
1334 $likedata['object'] = '<object><type>' . ACTIVITY_OBJ_NOTE . '</type><local>1</local>' .
1335 '<id>' . $orig_post['uri'] . '</id><link>' . xmlify('<link rel="alternate" type="text/html" href="' . xmlify($orig_post['plink']) . '" />') . '</link><title>' . $orig_post['title'] . '</title><content>' . $orig_post['body'] . '</content></object>';
1337 $item = item_store($likedata);
1340 if(is_array($comments)) {
1341 foreach($comments as $cmnt) {
1346 $r = q("SELECT * FROM `item` WHERE `uid` = %d AND ( `uri` = '%s' OR `extid` = '%s' ) LIMIT 1",
1348 dbesc('fb::' . $cmnt->id),
1349 dbesc('fb::' . $cmnt->id)
1354 $cmntdata = array();
1355 $cmntdata['parent'] = $top_item;
1356 $cmntdata['verb'] = ACTIVITY_POST;
1357 $cmntdata['gravity'] = 6;
1358 $cmntdata['uid'] = $uid;
1359 $cmntdata['wall'] = (($wall) ? 1 : 0);
1360 $cmntdata['uri'] = 'fb::' . $cmnt->id;
1361 $cmntdata['parent-uri'] = $orig_post['uri'];
1362 if($cmnt->from->id == $self_id) {
1363 $cmntdata['contact-id'] = $self[0]['id'];
1366 $r = q("SELECT * FROM `contact` WHERE `notify` = '%s' AND `uid` = %d LIMIT 1",
1367 dbesc($cmnt->from->id),
1371 $cmntdata['contact-id'] = $r[0]['id'];
1372 if($r[0]['blocked'] || $r[0]['readonly'])
1376 if(! x($cmntdata,'contact-id'))
1377 $cmntdata['contact-id'] = $orig_post['contact-id'];
1379 $cmntdata['app'] = 'facebook';
1380 $cmntdata['created'] = datetime_convert('UTC','UTC',$cmnt->created_time);
1381 $cmntdata['edited'] = datetime_convert('UTC','UTC',$cmnt->created_time);
1382 $cmntdata['verb'] = ACTIVITY_POST;
1383 $cmntdata['author-name'] = $cmnt->from->name;
1384 $cmntdata['author-link'] = 'http://facebook.com/profile.php?id=' . $cmnt->from->id;
1385 $cmntdata['author-avatar'] = 'https://graph.facebook.com/' . $cmnt->from->id . '/picture';
1386 $cmntdata['body'] = $cmnt->message;
1387 $item = item_store($cmntdata);
1389 $myconv = q("SELECT `author-link`, `author-avatar`, `parent` FROM `item` WHERE `parent-uri` = '%s' AND `uid` = %d AND `parent` != 0 ",
1390 dbesc($orig_post['uri']),
1394 if(count($myconv)) {
1395 $importer_url = $a->get_baseurl() . '/profile/' . $user[0]['nickname'];
1397 foreach($myconv as $conv) {
1399 // now if we find a match, it means we're in this conversation
1401 if(! link_compare($conv['author-link'],$importer_url))
1404 require_once('include/enotify.php');
1406 $conv_parent = $conv['parent'];
1409 'type' => NOTIFY_COMMENT,
1410 'notify_flags' => $user[0]['notify-flags'],
1411 'language' => $user[0]['language'],
1412 'to_name' => $user[0]['username'],
1413 'to_email' => $user[0]['email'],
1414 'uid' => $user[0]['uid'],
1415 'item' => $cmntdata,
1416 'link' => $a->get_baseurl() . '/display/' . $importer['nickname'] . '/' . $item,
1417 'source_name' => $cmntdata['author-name'],
1418 'source_link' => $cmntdata['author-link'],
1419 'source_photo' => $cmntdata['author-avatar'],
1420 'verb' => ACTIVITY_POST,
1422 'parent' => $conv_parent,
1425 // only send one notification
1435 function fb_get_app_access_token() {
1437 $acc_token = get_config('facebook','app_access_token');
1439 if ($acc_token !== false) return $acc_token;
1441 $appid = get_config('facebook','appid');
1442 $appsecret = get_config('facebook', 'appsecret');
1444 if ($appid === false || $appsecret === false) {
1445 logger('fb_get_app_access_token: appid and/or appsecret not set', LOGGER_DEBUG);
1449 $x = fetch_url('https://graph.facebook.com/oauth/access_token?client_id=' . $appid . '&client_secret=' . $appsecret . "&grant_type=client_credentials");
1451 if(strpos($x,'access_token=') !== false) {
1452 logger('fb_get_app_access_token: returned access token: ' . $x, LOGGER_DATA);
1454 $token = str_replace('access_token=', '', $x);
1455 if(strpos($token,'&') !== false)
1456 $token = substr($token,0,strpos($token,'&'));
1459 logger('fb_get_app_access_token: empty token: ' . $x, LOGGER_DEBUG);
1462 set_config('facebook','app_access_token',$token);
1465 logger('fb_get_app_access_token: response did not contain an access_token: ' . $x, LOGGER_DATA);
1470 function facebook_subscription_del_users() {
1472 $access_token = fb_get_app_access_token();
1474 $url = "https://graph.facebook.com/" . get_config('facebook', 'appid' ) . "/subscriptions?access_token=" . $access_token;
1475 facebook_delete_url($url);
1477 del_config('facebook', 'realtime_active');
1480 function facebook_subscription_add_users() {
1483 $access_token = fb_get_app_access_token();
1485 $url = "https://graph.facebook.com/" . get_config('facebook', 'appid' ) . "/subscriptions?access_token=" . $access_token;
1487 list($usec, $sec) = explode(" ", microtime());
1488 $verify_token = sha1($usec . $sec . rand(0, 999999999));
1489 set_config('facebook', 'cb_verify_token', $verify_token);
1491 $cb = $a->get_baseurl() . '/facebook/?realtime_cb=1';
1493 $j = post_url($url,array(
1495 "fields" => "feed,friends",
1496 "callback_url" => $cb,
1497 "verify_token" => $verify_token,
1499 del_config('facebook', 'cb_verify_token');
1502 logger("Facebook reponse: " . $j, LOGGER_DATA);
1504 if (facebook_check_realtime_active()) set_config('facebook', 'realtime_active', 1);
1508 function facebook_subscriptions_get() {
1510 $access_token = fb_get_app_access_token();
1511 if (!$access_token) return null;
1513 $url = "https://graph.facebook.com/" . get_config('facebook', 'appid' ) . "/subscriptions?access_token=" . $access_token;
1514 $j = fetch_url($url);
1517 $x = json_decode($j);
1518 if (isset($x->data)) $ret = $x->data;
1524 function facebook_check_realtime_active() {
1525 $ret = facebook_subscriptions_get();
1526 if (is_null($ret)) return false;
1527 if (is_array($ret)) foreach ($ret as $re) if (is_object($re) && $re->object == "user") return true;
1534 // DELETE-request to $url
1536 if(! function_exists('facebook_delete_url')) {
1537 function facebook_delete_url($url,$headers = null, &$redirects = 0, $timeout = 0) {
1539 $ch = curl_init($url);
1540 if(($redirects > 8) || (! $ch))
1543 curl_setopt($ch, CURLOPT_HEADER, true);
1544 curl_setopt($ch, CURLOPT_RETURNTRANSFER,true);
1545 curl_setopt($ch, CURLOPT_CUSTOMREQUEST, "DELETE");
1546 curl_setopt($ch, CURLOPT_USERAGENT, "Friendica");
1548 if(intval($timeout)) {
1549 curl_setopt($ch, CURLOPT_TIMEOUT, $timeout);
1552 $curl_time = intval(get_config('system','curl_timeout'));
1553 curl_setopt($ch, CURLOPT_TIMEOUT, (($curl_time !== false) ? $curl_time : 60));
1556 if(defined('LIGHTTPD')) {
1557 if(!is_array($headers)) {
1558 $headers = array('Expect:');
1560 if(!in_array('Expect:', $headers)) {
1561 array_push($headers, 'Expect:');
1566 curl_setopt($ch, CURLOPT_HTTPHEADER, $headers);
1568 $check_cert = get_config('system','verifyssl');
1569 curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, (($check_cert) ? true : false));
1570 $prx = get_config('system','proxy');
1572 curl_setopt($ch, CURLOPT_HTTPPROXYTUNNEL, 1);
1573 curl_setopt($ch, CURLOPT_PROXY, $prx);
1574 $prxusr = get_config('system','proxyuser');
1576 curl_setopt($ch, CURLOPT_PROXYUSERPWD, $prxusr);
1579 $a->set_curl_code(0);
1581 // don't let curl abort the entire application
1582 // if it throws any errors.
1584 $s = @curl_exec($ch);
1587 $curl_info = curl_getinfo($ch);
1588 $http_code = $curl_info['http_code'];
1592 // Pull out multiple headers, e.g. proxy and continuation headers
1593 // allow for HTTP/2.x without fixing code
1595 while(preg_match('/^HTTP\/[1-2].+? [1-5][0-9][0-9]/',$base)) {
1596 $chunk = substr($base,0,strpos($base,"\r\n\r\n")+4);
1598 $base = substr($base,strlen($chunk));
1601 if($http_code == 301 || $http_code == 302 || $http_code == 303) {
1603 preg_match('/(Location:|URI:)(.*?)\n/', $header, $matches);
1604 $url = trim(array_pop($matches));
1605 $url_parsed = @parse_url($url);
1606 if (isset($url_parsed)) {
1608 return delete_url($url,$headers,$redirects,$timeout);
1611 $a->set_curl_code($http_code);
1612 $body = substr($s,strlen($header));
1614 $a->set_curl_headers($header);