]> git.mxchange.org Git - friendica.git/blob - mod/message.php
b544b552a4b475400f944f5f09913ca9193964a0
[friendica.git] / mod / message.php
1 <?php
2
3 require_once('view/acl_selectors.php');
4
5 function message_init(&$a) {
6
7
8 }
9
10 function message_post(&$a) {
11
12         if(! local_user()) {
13                 notice( t('Permission denied.') . EOL);
14                 return;
15         }
16
17         $replyto = notags(trim($_POST['replyto']));
18         $recipient = intval($_POST['messageto']);
19         $subject = notags(trim($_POST['subject']));
20         $body = escape_tags(trim($_POST['body']));
21
22         if(! $recipient) {
23                 notice( t('No recipient selected.') . EOL );
24                 return;
25         }
26
27         $me = q("SELECT * FROM `contact` WHERE `uid` = %d AND `self` = 1 LIMIT 1",
28                 intval($_SESSION['uid'])
29         );
30         $contact = q("SELECT * FROM `contact` WHERE `id` = %d AND `uid` = %d LIMIT 1",
31                         intval($recipient),
32                         intval($_SESSION['uid'])
33         );
34
35         if(! (count($me) && (count($contact)))) {
36                 notice( t('Unable to locate contact information.') . EOL );
37                 return;
38         }
39
40         $hash = random_string();
41         $uri = 'urn:X-dfrn:' . $a->get_baseurl() . ':' . $_SESSION['uid'] . ':' . $hash ;
42
43         if(! strlen($replyto))
44                 $replyto = $uri;
45
46         $r = q("INSERT INTO `mail` ( `uid`, `from-name`, `from-photo`, `from-url`, 
47                 `contact-id`, `title`, `body`, `delivered`, `seen`, `replied`, `uri`, `parent-uri`, `created`)
48                 VALUES ( %d, '%s', '%s', '%s', %d, '%s', '%s', %d, %d, %d, '%s', '%s', '%s' )",
49                 intval($_SESSION['uid']),
50                 dbesc($me[0]['name']),
51                 dbesc($me[0]['thumb']),
52                 dbesc($me[0]['url']),
53                 intval($recipient),
54                 dbesc($subject),
55                 dbesc($body),
56                 0,
57                 1,
58                 0,
59                 dbesc($uri),
60                 dbesc($replyto),
61                 datetime_convert()
62         );
63         $r = q("SELECT * FROM `mail` WHERE `uri` = '%s' and `uid` = %d LIMIT 1",
64                 dbesc($uri),
65                 intval($_SESSION['uid'])
66         );
67         if(count($r))
68                 $post_id = $r[0]['id'];
69
70         $php_path = ((strlen($a->config['php_path'])) ? $a->config['php_path'] : 'php');
71         $proc_debug = get_config('system','proc_debug');
72 notice("\"$php_path\" \"include/notifier.php\" \"mail\" \"$post_id\" $proc_debug &");
73         
74         if($post_id) {
75                 proc_close(proc_open("\"$php_path\" \"include/notifier.php\" \"mail\" \"$post_id\" $proc_debug &",
76                         array(),$foo));
77                 notice( t('Message sent.') . EOL );
78         }
79         else {
80                 notice( t('Message could not be sent.') . EOL );
81         }
82         return;
83
84 }
85
86 function message_content(&$a) {
87         $o .= '<script> $(document).ready(function() { $(\'#nav-messages-link\').addClass(\'nav-selected\'); });</script>';
88
89         if(! local_user()) {
90                 notice( t('Permission denied.') . EOL);
91                 return;
92         }
93
94         $myprofile = $a->get_baseurl() . '/profile/' . $a->user['nickname'];
95
96
97         $tpl = load_view_file('view/mail_head.tpl');
98         $header = replace_macros($tpl, array(
99                 '$messages' => t('Messages'),
100                 '$inbox' => t('Inbox'),
101                 '$outbox' => t('Outbox'),
102                 '$new' => t('New Message')
103         ));
104
105
106         if(($a->argc == 3) && ($a->argv[1] === 'drop' || $a->argv[1] === 'dropconv')) {
107                 if(! intval($a->argv[2]))
108                         return;
109                 $cmd = $a->argv[1];
110                 if($cmd === 'drop') {
111                         $r = q("DELETE FROM `mail` WHERE `id` = %d AND `uid` = %d LIMIT 1",
112                                 intval($a->argv[2]),
113                                 intval($_SESSION['uid'])
114                         );
115                         if($r) {
116                                 notice( t('Message deleted.') . EOL );
117                         }
118                         goaway($a->get_baseurl() . '/message' );
119                 }
120                 else {
121                         $r = q("SELECT `parent-uri` FROM `mail` WHERE `id` = %d AND `uid` = %d LIMIT 1",
122                                 intval($a->argv[2]),
123                                 intval($_SESSION['uid'])
124                         );
125                         if(count($r)) {
126                                 $parent = $r[0]['parent-uri'];
127                                 $r = q("DELETE FROM `mail` WHERE `parent-uri` = '%s' AND `uid` = %d ",
128                                         dbesc($parent),
129                                         intval($_SESSION['uid'])
130                                 );
131                                 if($r)
132                                         notice( t('Conversation removed.') . EOL );
133                         } 
134                         goaway($a->get_baseurl() . '/message' );
135                 }       
136         
137         }
138         if(($a->argc > 2) && ($a->argv[1] === 'redeliver') && intval($a->argv[2])) {
139                 $post_id = intval($a->argv[2]);
140                 $php_path = ((strlen($a->config['php_path'])) ? $a->config['php_path'] : 'php');
141                 $proc_debug = get_config('system','proc_debug');
142
143
144                 proc_close(proc_open("\"$php_path\" \"include/notifier.php\" \"mail\" \"$post_id\" $proc_debug & ",
145                         array(),$foo));
146                 goaway($a->get_baseurl() . '/message' );
147         }
148
149
150
151         if(($a->argc > 1) && ($a->argv[1] === 'new')) {
152                 
153                 $tpl = load_view_file('view/msg-header.tpl');
154         
155                 $a->page['htmlhead'] .= replace_macros($tpl, array('$baseurl' => $a->get_baseurl()));
156
157                 $select .= contact_select('messageto','message-to-select', false, 4, true);
158                 $tpl = load_view_file('view/prv_message.tpl');
159                 $o .= replace_macros($tpl,array(
160                         '$header' => t('Send Private Message'),
161                         '$to' => t('To:'),
162                         '$subject' => t('Subject:'),
163                         '$subjtxt' => '',
164                         '$readonly' => '',
165                         '$yourmessage' => t('Your message:'),
166                         '$select' => $select,
167                         '$parent' => '',
168                         '$upload' => t('Upload photo'),
169                         '$insert' => t('Insert web link'),
170                         '$wait' => t('Please wait')
171
172                 ));
173
174                 return $o;
175         }
176
177         if(($a->argc == 1) || ($a->argc == 2 && $a->argv[1] === 'sent')) {
178
179                 $o .= $header;
180                 
181                 if($a->argc == 2)
182                         $eq = '='; // I'm not going to bother escaping this.
183                 else
184                         $eq = '!='; // or this.
185
186                 $r = q("SELECT count(*) AS `total` FROM `mail` 
187                         WHERE `mail`.`uid` = %d AND `from-url` $eq '%s' GROUP BY `parent-uri` ORDER BY `created` DESC",
188                         intval($_SESSION['uid']),
189                         dbesc($myprofile)
190                 );
191                 if(count($r))
192                         $a->set_pager_total($r[0]['total']);
193         
194                 $r = q("SELECT max(`mail`.`created`) AS `mailcreated`, min(`mail`.`seen`) AS `mailseen`, 
195                         `mail`.* , `contact`.`name`, `contact`.`url`, `contact`.`thumb` 
196                         FROM `mail` LEFT JOIN `contact` ON `mail`.`contact-id` = `contact`.`id` 
197                         WHERE `mail`.`uid` = %d AND `from-url` $eq '%s' GROUP BY `parent-uri` ORDER BY `created` DESC  LIMIT %d , %d ",
198                         intval($_SESSION['uid']),
199                         dbesc($myprofile),
200                         intval($a->pager['start']),
201                         intval($a->pager['itemspage'])
202                 );
203                 if(! count($r)) {
204                         notice( t('No messages.') . EOL);
205                         return $o;
206                 }
207
208                 $tpl = load_view_file('view/mail_list.tpl');
209                 foreach($r as $rr) {
210                         $o .= replace_macros($tpl, array(
211                                 '$id' => $rr['id'],
212                                 '$from_name' =>$rr['from-name'],
213                                 '$from_url' => $a->get_baseurl() . '/redir/' . $rr['contact-id'],
214                                 '$from_photo' => $rr['from-photo'],
215                                 '$subject' => (($rr['mailseen']) ? $rr['title'] : '<strong>' . $rr['title'] . '</strong>'),
216                                 '$delete' => t('Delete conversation'),
217                                 '$body' => $rr['body'],
218                                 '$to_name' => $rr['name'],
219                                 '$date' => datetime_convert('UTC',date_default_timezone_get(),$rr['mailcreated'],'D, d M Y - g:i A')
220                         ));
221                 }
222                 $o .= paginate($a);     
223                 return $o;
224         }
225
226         if(($a->argc > 1) && (intval($a->argv[1]))) {
227
228                 $o .= $header;
229
230                 $r = q("SELECT `mail`.*, `contact`.`name`, `contact`.`url`, `contact`.`thumb` 
231                         FROM `mail` LEFT JOIN `contact` ON `mail`.`contact-id` = `contact`.`id` 
232                         WHERE `mail`.`uid` = %d AND `mail`.`id` = %d LIMIT 1",
233                         intval($_SESSION['uid']),
234                         intval($a->argv[1])
235                 );
236                 if(count($r)) { 
237                         $contact_id = $r[0]['contact-id'];
238                         $messages = q("SELECT `mail`.*, `contact`.`name`, `contact`.`url`, `contact`.`thumb` 
239                                 FROM `mail` LEFT JOIN `contact` ON `mail`.`contact-id` = `contact`.`id` 
240                                 WHERE `mail`.`uid` = %d AND `mail`.`parent-uri` = '%s' ORDER BY `mail`.`created` ASC",
241                                 intval($_SESSION['uid']),
242                                 dbesc($r[0]['parent-uri'])
243                         );
244                 }
245                 if(! count($messages)) {
246                         notice( t('Message not available.') . EOL );
247                         return $o;
248                 }
249
250                 $r = q("UPDATE `mail` SET `seen` = 1 WHERE `parent-uri` = '%s' AND `uid` = %d",
251                         dbesc($r[0]['parent-uri']),
252                         intval($_SESSION['uid'])
253                 );
254
255                 require_once("include/bbcode.php");
256
257                 $tpl = load_view_file('view/msg-header.tpl');
258         
259                 $a->page['htmlhead'] .= replace_macros($tpl, array('$baseurl' => $a->get_baseurl()));
260
261
262                 $tpl = load_view_file('view/mail_conv.tpl');
263                 foreach($messages as $message) {
264                         $o .= replace_macros($tpl, array(
265                                 '$id' => $message['id'],
266                                 '$from_name' =>$message['from-name'],
267                                 '$from_url' => (($message['from-url'] == $myprofile) 
268                                         ? $myprofile : $a->get_baseurl() . '/redir/' . $message['contact-id']),
269                                 '$from_photo' => $message['from-photo'],
270                                 '$subject' => $message['title'],
271                                 '$body' => bbcode($message['body']),
272                                 '$delete' => t('Delete message'),
273                                 '$to_name' => $message['name'],
274                                 '$date' => datetime_convert('UTC',date_default_timezone_get(),$message['created'],'D, d M Y - g:i A')
275                         ));
276                                 
277                 }
278                 $select = $message['name'] . '<input type="hidden" name="messageto" value="' . $contact_id . '" />';
279                 $parent = '<input type="hidden" name="replyto" value="' . $message['parent-uri'] . '" />';
280                 $tpl = load_view_file('view/prv_message.tpl');
281                 $o .= replace_macros($tpl,array(
282                         '$header' => t('Send Reply'),
283                         '$to' => t('To:'),
284                         '$subject' => t('Subject:'),
285                         '$subjtxt' => $message['title'],
286                         '$readonly' => ' readonly="readonly" style="background: #BBBBBB;" ',
287                         '$yourmessage' => t('Your message:'),
288                         '$select' => $select,
289                         '$parent' => $parent,
290                         '$upload' => t('Upload photo'),
291                         '$insert' => t('Insert web link'),
292                         '$wait' => t('Please wait')
293
294                 ));
295
296                 return $o;
297         }
298
299 }