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