mod/item.php

   1 <?php
   2
   3 /**
   4  *
   5  * This is the POST destination for most all locally posted
   6  * text stuff. This function handles status, wall-to-wall status,
   7  * local comments, and remote coments that are posted on this site
   8  * (as opposed to being delivered in a feed).
   9  * Also processed here are posts and comments coming through the
  10  * statusnet/twitter API.
  11  * All of these become an "item" which is our basic unit of
  12  * information.
  13  * Posts that originate externally or do not fall into the above
  14  * posting categories go through item_store() instead of this function.
  15  *
  16  */
  17
  18 require_once('include/crypto.php');
  19 require_once('include/enotify.php');
  20 require_once('include/email.php');
  21 require_once('include/tags.php');
  22 require_once('include/files.php');
  23 require_once('include/threads.php');
  24 require_once('include/text.php');
  25 require_once('include/items.php');
  26 require_once('include/Scrape.php');
  27 require_once('include/diaspora.php');
  28 require_once('include/Contact.php');
  29
  30 function item_post(App &$a) {
  31
  32         if((! local_user()) && (! remote_user()) && (! x($_REQUEST,'commenter')))
  33                 return;
  34
  35         require_once('include/security.php');
  36
  37         $uid = local_user();
  38
  39         if(x($_REQUEST,'dropitems')) {
  40                 $arr_drop = explode(',',$_REQUEST['dropitems']);
  41                 drop_items($arr_drop);
  42                 $json = array('success' => 1);
  43                 echo json_encode($json);
  44                 killme();
  45         }
  46
  47         call_hooks('post_local_start', $_REQUEST);
  48 //      logger('postinput ' . file_get_contents('php://input'));
  49         logger('postvars ' . print_r($_REQUEST,true), LOGGER_DATA);
  50
  51         $api_source = ((x($_REQUEST,'api_source') && $_REQUEST['api_source']) ? true : false);
  52
  53         $message_id = ((x($_REQUEST,'message_id') && $api_source)  ? strip_tags($_REQUEST['message_id'])       : '');
  54
  55         $return_path = ((x($_REQUEST,'return')) ? $_REQUEST['return'] : '');
  56         $preview = ((x($_REQUEST,'preview')) ? intval($_REQUEST['preview']) : 0);
  57
  58
  59         // Check for doubly-submitted posts, and reject duplicates
  60         // Note that we have to ignore previews, otherwise nothing will post
  61         // after it's been previewed
  62         if (!$preview && x($_REQUEST['post_id_random'])) {
  63                 if (x($_SESSION['post-random']) && $_SESSION['post-random'] == $_REQUEST['post_id_random']) {
  64                         logger("item post: duplicate post", LOGGER_DEBUG);
  65                         item_post_return(App::get_baseurl(), $api_source, $return_path);
  66                 }
  67                 else {
  68                         $_SESSION['post-random'] = $_REQUEST['post_id_random'];
  69                 }
  70         }
  71
  72         /**
  73          * Is this a reply to something?
  74          */
  75
  76         $parent = ((x($_REQUEST,'parent')) ? intval($_REQUEST['parent']) : 0);
  77         $parent_uri = ((x($_REQUEST,'parent_uri')) ? trim($_REQUEST['parent_uri']) : '');
  78
  79         $parent_item = null;
  80         $parent_contact = null;
  81         $thr_parent = '';
  82         $parid = 0;
  83         $r = false;
  84         $objecttype = null;
  85
  86         if ($parent || $parent_uri) {
  87
  88                 $objecttype = ACTIVITY_OBJ_COMMENT;
  89
  90                 if (! x($_REQUEST,'type')) {
  91                         $_REQUEST['type'] = 'net-comment';
  92                 }
  93
  94                 if ($parent) {
  95                         $r = q("SELECT * FROM `item` WHERE `id` = %d LIMIT 1",
  96                                 intval($parent)
  97                         );
  98                 }
  99                 elseif ($parent_uri && local_user()) {
 100                         // This is coming from an API source, and we are logged in
 101                         $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
 102                                 dbesc($parent_uri),
 103                                 intval(local_user())
 104                         );
 105                 }
 106
 107                 // if this isn't the real parent of the conversation, find it
 108                 if (dbm::is_result($r)) {
 109                         $parid = $r[0]['parent'];
 110                         $parent_uri = $r[0]['uri'];
 111                         if ($r[0]['id'] != $r[0]['parent']) {
 112                                 $r = q("SELECT * FROM `item` WHERE `id` = `parent` AND `parent` = %d LIMIT 1",
 113                                         intval($parid)
 114                                 );
 115                         }
 116                 }
 117
 118                 if (! dbm::is_result($r)) {
 119                         notice( t('Unable to locate original post.') . EOL);
 120                         if (x($_REQUEST,'return')) {
 121                                 goaway($return_path);
 122                         }
 123                         killme();
 124                 }
 125                 $parent_item = $r[0];
 126                 $parent = $r[0]['id'];
 127
 128                 // multi-level threading - preserve the info but re-parent to our single level threading
 129                 //if(($parid) && ($parid != $parent))
 130                 $thr_parent = $parent_uri;
 131
 132                 if ($parent_item['contact-id'] && $uid) {
 133                         $r = q("SELECT * FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
 134                                 intval($parent_item['contact-id']),
 135                                 intval($uid)
 136                         );
 137                         if (dbm::is_result($r))
 138                                 $parent_contact = $r[0];
 139
 140                         // If the contact id doesn't fit with the contact, then set the contact to null
 141                         $thrparent = q("SELECT `author-link`, `network` FROM `item` WHERE `uri` = '%s' LIMIT 1", dbesc($thr_parent));
 142                         if (dbm::is_result($thrparent) AND ($thrparent[0]["network"] === NETWORK_OSTATUS)
 143                                 AND (normalise_link($parent_contact["url"]) != normalise_link($thrparent[0]["author-link"]))) {
 144                                 $parent_contact = null;
 145
 146                                 $r = q("SELECT * FROM `gcontact` WHERE `nurl` = '%s' LIMIT 1",
 147                                         dbesc(normalise_link($thrparent[0]["author-link"])));
 148                                 if (dbm::is_result($r)) {
 149                                         $parent_contact = $r[0];
 150                                         $parent_contact["thumb"] = $parent_contact["photo"];
 151                                         $parent_contact["micro"] = $parent_contact["photo"];
 152                                         unset($parent_contact["id"]);
 153                                 }
 154
 155                                 if (!isset($parent_contact["nick"])) {
 156                                         require_once("include/Scrape.php");
 157                                         $probed_contact = probe_url($thrparent[0]["author-link"]);
 158                                         if ($probed_contact["network"] != NETWORK_FEED) {
 159                                                 $parent_contact = $probed_contact;
 160                                                 $parent_contact["nurl"] = normalise_link($probed_contact["url"]);
 161                                                 $parent_contact["thumb"] = $probed_contact["photo"];
 162                                                 $parent_contact["micro"] = $probed_contact["photo"];
 163                                                 $parent_contact["addr"] = $probed_contact["addr"];
 164                                         }
 165                                 }
 166                                 logger('no contact found: '.print_r($thrparent, true), LOGGER_DEBUG);
 167                         } else
 168                                 logger('parent contact: '.print_r($parent_contact, true), LOGGER_DEBUG);
 169
 170                         if ($parent_contact["nick"] == "")
 171                                 $parent_contact["nick"] = $parent_contact["name"];
 172                 }
 173         }
 174
 175         if($parent) logger('mod_item: item_post parent=' . $parent);
 176
 177         $profile_uid = ((x($_REQUEST,'profile_uid')) ? intval($_REQUEST['profile_uid']) : 0);
 178         $post_id     = ((x($_REQUEST,'post_id'))     ? intval($_REQUEST['post_id'])     : 0);
 179         $app         = ((x($_REQUEST,'source'))      ? strip_tags($_REQUEST['source'])  : '');
 180         $extid       = ((x($_REQUEST,'extid'))       ? strip_tags($_REQUEST['extid'])   : '');
 181         $object      = ((x($_REQUEST,'object'))      ? $_REQUEST['object']              : '');
 182
 183         // Check for multiple posts with the same message id (when the post was created via API)
 184         if (($message_id != '') AND ($profile_uid != 0)) {
 185                 $r = q("SELECT * FROM `item` WHERE `uri` = '%s' AND `uid` = %d LIMIT 1",
 186                         dbesc($message_id),
 187                         intval($profile_uid)
 188                 );
 189
 190                 if (dbm::is_result($r)) {
 191                         logger("Message with URI ".$message_id." already exists for user ".$profile_uid, LOGGER_DEBUG);
 192                         return;
 193                 }
 194         }
 195
 196         $allow_moderated = false;
 197
 198         // here is where we are going to check for permission to post a moderated comment.
 199
 200         // First check that the parent exists and it is a wall item.
 201
 202         if((x($_REQUEST,'commenter')) && ((! $parent) || (! $parent_item['wall']))) {
 203                 notice( t('Permission denied.') . EOL) ;
 204                 if(x($_REQUEST,'return'))
 205                         goaway($return_path);
 206                 killme();
 207         }
 208
 209         // Now check that it is a page_type of PAGE_BLOG, and that valid personal details
 210         // have been provided, and run any anti-spam plugins
 211
 212
 213
 214         if((! can_write_wall($a,$profile_uid)) && (! $allow_moderated)) {
 215                 notice( t('Permission denied.') . EOL) ;
 216                 if(x($_REQUEST,'return'))
 217                         goaway($return_path);
 218                 killme();
 219         }
 220
 221
 222         // is this an edited post?
 223
 224         $orig_post = null;
 225
 226         if($post_id) {
 227                 $i = q("SELECT * FROM `item` WHERE `uid` = %d AND `id` = %d LIMIT 1",
 228                         intval($profile_uid),
 229                         intval($post_id)
 230                 );
 231                 if (! dbm::is_result($i)) {
 232                         killme();
 233                 }
 234                 $orig_post = $i[0];
 235         }
 236
 237         $user = null;
 238
 239         $r = q("SELECT * FROM `user` WHERE `uid` = %d LIMIT 1",
 240                 intval($profile_uid)
 241         );
 242         if (dbm::is_result($r))
 243                 $user = $r[0];
 244
 245         if($orig_post) {
 246                 $str_group_allow   = $orig_post['allow_gid'];
 247                 $str_contact_allow = $orig_post['allow_cid'];
 248                 $str_group_deny    = $orig_post['deny_gid'];
 249                 $str_contact_deny  = $orig_post['deny_cid'];
 250                 $location          = $orig_post['location'];
 251                 $coord             = $orig_post['coord'];
 252                 $verb              = $orig_post['verb'];
 253                 $objecttype        = $orig_post['object-type'];
 254                 $emailcc           = $orig_post['emailcc'];
 255                 $app               = $orig_post['app'];
 256                 $categories        = $orig_post['file'];
 257                 $title             = notags(trim($_REQUEST['title']));
 258                 $body              = escape_tags(trim($_REQUEST['body']));
 259                 $private           = $orig_post['private'];
 260                 $pubmail_enable    = $orig_post['pubmail'];
 261                 $network           = $orig_post['network'];
 262                 $guid              = $orig_post['guid'];
 263                 $extid             = $orig_post['extid'];
 264
 265         } else {
 266
 267                 // if coming from the API and no privacy settings are set,
 268                 // use the user default permissions - as they won't have
 269                 // been supplied via a form.
 270
 271                 if(($api_source)
 272                         && (! array_key_exists('contact_allow',$_REQUEST))
 273                         && (! array_key_exists('group_allow',$_REQUEST))
 274                         && (! array_key_exists('contact_deny',$_REQUEST))
 275                         && (! array_key_exists('group_deny',$_REQUEST))) {
 276                         $str_group_allow   = $user['allow_gid'];
 277                         $str_contact_allow = $user['allow_cid'];
 278                         $str_group_deny    = $user['deny_gid'];
 279                         $str_contact_deny  = $user['deny_cid'];
 280                 }
 281                 else {
 282
 283                         // use the posted permissions
 284
 285                         $str_group_allow   = perms2str($_REQUEST['group_allow']);
 286                         $str_contact_allow = perms2str($_REQUEST['contact_allow']);
 287                         $str_group_deny    = perms2str($_REQUEST['group_deny']);
 288                         $str_contact_deny  = perms2str($_REQUEST['contact_deny']);
 289                 }
 290
 291                 $title             = notags(trim($_REQUEST['title']));
 292                 $location          = notags(trim($_REQUEST['location']));
 293                 $coord             = notags(trim($_REQUEST['coord']));
 294                 $verb              = notags(trim($_REQUEST['verb']));
 295                 $emailcc           = notags(trim($_REQUEST['emailcc']));
 296                 $body              = escape_tags(trim($_REQUEST['body']));
 297                 $network           = notags(trim($_REQUEST['network']));
 298                 $guid              = get_guid(32);
 299
 300
 301                 item_add_language_opt($_REQUEST);
 302                 $postopts = $_REQUEST['postopts'] ? $_REQUEST['postopts'] : "";
 303
 304
 305                 $private = ((strlen($str_group_allow) || strlen($str_contact_allow) || strlen($str_group_deny) || strlen($str_contact_deny)) ? 1 : 0);
 306
 307
 308                 if($user['hidewall'])
 309                         $private = 2;
 310
 311                 // If this is a comment, set the permissions from the parent.
 312
 313                 if($parent_item) {
 314
 315                         // for non native networks use the network of the original post as network of the item
 316                         if (($parent_item['network'] != NETWORK_DIASPORA)
 317                                 AND ($parent_item['network'] != NETWORK_OSTATUS)
 318                                 AND ($network == ""))
 319                                 $network = $parent_item['network'];
 320
 321                         $str_contact_allow = $parent_item['allow_cid'];
 322                         $str_group_allow   = $parent_item['allow_gid'];
 323                         $str_contact_deny  = $parent_item['deny_cid'];
 324                         $str_group_deny    = $parent_item['deny_gid'];
 325                         $private           = $parent_item['private'];
 326                 }
 327
 328                 $pubmail_enable    = ((x($_REQUEST,'pubmail_enable') && intval($_REQUEST['pubmail_enable']) && (! $private)) ? 1 : 0);
 329
 330                 // if using the API, we won't see pubmail_enable - figure out if it should be set
 331
 332                 if($api_source && $profile_uid && $profile_uid == local_user() && (! $private)) {
 333                         $mail_disabled = ((function_exists('imap_open') && (! get_config('system','imap_disabled'))) ? 0 : 1);
 334                         if(! $mail_disabled) {
 335                                 $r = q("SELECT * FROM `mailacct` WHERE `uid` = %d AND `server` != '' LIMIT 1",
 336                                         intval(local_user())
 337                                 );
 338                                 if (dbm::is_result($r) && intval($r[0]['pubmail']))
 339                                         $pubmail_enabled = true;
 340                         }
 341                 }
 342
 343                 if(! strlen($body)) {
 344                         if($preview)
 345                                 killme();
 346                         info( t('Empty post discarded.') . EOL );
 347                         if(x($_REQUEST,'return'))
 348                                 goaway($return_path);
 349                         killme();
 350                 }
 351         }
 352
 353         if(strlen($categories)) {
 354                 // get the "fileas" tags for this post
 355                 $filedas = file_tag_file_to_list($categories, 'file');
 356         }
 357         // save old and new categories, so we can determine what needs to be deleted from pconfig
 358         $categories_old = $categories;
 359         $categories = file_tag_list_to_file(trim($_REQUEST['category']), 'category');
 360         $categories_new = $categories;
 361         if(strlen($filedas)) {
 362                 // append the fileas stuff to the new categories list
 363                 $categories .= file_tag_list_to_file($filedas, 'file');
 364         }
 365
 366         // Work around doubled linefeeds in Tinymce 3.5b2
 367         // First figure out if it's a status post that would've been
 368         // created using tinymce. Otherwise leave it alone.
 369
 370 /*      $plaintext = (local_user() ? intval(get_pconfig(local_user(),'system','plaintext')) || !feature_enabled($profile_uid,'richtext') : 0);
 371         if((! $parent) && (! $api_source) && (! $plaintext)) {
 372                 $body = fix_mce_lf($body);
 373         }*/
 374         $plaintext = (local_user() ? !feature_enabled($profile_uid,'richtext') : 0);
 375         if((! $parent) && (! $api_source) && (! $plaintext)) {
 376                 $body = fix_mce_lf($body);
 377         }
 378
 379
 380         // get contact info for poster
 381
 382         $author = null;
 383         $self   = false;
 384         $contact_id = 0;
 385
 386         if((local_user()) && (local_user() == $profile_uid)) {
 387                 $self = true;
 388                 $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` = 1 LIMIT 1",
 389                         intval($_SESSION['uid']));
 390         }
 391         elseif(remote_user()) {
 392                 if(is_array($_SESSION['remote'])) {
 393                         foreach($_SESSION['remote'] as $v) {
 394                                 if($v['uid'] == $profile_uid) {
 395                                         $contact_id = $v['cid'];
 396                                         break;
 397                                 }
 398                         }
 399                 }
 400                 if($contact_id) {
 401                         $r = q("SELECT * FROM `contact` WHERE `id` = %d LIMIT 1",
 402                                 intval($contact_id)
 403                         );
 404                 }
 405         }
 406
 407         if (dbm::is_result($r)) {
 408                 $author = $r[0];
 409                 $contact_id = $author['id'];
 410         }
 411
 412         // get contact info for owner
 413
 414         if($profile_uid == local_user()) {
 415                 $contact_record = $author;
 416         }
 417         else {
 418                 $r = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` = 1 LIMIT 1",
 419                         intval($profile_uid)
 420                 );
 421                 if (dbm::is_result($r))
 422                         $contact_record = $r[0];
 423         }
 424
 425         $post_type = notags(trim($_REQUEST['type']));
 426
 427         if($post_type === 'net-comment') {
 428                 if($parent_item !== null) {
 429                         if($parent_item['wall'] == 1)
 430                                 $post_type = 'wall-comment';
 431                         else
 432                                 $post_type = 'remote-comment';
 433                 }
 434         }
 435
 436         /**
 437          *
 438          * When a photo was uploaded into the message using the (profile wall) ajax
 439          * uploader, The permissions are initially set to disallow anybody but the
 440          * owner from seeing it. This is because the permissions may not yet have been
 441          * set for the post. If it's private, the photo permissions should be set
 442          * appropriately. But we didn't know the final permissions on the post until
 443          * now. So now we'll look for links of uploaded messages that are in the
 444          * post and set them to the same permissions as the post itself.
 445          *
 446          */
 447
 448         $match = null;
 449
 450         if((! $preview) && preg_match_all("/\[img([\=0-9x]*?)\](.*?)\[\/img\]/",$body,$match)) {
 451                 $images = $match[2];
 452                 if(count($images)) {
 453
 454                         $objecttype = ACTIVITY_OBJ_IMAGE;
 455
 456                         foreach ($images as $image) {
 457                                 if (! stristr($image,App::get_baseurl() . '/photo/')) {
 458                                         continue;
 459                                 }
 460                                 $image_uri = substr($image,strrpos($image,'/') + 1);
 461                                 $image_uri = substr($image_uri,0, strpos($image_uri,'-'));
 462                                 if (! strlen($image_uri)) {
 463                                         continue;
 464                                 }
 465                                 $srch = '<' . intval($contact_id) . '>';
 466
 467                                 $r = q("SELECT `id` FROM `photo` WHERE `allow_cid` = '%s' AND `allow_gid` = '' AND `deny_cid` = '' AND `deny_gid` = ''
 468                                         AND `resource-id` = '%s' AND `uid` = %d LIMIT 1",
 469                                         dbesc($srch),
 470                                         dbesc($image_uri),
 471                                         intval($profile_uid)
 472                                 );
 473
 474                                 if (! dbm::is_result($r)) {
 475                                         continue;
 476                                 }
 477
 478                                 $r = q("UPDATE `photo` SET `allow_cid` = '%s', `allow_gid` = '%s', `deny_cid` = '%s', `deny_gid` = '%s'
 479                                         WHERE `resource-id` = '%s' AND `uid` = %d AND `album` = '%s' ",
 480                                         dbesc($str_contact_allow),
 481                                         dbesc($str_group_allow),
 482                                         dbesc($str_contact_deny),
 483                                         dbesc($str_group_deny),
 484                                         dbesc($image_uri),
 485                                         intval($profile_uid),
 486                                         dbesc( t('Wall Photos'))
 487                                 );
 488                         }
 489                 }
 490         }
 491
 492
 493         /**
 494          * Next link in any attachment references we find in the post.
 495          */
 496
 497         $match = false;
 498
 499         if((! $preview) && preg_match_all("/\[attachment\](.*?)\[\/attachment\]/",$body,$match)) {
 500                 $attaches = $match[1];
 501                 if(count($attaches)) {
 502                         foreach($attaches as $attach) {
 503                                 $r = q("SELECT * FROM `attach` WHERE `uid` = %d AND `id` = %d LIMIT 1",
 504                                         intval($profile_uid),
 505                                         intval($attach)
 506                                 );
 507                                 if (dbm::is_result($r)) {
 508                                         $r = q("UPDATE `attach` SET `allow_cid` = '%s', `allow_gid` = '%s', `deny_cid` = '%s', `deny_gid` = '%s'
 509                                                 WHERE `uid` = %d AND `id` = %d",
 510                                                 dbesc($str_contact_allow),
 511                                                 dbesc($str_group_allow),
 512                                                 dbesc($str_contact_deny),
 513                                                 dbesc($str_group_deny),
 514                                                 intval($profile_uid),
 515                                                 intval($attach)
 516                                         );
 517                                 }
 518                         }
 519                 }
 520         }
 521
 522         // embedded bookmark or attachment in post? set bookmark flag
 523
 524         $bookmark = 0;
 525         $data = get_attachment_data($body);
 526         if (preg_match_all("/\[bookmark\=([^\]]*)\](.*?)\[\/bookmark\]/ism", $body, $match, PREG_SET_ORDER) OR isset($data["type"])) {
 527                 $objecttype = ACTIVITY_OBJ_BOOKMARK;
 528                 $bookmark = 1;
 529         }
 530
 531         $body = bb_translate_video($body);
 532
 533
 534         /**
 535          * Fold multi-line [code] sequences
 536          */
 537
 538         $body = preg_replace('/\[\/code\]\s*\[code\]/ism',"\n",$body);
 539
 540         $body = scale_external_images($body,false);
 541
 542
 543         // Setting the object type if not defined before
 544         if (!$objecttype) {
 545                 $objecttype = ACTIVITY_OBJ_NOTE; // Default value
 546                 require_once("include/plaintext.php");
 547                 $objectdata = get_attached_data($body);
 548
 549                 if ($post["type"] == "link")
 550                         $objecttype = ACTIVITY_OBJ_BOOKMARK;
 551                 elseif ($post["type"] == "video")
 552                         $objecttype = ACTIVITY_OBJ_VIDEO;
 553                 elseif ($post["type"] == "photo")
 554                         $objecttype = ACTIVITY_OBJ_IMAGE;
 555
 556         }
 557
 558         /**
 559          * Look for any tags and linkify them
 560          */
 561
 562         $str_tags = '';
 563         $inform   = '';
 564
 565
 566         $tags = get_tags($body);
 567
 568         /**
 569          * add a statusnet style reply tag if the original post was from there
 570          * and we are replying, and there isn't one already
 571          */
 572
 573         if($parent AND ($parent_contact['network'] === NETWORK_OSTATUS)) {
 574                 if ($parent_contact['id'] != "")
 575                         $contact = '@'.$parent_contact['nick'].'+'.$parent_contact['id'];
 576                 else
 577                         $contact = '@[url='.$parent_contact['url'].']'.$parent_contact['nick'].'[/url]';
 578
 579                 if (!in_array($contact,$tags)) {
 580                         $body = $contact.' '.$body;
 581                         $tags[] = $contact;
 582                 }
 583
 584                 $toplevel_contact = "";
 585                 $toplevel_parent = q("SELECT `contact`.* FROM `contact`
 586                                                 INNER JOIN `item` ON `item`.`contact-id` = `contact`.`id` AND `contact`.`url` = `item`.`author-link`
 587                                                 WHERE `item`.`id` = `item`.`parent` AND `item`.`parent` = %d", intval($parent));
 588                 if ($toplevel_parent)
 589                         $toplevel_contact = '@'.$toplevel_parent[0]['nick'].'+'.$toplevel_parent[0]['id'];
 590                 else {
 591                         $toplevel_parent = q("SELECT `author-link`, `author-name` FROM `item` WHERE `id` = `parent` AND `parent` = %d", intval($parent));
 592                         $toplevel_contact = '@[url='.$toplevel_parent[0]['author-link'].']'.$toplevel_parent[0]['author-name'].'[/url]';
 593                 }
 594
 595                 if (!in_array($toplevel_contact,$tags))
 596                         $tags[] = $toplevel_contact;
 597         }
 598
 599         $tagged = array();
 600
 601         $private_forum = false;
 602
 603         if(count($tags)) {
 604                 foreach($tags as $tag) {
 605
 606                         if(strpos($tag,'#') === 0)
 607                                 continue;
 608
 609                         // If we already tagged 'Robert Johnson', don't try and tag 'Robert'.
 610                         // Robert Johnson should be first in the $tags array
 611
 612                         $fullnametagged = false;
 613                         for($x = 0; $x < count($tagged); $x ++) {
 614                                 if(stristr($tagged[$x],$tag . ' ')) {
 615                                         $fullnametagged = true;
 616                                         break;
 617                                 }
 618                         }
 619                         if($fullnametagged)
 620                                 continue;
 621
 622                         $success = handle_tag($a, $body, $inform, $str_tags, (local_user()) ? local_user() : $profile_uid , $tag, $network);
 623                         if($success['replaced'])
 624                                 $tagged[] = $tag;
 625                         if(is_array($success['contact']) && intval($success['contact']['prv'])) {
 626                                 $private_forum = true;
 627                                 $private_id = $success['contact']['id'];
 628                         }
 629                 }
 630         }
 631
 632         if(($private_forum) && (! $parent) && (! $private)) {
 633                 // we tagged a private forum in a top level post and the message was public.
 634                 // Restrict it.
 635                 $private = 1;
 636                 $str_contact_allow = '<' . $private_id . '>';
 637         }
 638
 639         $attachments = '';
 640         $match = false;
 641
 642         if(preg_match_all('/(\[attachment\]([0-9]+)\[\/attachment\])/',$body,$match)) {
 643                 foreach($match[2] as $mtch) {
 644                         $r = q("SELECT `id`,`filename`,`filesize`,`filetype` FROM `attach` WHERE `uid` = %d AND `id` = %d LIMIT 1",
 645                                 intval($profile_uid),
 646                                 intval($mtch)
 647                         );
 648                         if (dbm::is_result($r)) {
 649                                 if (strlen($attachments)) {
 650                                         $attachments .= ',';
 651                                 }
 652                                 $attachments .= '[attach]href="' . App::get_baseurl() . '/attach/' . $r[0]['id'] . '" length="' . $r[0]['filesize'] . '" type="' . $r[0]['filetype'] . '" title="' . (($r[0]['filename']) ? $r[0]['filename'] : '') . '"[/attach]';
 653                         }
 654                         $body = str_replace($match[1],'',$body);
 655                 }
 656         }
 657
 658         $wall = 0;
 659
 660         if ($post_type === 'wall' || $post_type === 'wall-comment') {
 661                 $wall = 1;
 662         }
 663
 664         if (! strlen($verb)) {
 665                 $verb = ACTIVITY_POST ;
 666         }
 667
 668         if ($network == "") {
 669                 $network = NETWORK_DFRN;
 670         }
 671
 672         $gravity = (($parent) ? 6 : 0 );
 673
 674         // even if the post arrived via API we are considering that it
 675         // originated on this site by default for determining relayability.
 676
 677         $origin = ((x($_REQUEST,'origin')) ? intval($_REQUEST['origin']) : 1);
 678
 679         $notify_type = (($parent) ? 'comment-new' : 'wall-new' );
 680
 681         $uri = (($message_id) ? $message_id : item_new_uri($a->get_hostname(),$profile_uid, $guid));
 682
 683         // Fallback so that we alway have a thr-parent
 684         if (!$thr_parent) {
 685                 $thr_parent = $uri;
 686         }
 687
 688         $datarray = array();
 689         $datarray['uid']           = $profile_uid;
 690         $datarray['type']          = $post_type;
 691         $datarray['wall']          = $wall;
 692         $datarray['gravity']       = $gravity;
 693         $datarray['network']       = $network;
 694         $datarray['contact-id']    = $contact_id;
 695         $datarray['owner-name']    = $contact_record['name'];
 696         $datarray['owner-link']    = $contact_record['url'];
 697         $datarray['owner-avatar']  = $contact_record['thumb'];
 698         $datarray["owner-id"]      = get_contact($datarray["owner-link"], 0);
 699         $datarray['author-name']   = $author['name'];
 700         $datarray['author-link']   = $author['url'];
 701         $datarray['author-avatar'] = $author['thumb'];
 702         $datarray["author-id"]     = get_contact($datarray["author-link"], 0);
 703         $datarray['created']       = datetime_convert();
 704         $datarray['edited']        = datetime_convert();
 705         $datarray['commented']     = datetime_convert();
 706         $datarray['received']      = datetime_convert();
 707         $datarray['changed']       = datetime_convert();
 708         $datarray['extid']         = $extid;
 709         $datarray['guid']          = $guid;
 710         $datarray['uri']           = $uri;
 711         $datarray['title']         = $title;
 712         $datarray['body']          = $body;
 713         $datarray['app']           = $app;
 714         $datarray['location']      = $location;
 715         $datarray['coord']         = $coord;
 716         $datarray['tag']           = $str_tags;
 717         $datarray['file']          = $categories;
 718         $datarray['inform']        = $inform;
 719         $datarray['verb']          = $verb;
 720         $datarray['object-type']   = $objecttype;
 721         $datarray['allow_cid']     = $str_contact_allow;
 722         $datarray['allow_gid']     = $str_group_allow;
 723         $datarray['deny_cid']      = $str_contact_deny;
 724         $datarray['deny_gid']      = $str_group_deny;
 725         $datarray['private']       = $private;
 726         $datarray['pubmail']       = $pubmail_enable;
 727         $datarray['attach']        = $attachments;
 728         $datarray['bookmark']      = intval($bookmark);
 729         $datarray['thr-parent']    = $thr_parent;
 730         $datarray['postopts']      = $postopts;
 731         $datarray['origin']        = $origin;
 732         $datarray['moderated']     = $allow_moderated;
 733         $datarray['gcontact-id']   = get_gcontact_id(array("url" => $datarray['author-link'], "network" => $datarray['network'],
 734                                                         "photo" => $datarray['author-avatar'], "name" => $datarray['author-name']));
 735         $datarray['object']        = $object;
 736
 737         /**
 738          * These fields are for the convenience of plugins...
 739          * 'self' if true indicates the owner is posting on their own wall
 740          * If parent is 0 it is a top-level post.
 741          */
 742
 743         $datarray['parent']        = $parent;
 744         $datarray['self']          = $self;
 745 //      $datarray['prvnets']       = $user['prvnets'];
 746
 747         $datarray['parent-uri'] = ($parent == 0) ? $uri : $parent_item['uri'];
 748         $datarray['plink'] = App::get_baseurl().'/display/'.urlencode($datarray['guid']);
 749         $datarray['last-child'] = 1;
 750         $datarray['visible'] = 1;
 751
 752         if($orig_post)
 753                 $datarray['edit']      = true;
 754
 755         // Search for hashtags
 756         item_body_set_hashtags($datarray);
 757
 758         // preview mode - prepare the body for display and send it via json
 759
 760         if($preview) {
 761                 require_once('include/conversation.php');
 762                 // We set the datarray ID to -1 because in preview mode the dataray
 763                 // doesn't have an ID.
 764                 $datarray["id"] = -1;
 765                 $o = conversation($a,array(array_merge($contact_record,$datarray)),'search', false, true);
 766                 logger('preview: ' . $o);
 767                 echo json_encode(array('preview' => $o));
 768                 killme();
 769         }
 770
 771
 772         call_hooks('post_local',$datarray);
 773
 774         if(x($datarray,'cancel')) {
 775                 logger('mod_item: post cancelled by plugin.');
 776                 if($return_path) {
 777                         goaway($return_path);
 778                 }
 779
 780                 $json = array('cancel' => 1);
 781                 if (x($_REQUEST,'jsreload') && strlen($_REQUEST['jsreload'])) {
 782                         $json['reload'] = App::get_baseurl() . '/' . $_REQUEST['jsreload'];
 783                 }
 784
 785                 echo json_encode($json);
 786                 killme();
 787         }
 788
 789         // Fill the cache field
 790         put_item_in_cache($datarray);
 791
 792         if($orig_post) {
 793                 $r = q("UPDATE `item` SET `title` = '%s', `body` = '%s', `tag` = '%s', `attach` = '%s', `file` = '%s', `rendered-html` = '%s', `rendered-hash` = '%s', `edited` = '%s', `changed` = '%s' WHERE `id` = %d AND `uid` = %d",
 794                         dbesc($datarray['title']),
 795                         dbesc($datarray['body']),
 796                         dbesc($datarray['tag']),
 797                         dbesc($datarray['attach']),
 798                         dbesc($datarray['file']),
 799                         dbesc($datarray['rendered-html']),
 800                         dbesc($datarray['rendered-hash']),
 801                         dbesc(datetime_convert()),
 802                         dbesc(datetime_convert()),
 803                         intval($post_id),
 804                         intval($profile_uid)
 805                 );
 806
 807                 create_tags_from_item($post_id);
 808                 create_files_from_item($post_id);
 809                 update_thread($post_id);
 810
 811                 // update filetags in pconfig
 812                 file_tag_update_pconfig($uid,$categories_old,$categories_new,'category');
 813
 814                 proc_run(PRIORITY_HIGH, "include/notifier.php", 'edit_post', $post_id);
 815                 if((x($_REQUEST,'return')) && strlen($return_path)) {
 816                         logger('return: ' . $return_path);
 817                         goaway($return_path);
 818                 }
 819                 killme();
 820         } else
 821                 $post_id = 0;
 822
 823         q("COMMIT");
 824         q("START TRANSACTION;");
 825
 826         $r = q("INSERT INTO `item` (`guid`, `extid`, `uid`,`type`,`wall`,`gravity`, `network`, `contact-id`,
 827                                         `owner-name`,`owner-link`,`owner-avatar`, `owner-id`,
 828                                         `author-name`, `author-link`, `author-avatar`, `author-id`,
 829                                         `created`, `edited`, `commented`, `received`, `changed`,
 830                                         `uri`, `thr-parent`, `title`, `body`, `app`, `location`, `coord`,
 831                                         `tag`, `inform`, `verb`, `object-type`, `postopts`,
 832                                         `allow_cid`, `allow_gid`, `deny_cid`, `deny_gid`, `private`,
 833                                         `pubmail`, `attach`, `bookmark`,`origin`, `moderated`, `file`,
 834                                         `rendered-html`, `rendered-hash`, `gcontact-id`, `object`,
 835                                         `parent`, `parent-uri`, `plink`, `last-child`, `visible`)
 836                 VALUES('%s', '%s', %d, '%s', %d, %d, '%s', %d,
 837                         '%s', '%s', '%s', %d,
 838                         '%s', '%s', '%s', %d,
 839                         '%s', '%s', '%s', '%s', '%s',
 840                         '%s', '%s', '%s', '%s', '%s', '%s', '%s',
 841                         '%s', '%s', '%s', '%s', '%s',
 842                         '%s', '%s', '%s', '%s', %d,
 843                         %d, '%s', %d, %d, %d, '%s',
 844                         '%s', '%s', %d, '%s',
 845                         %d, '%s', '%s', %d, %d)",
 846                 dbesc($datarray['guid']),
 847                 dbesc($datarray['extid']),
 848                 intval($datarray['uid']),
 849                 dbesc($datarray['type']),
 850                 intval($datarray['wall']),
 851                 intval($datarray['gravity']),
 852                 dbesc($datarray['network']),
 853                 intval($datarray['contact-id']),
 854                 dbesc($datarray['owner-name']),
 855                 dbesc($datarray['owner-link']),
 856                 dbesc($datarray['owner-avatar']),
 857                 intval($datarray['owner-id']),
 858                 dbesc($datarray['author-name']),
 859                 dbesc($datarray['author-link']),
 860                 dbesc($datarray['author-avatar']),
 861                 intval($datarray['author-id']),
 862                 dbesc($datarray['created']),
 863                 dbesc($datarray['edited']),
 864                 dbesc($datarray['commented']),
 865                 dbesc($datarray['received']),
 866                 dbesc($datarray['changed']),
 867                 dbesc($datarray['uri']),
 868                 dbesc($datarray['thr-parent']),
 869                 dbesc($datarray['title']),
 870                 dbesc($datarray['body']),
 871                 dbesc($datarray['app']),
 872                 dbesc($datarray['location']),
 873                 dbesc($datarray['coord']),
 874                 dbesc($datarray['tag']),
 875                 dbesc($datarray['inform']),
 876                 dbesc($datarray['verb']),
 877                 dbesc($datarray['object-type']),
 878                 dbesc($datarray['postopts']),
 879                 dbesc($datarray['allow_cid']),
 880                 dbesc($datarray['allow_gid']),
 881                 dbesc($datarray['deny_cid']),
 882                 dbesc($datarray['deny_gid']),
 883                 intval($datarray['private']),
 884                 intval($datarray['pubmail']),
 885                 dbesc($datarray['attach']),
 886                 intval($datarray['bookmark']),
 887                 intval($datarray['origin']),
 888                 intval($datarray['moderated']),
 889                 dbesc($datarray['file']),
 890                 dbesc($datarray['rendered-html']),
 891                 dbesc($datarray['rendered-hash']),
 892                 intval($datarray['gcontact-id']),
 893                 dbesc($datarray['object']),
 894                 intval($datarray['parent']),
 895                 dbesc($datarray['parent-uri']),
 896                 dbesc($datarray['plink']),
 897                 intval($datarray['last-child']),
 898                 intval($datarray['visible'])
 899                );
 900
 901         if (dbm::is_result($r)) {
 902                 $r = q("SELECT LAST_INSERT_ID() AS `item-id`");
 903                 if (dbm::is_result($r)) {
 904                         $post_id = $r[0]['item-id'];
 905                 } else {
 906                         $post_id = 0;
 907                 }
 908         } else {
 909                 logger('mod_item: unable to create post.');
 910                 $post_id = 0;
 911         }
 912
 913         if ($post_id == 0) {
 914                 q("COMMIT");
 915                 logger('mod_item: unable to retrieve post that was just stored.');
 916                 notice(t('System error. Post not saved.') . EOL);
 917                 goaway($return_path);
 918                 // NOTREACHED
 919         }
 920
 921         logger('mod_item: saved item ' . $post_id);
 922
 923         $datarray["id"] = $post_id;
 924
 925         item_set_last_item($datarray);
 926
 927         // update filetags in pconfig
 928         file_tag_update_pconfig($uid,$categories_old,$categories_new,'category');
 929
 930         if($parent) {
 931
 932                 // This item is the last leaf and gets the comment box, clear any ancestors
 933                 $r = q("UPDATE `item` SET `last-child` = 0, `changed` = '%s' WHERE `parent` = %d AND `last-child` AND `id` != %d",
 934                         dbesc(datetime_convert()),
 935                         intval($parent),
 936                         intval($post_id)
 937                 );
 938
 939                 // update the commented timestamp on the parent
 940                 q("UPDATE `item` SET `visible` = 1, `commented` = '%s', `changed` = '%s' WHERE `id` = %d",
 941                         dbesc(datetime_convert()),
 942                         dbesc(datetime_convert()),
 943                         intval($parent)
 944                 );
 945
 946                 if($contact_record != $author) {
 947                         notification(array(
 948                                 'type'         => NOTIFY_COMMENT,
 949                                 'notify_flags' => $user['notify-flags'],
 950                                 'language'     => $user['language'],
 951                                 'to_name'      => $user['username'],
 952                                 'to_email'     => $user['email'],
 953                                 'uid'          => $user['uid'],
 954                                 'item'         => $datarray,
 955                                 'link'          => App::get_baseurl().'/display/'.urlencode($datarray['guid']),
 956                                 'source_name'  => $datarray['author-name'],
 957                                 'source_link'  => $datarray['author-link'],
 958                                 'source_photo' => $datarray['author-avatar'],
 959                                 'verb'         => ACTIVITY_POST,
 960                                 'otype'        => 'item',
 961                                 'parent'       => $parent,
 962                                 'parent_uri'   => $parent_item['uri']
 963                         ));
 964
 965                 }
 966
 967
 968                 // Store the comment signature information in case we need to relay to Diaspora
 969                 diaspora::store_comment_signature($datarray, $author, ($self ? $user['prvkey'] : false), $post_id);
 970
 971         } else {
 972                 $parent = $post_id;
 973
 974                 $r = q("UPDATE `item` SET `parent` = %d WHERE `id` = %d",
 975                         intval($parent),
 976                         intval($post_id));
 977
 978                 if($contact_record != $author) {
 979                         notification(array(
 980                                 'type'         => NOTIFY_WALL,
 981                                 'notify_flags' => $user['notify-flags'],
 982                                 'language'     => $user['language'],
 983                                 'to_name'      => $user['username'],
 984                                 'to_email'     => $user['email'],
 985                                 'uid'          => $user['uid'],
 986                                 'item'         => $datarray,
 987                                 'link'          => App::get_baseurl().'/display/'.urlencode($datarray['guid']),
 988                                 'source_name'  => $datarray['author-name'],
 989                                 'source_link'  => $datarray['author-link'],
 990                                 'source_photo' => $datarray['author-avatar'],
 991                                 'verb'         => ACTIVITY_POST,
 992                                 'otype'        => 'item'
 993                         ));
 994                 }
 995         }
 996
 997         call_hooks('post_local_end', $datarray);
 998
 999         if(strlen($emailcc) && $profile_uid == local_user()) {
1000                 $erecips = explode(',', $emailcc);
1001                 if(count($erecips)) {
1002                         foreach($erecips as $recip) {
1003                                 $addr = trim($recip);
1004                                 if(! strlen($addr))
1005                                         continue;
1006                                 $disclaimer = '<hr />' . sprintf( t('This message was sent to you by %s, a member of the Friendica social network.'),$a->user['username'])
1007                                         . '<br />';
1008                                 $disclaimer .= sprintf( t('You may visit them online at %s'), App::get_baseurl() . '/profile/' . $a->user['nickname']) . EOL;
1009                                 $disclaimer .= t('Please contact the sender by replying to this post if you do not wish to receive these messages.') . EOL;
1010                                 if (!$datarray['title']=='') {
1011                                     $subject = email_header_encode($datarray['title'],'UTF-8');
1012                                 } else {
1013                                     $subject = email_header_encode('[Friendica]' . ' ' . sprintf( t('%s posted an update.'),$a->user['username']),'UTF-8');
1014                                 }
1015                                 $link = '<a href="' . App::get_baseurl() . '/profile/' . $a->user['nickname'] . '"><img src="' . $author['thumb'] . '" alt="' . $a->user['username'] . '" /></a><br /><br />';
1016                                 $html    = prepare_body($datarray);
1017                                 $message = '<html><body>' . $link . $html . $disclaimer . '</body></html>';
1018                                 include_once('include/html2plain.php');
1019                                 $params = array (
1020                                     'fromName' => $a->user['username'],
1021                                     'fromEmail' => $a->user['email'],
1022                                     'toEmail' => $addr,
1023                                     'replyTo' => $a->user['email'],
1024                                     'messageSubject' => $subject,
1025                                     'htmlVersion' => $message,
1026                                     'textVersion' => html2plain($html.$disclaimer),
1027                                 );
1028                                 Emailer::send($params);
1029                         }
1030                 }
1031         }
1032
1033         if ($post_id == $parent) {
1034                 add_thread($post_id);
1035         } else {
1036                 update_thread($parent, true);
1037         }
1038
1039         q("COMMIT");
1040
1041         create_tags_from_item($post_id);
1042         create_files_from_item($post_id);
1043
1044         // Insert an item entry for UID=0 for global entries.
1045         // We now do it in the background to save some time.
1046         // This is important in interactive environments like the frontend or the API.
1047         // We don't fork a new process since this is done anyway with the following command
1048         proc_run(array('priority' => PRIORITY_HIGH, 'dont_fork' => true), "include/create_shadowentry.php", $post_id);
1049
1050         // Call the background process that is delivering the item to the receivers
1051         proc_run(PRIORITY_HIGH, "include/notifier.php", $notify_type, $post_id);
1052
1053         logger('post_complete');
1054
1055         item_post_return(App::get_baseurl(), $api_source, $return_path);
1056         // NOTREACHED
1057 }
1058
1059 function item_post_return($baseurl, $api_source, $return_path) {
1060         // figure out how to return, depending on from whence we came
1061
1062         if($api_source)
1063                 return;
1064
1065         if ($return_path) {
1066                 goaway($return_path);
1067         }
1068
1069         $json = array('success' => 1);
1070         if (x($_REQUEST,'jsreload') && strlen($_REQUEST['jsreload'])) {
1071                 $json['reload'] = $baseurl . '/' . $_REQUEST['jsreload'];
1072         }
1073
1074         logger('post_json: ' . print_r($json,true), LOGGER_DEBUG);
1075
1076         echo json_encode($json);
1077         killme();
1078 }
1079
1080
1081
1082 function item_content(App &$a) {
1083
1084         if ((! local_user()) && (! remote_user())) {
1085                 return;
1086         }
1087
1088         require_once('include/security.php');
1089
1090         $o = '';
1091         if (($a->argc == 3) && ($a->argv[1] === 'drop') && intval($a->argv[2])) {
1092                 $o = drop_item($a->argv[2], !is_ajax());
1093                 if (is_ajax()) {
1094                         // ajax return: [<item id>, 0 (no perm) | <owner id>]
1095                         echo json_encode(array(intval($a->argv[2]), intval($o)));
1096                         killme();
1097                 }
1098         }
1099         return $o;
1100 }
1101
1102 /**
1103  * This function removes the tag $tag from the text $body and replaces it with
1104  * the appropiate link.
1105  *
1106  * @param App $a Application instance @TODO is unused in this function's scope (excluding included files)
1107  * @param unknown_type $body the text to replace the tag in
1108  * @param string $inform a comma-seperated string containing everybody to inform
1109  * @param string $str_tags string to add the tag to
1110  * @param integer $profile_uid
1111  * @param string $tag the tag to replace
1112  * @param string $network The network of the post
1113  *
1114  * @return boolean true if replaced, false if not replaced
1115  */
1116 function handle_tag($a, &$body, &$inform, &$str_tags, $profile_uid, $tag, $network = "") {
1117         require_once("include/Scrape.php");
1118         require_once("include/socgraph.php");
1119
1120         $replaced = false;
1121         $r = null;
1122
1123         //is it a person tag?
1124         if (strpos($tag,'@') === 0) {
1125                 //is it already replaced?
1126                 if (strpos($tag,'[url=')) {
1127                         //append tag to str_tags
1128                         if (!stristr($str_tags,$tag)) {
1129                                 if (strlen($str_tags)) {
1130                                         $str_tags .= ',';
1131                                 }
1132                                 $str_tags .= $tag;
1133                         }
1134
1135                         // Checking for the alias that is used for OStatus
1136                         $pattern = "/@\[url\=(.*?)\](.*?)\[\/url\]/ism";
1137                         if (preg_match($pattern, $tag, $matches)) {
1138
1139                                 $r = q("SELECT `alias`, `name` FROM `contact` WHERE `nurl` = '%s' AND `alias` != '' AND `uid` = 0",
1140                                         normalise_link($matches[1]));
1141                                 if (!$r)
1142                                         $r = q("SELECT `alias`, `name` FROM `gcontact` WHERE `nurl` = '%s' AND `alias` != ''",
1143                                                 normalise_link($matches[1]));
1144                                 if ($r)
1145                                         $data = $r[0];
1146                                 else
1147                                         $data = probe_url($matches[1]);
1148
1149                                 if ($data["alias"] != "") {
1150                                         $newtag = '@[url='.$data["alias"].']'.$data["name"].'[/url]';
1151                                         if(!stristr($str_tags,$newtag)) {
1152                                                 if(strlen($str_tags))
1153                                                         $str_tags .= ',';
1154                                                 $str_tags .= $newtag;
1155                                         }
1156                                 }
1157                         }
1158
1159                         return $replaced;
1160                 }
1161                 $stat = false;
1162                 //get the person's name
1163                 $name = substr($tag,1);
1164
1165                 // Sometimes the tag detection doesn't seem to work right
1166                 // This is some workaround
1167                 $nameparts = explode(" ", $name);
1168                 $name = $nameparts[0];
1169
1170                 // Try to detect the contact in various ways
1171                 if ((strpos($name,'@')) || (strpos($name,'http://'))) {
1172                         // Is it in format @user@domain.tld or @http://domain.tld/...?
1173
1174                         // First check the contact table for the address
1175                         $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network`, `notify` FROM `contact`
1176                                 WHERE `addr` = '%s' AND `uid` = %d AND
1177                                         (`network` != '%s' OR (`notify` != '' AND `alias` != ''))
1178                                 LIMIT 1",
1179                                         dbesc($name),
1180                                         intval($profile_uid),
1181                                         dbesc(NETWORK_OSTATUS)
1182                         );
1183
1184                         // Then check in the contact table for the url
1185                         if (!$r)
1186                                 $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network`, `notify` FROM `contact`
1187                                         WHERE `nurl` = '%s' AND `uid` = %d AND
1188                                                 (`network` != '%s' OR (`notify` != '' AND `alias` != ''))
1189                                         LIMIT 1",
1190                                                 dbesc(normalise_link($name)),
1191                                                 intval($profile_uid),
1192                                                 dbesc(NETWORK_OSTATUS)
1193                                 );
1194
1195                         // Then check in the global contacts for the address
1196                         if (!$r)
1197                                 $r = q("SELECT `url`, `nick`, `name`, `alias`, `network`, `notify` FROM `gcontact`
1198                                         WHERE `addr` = '%s' AND (`network` != '%s' OR (`notify` != '' AND `alias` != ''))
1199                                         LIMIT 1",
1200                                                 dbesc($name),
1201                                                 dbesc(NETWORK_OSTATUS)
1202                                 );
1203
1204                         // Then check in the global contacts for the url
1205                         if (!$r)
1206                                 $r = q("SELECT `url`, `nick`, `name`, `alias`, `network`, `notify` FROM `gcontact`
1207                                         WHERE `nurl` = '%s' AND (`network` != '%s' OR (`notify` != '' AND `alias` != ''))
1208                                         LIMIT 1",
1209                                                 dbesc(normalise_link($name)),
1210                                                 dbesc(NETWORK_OSTATUS)
1211                                 );
1212
1213                         if (!$r) {
1214                                 $probed = probe_url($name);
1215                                 if ($result['network'] != NETWORK_PHANTOM) {
1216                                         update_gcontact($probed);
1217                                         $r = q("SELECT `url`, `name`, `nick`, `network`, `alias`, `notify` FROM `gcontact` WHERE `nurl` = '%s' LIMIT 1",
1218                                                 dbesc(normalise_link($probed["url"])));
1219                                 }
1220                         }
1221                 } else {
1222                         $r = false;
1223                         if (strrpos($name,'+')) {
1224                                 // Is it in format @nick+number?
1225                                 $tagcid = intval(substr($name,strrpos($name,'+') + 1));
1226
1227                                 $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
1228                                                 intval($tagcid),
1229                                                 intval($profile_uid)
1230                                 );
1231                         }
1232
1233                         //select someone by attag or nick and the name passed in the current network
1234                         if(!$r AND ($network != ""))
1235                                 $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `attag` = '%s' OR `nick` = '%s' AND `network` = '%s' AND `uid` = %d ORDER BY `attag` DESC LIMIT 1",
1236                                                 dbesc($name),
1237                                                 dbesc($name),
1238                                                 dbesc($network),
1239                                                 intval($profile_uid)
1240                                 );
1241
1242                         //select someone from this user's contacts by name in the current network
1243                         if (!$r AND ($network != ""))
1244                                 $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `name` = '%s' AND `network` = '%s' AND `uid` = %d LIMIT 1",
1245                                                 dbesc($name),
1246                                                 dbesc($network),
1247                                                 intval($profile_uid)
1248                                 );
1249
1250                         //select someone by attag or nick and the name passed in
1251                         if(!$r)
1252                                 $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `attag` = '%s' OR `nick` = '%s' AND `uid` = %d ORDER BY `attag` DESC LIMIT 1",
1253                                                 dbesc($name),
1254                                                 dbesc($name),
1255                                                 intval($profile_uid)
1256                                 );
1257
1258
1259                         //select someone from this user's contacts by name
1260                         if(!$r)
1261                                 $r = q("SELECT `id`, `url`, `nick`, `name`, `alias`, `network` FROM `contact` WHERE `name` = '%s' AND `uid` = %d LIMIT 1",
1262                                                 dbesc($name),
1263                                                 intval($profile_uid)
1264                                 );
1265                 }
1266
1267                 if ($r) {
1268                         if(strlen($inform) AND (isset($r[0]["notify"]) OR isset($r[0]["id"])))
1269                                 $inform .= ',';
1270
1271                         if (isset($r[0]["id"]))
1272                                 $inform .= 'cid:' . $r[0]["id"];
1273                         elseif (isset($r[0]["notify"]))
1274                                 $inform  .= $r[0]["notify"];
1275
1276                         $profile = $r[0]["url"];
1277                         $alias   = $r[0]["alias"];
1278                         $newname = $r[0]["nick"];
1279                         if (($newname == "") OR (($r[0]["network"] != NETWORK_OSTATUS) AND ($r[0]["network"] != NETWORK_TWITTER)
1280                                 AND ($r[0]["network"] != NETWORK_STATUSNET) AND ($r[0]["network"] != NETWORK_APPNET)))
1281                                 $newname = $r[0]["name"];
1282                 }
1283
1284                 //if there is an url for this persons profile
1285                 if (isset($profile) AND ($newname != "")) {
1286
1287                         $replaced = true;
1288                         //create profile link
1289                         $profile = str_replace(',','%2c',$profile);
1290                         $newtag = '@[url='.$profile.']'.$newname.'[/url]';
1291                         $body = str_replace('@'.$name, $newtag, $body);
1292                         //append tag to str_tags
1293                         if(! stristr($str_tags,$newtag)) {
1294                                 if(strlen($str_tags))
1295                                         $str_tags .= ',';
1296                                 $str_tags .= $newtag;
1297                         }
1298
1299                         // Status.Net seems to require the numeric ID URL in a mention if the person isn't
1300                         // subscribed to you. But the nickname URL is OK if they are. Grrr. We'll tag both.
1301
1302                         if(strlen($alias)) {
1303                                 $newtag = '@[url='.$alias.']'.$newname.'[/url]';
1304                                 if(! stristr($str_tags,$newtag)) {
1305                                         if(strlen($str_tags))
1306                                                 $str_tags .= ',';
1307                                         $str_tags .= $newtag;
1308                                 }
1309                         }
1310                 }
1311         }
1312
1313         return array('replaced' => $replaced, 'contact' => $r[0]);
1314 }