]> git.mxchange.org Git - friendica.git/blob - include/message.php
Merge pull request #2099 from rabuzarus/2611_new_user_addr
[friendica.git] / include / message.php
1 <?php
2
3         // send a private message
4
5
6
7
8 function send_message($recipient=0, $body='', $subject='', $replyto=''){
9
10         $a = get_app();
11
12         if(! $recipient) return -1;
13
14         if(! strlen($subject))
15                 $subject = t('[no subject]');
16
17         $me = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` = 1 LIMIT 1",
18                 intval(local_user())
19         );
20         $contact = q("SELECT * FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
21                         intval($recipient),
22                         intval(local_user())
23         );
24
25         if(! (count($me) && (count($contact)))) {
26                 return -2;
27         }
28
29         $guid = get_guid(32);
30         $uri = 'urn:X-dfrn:' . $a->get_baseurl() . ':' . local_user() . ':' . $guid;
31
32         $convid = 0;
33         $reply = false;
34
35         // look for any existing conversation structure
36
37         if(strlen($replyto)) {
38                 $reply = true;
39                 $r = q("select convid from mail where uid = %d and ( uri = '%s' or `parent-uri` = '%s' ) limit 1",
40                         intval(local_user()),
41                         dbesc($replyto),
42                         dbesc($replyto)
43                 );
44                 if(count($r))
45                         $convid = $r[0]['convid'];
46         }
47
48         if(! $convid) {
49
50                 // create a new conversation
51
52                 $recip_host = substr($contact[0]['url'],strpos($contact[0]['url'],'://')+3);
53                 $recip_host = substr($recip_host,0,strpos($recip_host,'/'));
54
55                 $recip_handle = (($contact[0]['addr']) ? $contact[0]['addr'] : $contact[0]['nick'] . '@' . $recip_host);
56                 $sender_handle = $a->user['nickname'] . '@' . substr($a->get_baseurl(), strpos($a->get_baseurl(),'://') + 3);
57
58                 $conv_guid = get_guid(32);
59                 $convuri = $recip_handle.':'.$conv_guid;
60
61                 $handles = $recip_handle . ';' . $sender_handle;
62
63                 $r = q("insert into conv (uid,guid,creator,created,updated,subject,recips) values(%d, '%s', '%s', '%s', '%s', '%s', '%s') ",
64                         intval(local_user()),
65                         dbesc($conv_guid),
66                         dbesc($sender_handle),
67                         dbesc(datetime_convert()),
68                         dbesc(datetime_convert()),
69                         dbesc($subject),
70                         dbesc($handles)
71                 );
72
73                 $r = q("select * from conv where guid = '%s' and uid = %d limit 1",
74                         dbesc($conv_guid),
75                         intval(local_user())
76                 );
77                 if(count($r))
78                         $convid = $r[0]['id'];
79         }
80
81         if(! $convid) {
82                 logger('send message: conversation not found.');
83                 return -4;
84         }
85
86         if(! strlen($replyto)) {
87                 $replyto = $convuri;
88         }
89
90
91         $r = q("INSERT INTO `mail` ( `uid`, `guid`, `convid`, `from-name`, `from-photo`, `from-url`,
92                 `contact-id`, `title`, `body`, `seen`, `reply`, `replied`, `uri`, `parent-uri`, `created`)
93                 VALUES ( %d, '%s', %d, '%s', '%s', '%s', %d, '%s', '%s', %d, %d, %d, '%s', '%s', '%s' )",
94                 intval(local_user()),
95                 dbesc($guid),
96                 intval($convid),
97                 dbesc($me[0]['name']),
98                 dbesc($me[0]['thumb']),
99                 dbesc($me[0]['url']),
100                 intval($recipient),
101                 dbesc($subject),
102                 dbesc($body),
103                 1,
104                 intval($reply),
105                 0,
106                 dbesc($uri),
107                 dbesc($replyto),
108                 datetime_convert()
109         );
110
111
112         $r = q("SELECT * FROM `mail` WHERE `uri` = '%s' and `uid` = %d LIMIT 1",
113                 dbesc($uri),
114                 intval(local_user())
115         );
116         if(count($r))
117                 $post_id = $r[0]['id'];
118
119         /**
120          *
121          * When a photo was uploaded into the message using the (profile wall) ajax
122          * uploader, The permissions are initially set to disallow anybody but the
123          * owner from seeing it. This is because the permissions may not yet have been
124          * set for the post. If it's private, the photo permissions should be set
125          * appropriately. But we didn't know the final permissions on the post until
126          * now. So now we'll look for links of uploaded messages that are in the
127          * post and set them to the same permissions as the post itself.
128          *
129          */
130
131         $match = null;
132
133         if(preg_match_all("/\[img\](.*?)\[\/img\]/",$body,$match)) {
134                 $images = $match[1];
135                 if(count($images)) {
136                         foreach($images as $image) {
137                                 if(! stristr($image,$a->get_baseurl() . '/photo/'))
138                                         continue;
139                                 $image_uri = substr($image,strrpos($image,'/') + 1);
140                                 $image_uri = substr($image_uri,0, strpos($image_uri,'-'));
141                                 $r = q("UPDATE `photo` SET `allow_cid` = '%s'
142                                         WHERE `resource-id` = '%s' AND `album` = '%s' AND `uid` = %d ",
143                                         dbesc('<' . $recipient . '>'),
144                                         dbesc($image_uri),
145                                         dbesc( t('Wall Photos')),
146                                         intval(local_user())
147                                 );
148                         }
149                 }
150         }
151
152         if($post_id) {
153                 proc_run('php',"include/notifier.php","mail","$post_id");
154                 return intval($post_id);
155         } else {
156                 return -3;
157         }
158
159 }
160
161
162
163
164
165 function send_wallmessage($recipient='', $body='', $subject='', $replyto=''){
166
167         $a = get_app();
168
169
170         if(! $recipient) return -1;
171
172         if(! strlen($subject))
173                 $subject = t('[no subject]');
174
175         $guid = get_guid(32);
176         $uri = 'urn:X-dfrn:' . $a->get_baseurl() . ':' . local_user() . ':' . $guid;
177
178         $convid = 0;
179         $reply = false;
180
181         require_once('include/Scrape.php');
182
183         $me = probe_url($replyto);
184
185         if(! $me['name'])
186                 return -2;
187
188         $conv_guid = get_guid(32);
189
190         $recip_handle = $recipient['nickname'] . '@' . substr($a->get_baseurl(), strpos($a->get_baseurl(),'://') + 3);
191
192         $sender_nick = basename($replyto);
193         $sender_host = substr($replyto,strpos($replyto,'://')+3);
194         $sender_host = substr($sender_host,0,strpos($sender_host,'/'));
195         $sender_handle = $sender_nick . '@' . $sender_host;
196
197         $handles = $recip_handle . ';' . $sender_handle;
198
199         $r = q("insert into conv (uid,guid,creator,created,updated,subject,recips) values(%d, '%s', '%s', '%s', '%s', '%s', '%s') ",
200                 intval($recipient['uid']),
201                 dbesc($conv_guid),
202                 dbesc($sender_handle),
203                 dbesc(datetime_convert()),
204                 dbesc(datetime_convert()),
205                 dbesc($subject),
206                 dbesc($handles)
207         );
208
209         $r = q("select * from conv where guid = '%s' and uid = %d limit 1",
210                 dbesc($conv_guid),
211                 intval($recipient['uid'])
212         );
213         if(count($r))
214                 $convid = $r[0]['id'];
215
216         if(! $convid) {
217                 logger('send message: conversation not found.');
218                 return -4;
219         }
220
221         $r = q("INSERT INTO `mail` ( `uid`, `guid`, `convid`, `from-name`, `from-photo`, `from-url`,
222                 `contact-id`, `title`, `body`, `seen`, `reply`, `replied`, `uri`, `parent-uri`, `created`, `unknown`)
223                 VALUES ( %d, '%s', %d, '%s', '%s', '%s', %d, '%s', '%s', %d, %d, %d, '%s', '%s', '%s', %d )",
224                 intval($recipient['uid']),
225                 dbesc($guid),
226                 intval($convid),
227                 dbesc($me['name']),
228                 dbesc($me['photo']),
229                 dbesc($me['url']),
230                 0,
231                 dbesc($subject),
232                 dbesc($body),
233                 0,
234                 0,
235                 0,
236                 dbesc($uri),
237                 dbesc($replyto),
238                 datetime_convert(),
239                 1
240         );
241
242         return 0;
243
244 }