]> git.mxchange.org Git - friendica-addons.git/blob - jappixmini/jappixmini.php
jappixmini: mark the changes in the version number
[friendica-addons.git] / jappixmini / jappixmini.php
1 <?php
2
3 /**
4 * Name: jappixmini
5 * Description: Provides a Facebook-like chat using Jappix Mini
6 * Version: 1.0.1
7 * Author: leberwurscht <leberwurscht@hoegners.de>
8 *
9 */
10
11 //
12 // Copyright 2012 "Leberwurscht" <leberwurscht@hoegners.de>
13 //
14 // This file is dual-licensed under the MIT license (see MIT.txt) and the AGPL license (see jappix/COPYING).
15 //
16
17 /*
18
19 Problem:
20 * jabber password should not be stored on server
21 * jabber password should not be sent between server and browser as soon as the user is logged in
22 * jabber password should not be reconstructible from communication between server and browser as soon as the user is logged in
23
24 Solution:
25 Only store an encrypted version of the jabber password on the server. The encryption key is only available to the browser
26 and not to the server (at least as soon as the user is logged in). It can be stored using the jappix setDB function.
27
28 This encryption key could be the friendica password, but then this password would be stored in the browser in cleartext.
29 It is better to use a hash of the password.
30 The server should not be able to reconstruct the password, so we can't take the same hash the server stores. But we can
31  use hash("some_prefix"+password). This will however not work with OpenID logins, for this type of login the password must
32 be queried manually.
33
34 Problem:
35 How to discover the jabber addresses of the friendica contacts?
36
37 Solution:
38 Each Friendica site with this addon provides a /jappixmini/ module page. We go through our contacts and retrieve
39 this information every week using a cron hook.
40
41 Problem:
42 We do not want to make the jabber address public.
43
44 Solution:
45 When two friendica users connect using DFRN, the relation gets a DFRN ID and a keypair is generated.
46 Using this keypair, we can provide the jabber address only to contacts:
47
48 Alice:
49   signed_address = openssl_*_encrypt(alice_jabber_address)
50 send signed_address to Bob, who does
51   trusted_address = openssl_*_decrypt(signed_address)
52   save trusted_address
53   encrypted_address = openssl_*_encrypt(bob_jabber_address)
54 reply with encrypted_address to Alice, who does
55   decrypted_address = openssl_*_decrypt(encrypted_address)
56   save decrypted_address
57
58 Interface for this:
59 GET /jappixmini/?role=%s&signed_address=%s&dfrn_id=%s
60
61 Response:
62 json({"status":"ok", "encrypted_address":"%s"})
63
64 */
65
66 function jappixmini_install() {
67 register_hook('plugin_settings', 'addon/jappixmini/jappixmini.php', 'jappixmini_settings');
68 register_hook('plugin_settings_post', 'addon/jappixmini/jappixmini.php', 'jappixmini_settings_post');
69
70 register_hook('page_end', 'addon/jappixmini/jappixmini.php', 'jappixmini_script');
71 register_hook('authenticate', 'addon/jappixmini/jappixmini.php', 'jappixmini_login');
72
73 register_hook('cron', 'addon/jappixmini/jappixmini.php', 'jappixmini_cron');
74
75 // Jappix source download as required by AGPL
76 register_hook('about_hook', 'addon/jappixmini/jappixmini.php', 'jappixmini_download_source');
77
78 // set standard configuration
79 $info_text = get_config("jappixmini", "infotext");
80 if (!$info_text) set_config("jappixmini", "infotext",
81         "To get the chat working, you need to know a BOSH host which works with your Jabber account. ".
82         "An example of a BOSH server that works for all accounts is https://bind.jappix.com/, but keep ".
83         "in mind that the BOSH server can read along all chat messages. If you know that your Jabber ".
84         "server also provides an own BOSH server, it is much better to use this one!"
85 );
86
87 $bosh_proxy = get_config("jappixmini", "bosh_proxy");
88 if ($bosh_proxy==="") set_config("jappixmini", "bosh_proxy", "1");
89
90 // set addon version so that safe updates are possible later
91 $addon_version = get_config("jappixmini", "version");
92 if ($addon_version==="") set_config("jappixmini", "version", "1");
93 }
94
95
96 function jappixmini_uninstall() {
97 unregister_hook('plugin_settings', 'addon/jappixmini/jappixmini.php', 'jappixmini_settings');
98 unregister_hook('plugin_settings_post', 'addon/jappixmini/jappixmini.php', 'jappixmini_settings_post');
99
100 unregister_hook('page_end', 'addon/jappixmini/jappixmini.php', 'jappixmini_script');
101 unregister_hook('authenticate', 'addon/jappixmini/jappixmini.php', 'jappixmini_login');
102
103 unregister_hook('cron', 'addon/jappixmini/jappixmini.php', 'jappixmini_cron');
104
105 unregister_hook('about_hook', 'addon/jappixmini/jappixmini.php', 'jappixmini_download_source');
106 }
107
108 function jappixmini_plugin_admin(&$a, &$o) {
109         // display instructions and warnings on addon settings page for admin
110
111         if (!file_exists("addon/jappixmini.tgz")) {
112                 $o .= '<p><strong style="color:#fff;background-color:#f00">The source archive jappixmini.tgz does not exist. This is probably a violation of the Jappix License (AGPL).</strong></p>';
113         }
114
115         // warn if cron job has not yet been executed
116         $cron_run = get_config("jappixmini", "last_cron_execution");
117         if (!$cron_run) $o .= "<p><strong>Warning: The cron job has not yet been executed. If this message is still there after some time (usually 10 minutes), this means that autosubscribe and autoaccept will not work.</strong></p>";
118
119         // bosh proxy
120         $bosh_proxy = intval(get_config("jappixmini", "bosh_proxy"));
121         $bosh_proxy = intval($bosh_proxy) ? ' checked="checked"' : '';
122         $o .= '<label for="jappixmini-proxy">Activate BOSH proxy</label>';
123         $o .= ' <input id="jappixmini-proxy" type="checkbox" name="jappixmini-proxy" value="1"'.$bosh_proxy.' /><br />';
124
125         // info text field
126         $info_text = get_config("jappixmini", "infotext");
127         $o .= '<p><label for="jappixmini-infotext">Info text to help users with configuration (important if you want to provide your own BOSH host!):</label><br />';
128         $o .= '<textarea id="jappixmini-infotext" name="jappixmini-infotext" rows="5" cols="50">'.htmlentities($info_text).'</textarea></p>';
129
130         // submit button
131         $o .= '<input type="submit" name="jappixmini-admin-settings" value="OK" />';
132 }
133
134 function jappixmini_plugin_admin_post(&$a) {
135         // set info text
136         $submit = $_REQUEST['jappixmini-admin-settings'];
137         if ($submit) {
138                 $info_text = $_REQUEST['jappixmini-infotext'];
139                 $bosh_proxy = intval($_REQUEST['jappixmini-proxy']);
140                 set_config("jappixmini", "infotext", $info_text);
141                 set_config("jappixmini", "bosh_proxy", $bosh_proxy);
142         }
143 }
144
145 function jappixmini_module() {}
146 function jappixmini_init(&$a) {
147         // module page where other Friendica sites can submit Jabber addresses to and also can query Jabber addresses
148         // of local users
149
150         $dfrn_id = $_REQUEST["dfrn_id"];
151         if (!$dfrn_id) killme();
152
153         $role = $_REQUEST["role"];
154         if ($role=="pub") {
155                 $r = q("SELECT * FROM `contact` WHERE LENGTH(`pubkey`) AND `dfrn-id`='%s' LIMIT 1",
156                         dbesc($dfrn_id)
157                 );
158                 if (!count($r)) killme();
159
160                 $encrypt_func = openssl_public_encrypt;
161                 $decrypt_func = openssl_public_decrypt;
162                 $key = $r[0]["pubkey"];
163         } else if ($role=="prv") {
164                 $r = q("SELECT * FROM `contact` WHERE LENGTH(`prvkey`) AND `issued-id`='%s' LIMIT 1",
165                         dbesc($dfrn_id)
166                 );
167                 if (!count($r)) killme();
168
169                 $encrypt_func = openssl_private_encrypt;
170                 $decrypt_func = openssl_private_decrypt;
171                 $key = $r[0]["prvkey"];
172         } else {
173                 killme();
174         }
175
176         $uid = $r[0]["uid"];
177
178         // save the Jabber address we received
179         try {
180                 $signed_address_hex = $_REQUEST["signed_address"];
181                 $signed_address = hex2bin($signed_address_hex);
182
183                 $trusted_address = "";
184                 $decrypt_func($signed_address, $trusted_address, $key);
185
186                 $now = intval(time());
187                 set_pconfig($uid, "jappixmini", "id:$dfrn_id", "$now:$trusted_address");
188         } catch (Exception $e) {
189         }
190
191         // do not return an address if user deactivated plugin
192         $activated = get_pconfig($uid, 'jappixmini', 'activate');
193         if (!$activated) killme();
194
195         // return the requested Jabber address
196         try {
197                 $username = get_pconfig($uid, 'jappixmini', 'username');
198                 $server = get_pconfig($uid, 'jappixmini', 'server');
199                 $address = "$username@$server";
200
201                 $encrypted_address = "";
202                 $encrypt_func($address, $encrypted_address, $key);
203
204                 $encrypted_address_hex = bin2hex($encrypted_address);
205
206                 $answer = Array(
207                         "status"=>"ok",
208                         "encrypted_address"=>$encrypted_address_hex
209                 );
210
211                 $answer_json = json_encode($answer);
212                 echo $answer_json;
213                 killme();
214         } catch (Exception $e) {
215                 killme();
216         }
217 }
218
219 function jappixmini_settings(&$a, &$s) {
220     // addon settings for a user
221
222     $activate = get_pconfig(local_user(),'jappixmini','activate');
223     $activate = intval($activate) ? ' checked="checked"' : '';
224     $dontinsertchat = get_pconfig(local_user(),'jappixmini','dontinsertchat');
225     $insertchat = !(intval($dontinsertchat) ? ' checked="checked"' : '');
226
227     $username = get_pconfig(local_user(),'jappixmini','username');
228     $username = htmlentities($username);
229     $server = get_pconfig(local_user(),'jappixmini','server');
230     $server = htmlentities($server);
231     $bosh = get_pconfig(local_user(),'jappixmini','bosh');
232     $bosh = htmlentities($bosh);
233     $password = get_pconfig(local_user(),'jappixmini','password');
234     $autosubscribe = get_pconfig(local_user(),'jappixmini','autosubscribe');
235     $autosubscribe = intval($autosubscribe) ? ' checked="checked"' : '';
236     $autoapprove = get_pconfig(local_user(),'jappixmini','autoapprove');
237     $autoapprove = intval($autoapprove) ? ' checked="checked"' : '';
238     $encrypt = intval(get_pconfig(local_user(),'jappixmini','encrypt'));
239     $encrypt_checked = $encrypt ? ' checked="checked"' : '';
240     $encrypt_disabled = $encrypt ? '' : ' disabled="disabled"';
241
242     $info_text = get_config("jappixmini", "infotext");
243     $info_text = htmlentities($info_text);
244     $info_text = str_replace("\n", "<br />", $info_text);
245
246     // count contacts
247     $r = q("SELECT COUNT(1) as `cnt` FROM `pconfig` WHERE `uid`=%d AND `cat`='jappixmini' AND `k` LIKE 'id:%%'", local_user());
248     if (count($r)) $contact_cnt = $r[0]["cnt"];
249     else $contact_cnt = 0;
250
251     // count jabber addresses
252     $r = q("SELECT COUNT(1) as `cnt` FROM `pconfig` WHERE `uid`=%d AND `cat`='jappixmini' AND `k` LIKE 'id:%%' AND `v` LIKE '%%@%%'", local_user());
253     if (count($r)) $address_cnt = $r[0]["cnt"];
254     else $address_cnt = 0;
255
256     if (!$activate) {
257         // load scripts if not yet activated so that password can be saved
258         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/jappix/php/get.php?t=js&amp;g=mini.xml"></script>'."\r\n";
259         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/jappix/php/get.php?t=js&amp;f=presence.js~caps.js~name.js~roster.js"></script>'."\r\n";
260
261         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/lib.js"></script>'."\r\n";
262     }
263
264     $s .= '<div class="settings-block">';
265
266     $s .= '<h3>'.t('Jappix Mini addon settings').'</h3>';
267     $s .= '<div>';
268     $s .= '<label for="jappixmini-activate">'.t('Activate addon').'</label>';
269     $s .= ' <input id="jappixmini-activate" type="checkbox" name="jappixmini-activate" value="1"'.$activate.' />';
270     $s .= '<br />';
271     $s .= '<label for"jappixmini-dont-insertchat">'.t('Do <em>not</em> insert the Jappixmini Chat-Widget into the webinterface').'</label>';
272     $s .= '<input id="jappixmini-dont-insertchat" type="checkbox" name="jappixmini-dont-insertchat" value="1"'.$insertchat.' />';
273     $s .= '<br />';
274     $s .= '<label for="jappixmini-username">'.t('Jabber username').'</label>';
275     $s .= ' <input id="jappixmini-username" type="text" name="jappixmini-username" value="'.$username.'" />';
276     $s .= '<br />';
277     $s .= '<label for="jappixmini-server">'.t('Jabber server').'</label>';
278     $s .= ' <input id="jappixmini-server" type="text" name="jappixmini-server" value="'.$server.'" />';
279     $s .= '<br />';
280
281     $s .= '<label for="jappixmini-bosh">'.t('Jabber BOSH host').'</label>';
282     $s .= ' <input id="jappixmini-bosh" type="text" name="jappixmini-bosh" value="'.$bosh.'" />';
283     $s .= '<br />';
284
285     $s .= '<label for="jappixmini-password">'.t('Jabber password').'</label>';
286     $s .= ' <input type="hidden" id="jappixmini-password" name="jappixmini-encrypted-password" value="'.$password.'" />';
287     $s .= ' <input id="jappixmini-clear-password" type="password" value="" onchange="jappixmini_set_password();" />';
288     $s .= '<br />';
289     $onchange = "document.getElementById('jappixmini-friendica-password').disabled = !this.checked;jappixmini_set_password();";
290     $s .= '<label for="jappixmini-encrypt">'.t('Encrypt Jabber password with Friendica password (recommended)').'</label>';
291     $s .= ' <input id="jappixmini-encrypt" type="checkbox" name="jappixmini-encrypt" onchange="'.$onchange.'" value="1"'.$encrypt_checked.' />';
292     $s .= '<br />';
293     $s .= '<label for="jappixmini-friendica-password">'.t('Friendica password').'</label>';
294     $s .= ' <input id="jappixmini-friendica-password" name="jappixmini-friendica-password" type="password" onchange="jappixmini_set_password();" value=""'.$encrypt_disabled.' />';
295     $s .= '<br />';
296     $s .= '<label for="jappixmini-autoapprove">'.t('Approve subscription requests from Friendica contacts automatically').'</label>';
297     $s .= ' <input id="jappixmini-autoapprove" type="checkbox" name="jappixmini-autoapprove" value="1"'.$autoapprove.' />';
298     $s .= '<br />';
299     $s .= '<label for="jappixmini-autosubscribe">'.t('Subscribe to Friendica contacts automatically').'</label>';
300     $s .= ' <input id="jappixmini-autosubscribe" type="checkbox" name="jappixmini-autosubscribe" value="1"'.$autosubscribe.' />';
301     $s .= '<br />';
302     $s .= '<label for="jappixmini-purge">'.t('Purge internal list of jabber addresses of contacts').'</label>';
303     $s .= ' <input id="jappixmini-purge" type="checkbox" name="jappixmini-purge" value="1" />';
304     $s .= '<br />';
305     if ($info_text) $s .= '<br />Configuration help:<p style="margin-left:2em;">'.$info_text.'</p>';
306     $s .= '<br />Status:<p style="margin-left:2em;">Addon knows '.$address_cnt.' Jabber addresses of '.$contact_cnt.' Friendica contacts (takes some time, usually 10 minutes, to update).</p>';
307     $s .= '<input type="submit" name="jappixmini-submit" value="' . t('Submit') . '" />';
308     $s .= ' <input type="button" value="'.t('Add contact').'" onclick="jappixmini_addon_subscribe();" />';
309     $s .= '</div>';
310
311     $s .= '</div>';
312
313     $a->page['htmlhead'] .= "<script type=\"text/javascript\">
314         function jappixmini_set_password() {
315             encrypt = document.getElementById('jappixmini-encrypt').checked;
316             password = document.getElementById('jappixmini-password');
317             clear_password = document.getElementById('jappixmini-clear-password');
318             if (encrypt) {
319                 friendica_password = document.getElementById('jappixmini-friendica-password');
320
321                 if (friendica_password) {
322                     jappixmini_addon_set_client_secret(friendica_password.value);
323                     jappixmini_addon_encrypt_password(clear_password.value, function(encrypted_password){
324                         password.value = encrypted_password;
325                     });
326                 }
327             }
328             else {
329                 password.value = clear_password.value;
330             }
331         }
332
333         jQuery(document).ready(function() {
334             encrypt = document.getElementById('jappixmini-encrypt').checked;
335             password = document.getElementById('jappixmini-password');
336             clear_password = document.getElementById('jappixmini-clear-password');
337             if (encrypt) {
338                 jappixmini_addon_decrypt_password(password.value, function(decrypted_password){
339                     clear_password.value = decrypted_password;
340                 });
341             }
342             else {
343                 clear_password.value = password.value;
344             }
345         });
346     </script>";
347 }
348
349 function jappixmini_settings_post(&$a,&$b) {
350         // save addon settings for a user
351
352         if(! local_user()) return;
353         $uid = local_user();
354
355         if($_POST['jappixmini-submit']) {
356                 $encrypt = intval($b['jappixmini-encrypt']);
357                 if ($encrypt) {
358                         // check that Jabber password was encrypted with correct Friendica password
359                         $friendica_password = trim($b['jappixmini-friendica-password']);
360                         $encrypted = hash('whirlpool',$friendica_password);
361                         $r = q("SELECT * FROM `user` WHERE `uid`=$uid AND `password`='%s'",
362                                 dbesc($encrypted)
363                         );
364                         if (!count($r)) {
365                                 info("Wrong friendica password!");
366                                 return;
367                         }
368                 }
369
370                 $purge = intval($b['jappixmini-purge']);
371
372                 $username = trim($b['jappixmini-username']);
373                 $old_username = get_pconfig($uid,'jappixmini','username');
374                 if ($username!=$old_username) $purge = 1;
375
376                 $server = trim($b['jappixmini-server']);
377                 $old_server = get_pconfig($uid,'jappixmini','server');
378                 if ($server!=$old_server) $purge = 1;
379
380                 set_pconfig($uid,'jappixmini','username',$username);
381                 set_pconfig($uid,'jappixmini','server',$server);
382                 set_pconfig($uid,'jappixmini','bosh',trim($b['jappixmini-bosh']));
383                 set_pconfig($uid,'jappixmini','password',trim($b['jappixmini-encrypted-password']));
384                 set_pconfig($uid,'jappixmini','autosubscribe',intval($b['jappixmini-autosubscribe']));
385                 set_pconfig($uid,'jappixmini','autoapprove',intval($b['jappixmini-autoapprove']));
386                 set_pconfig($uid,'jappixmini','activate',intval($b['jappixmini-activate']));
387                 set_pconfig($uid,'jappixmini','dontinsertchat',intval($b['jappixmini-dont-insertchat']));
388                 set_pconfig($uid,'jappixmini','encrypt',$encrypt);
389                 info( 'Jappix Mini settings saved.' );
390
391                 if ($purge) {
392                         q("DELETE FROM `pconfig` WHERE `uid`=$uid AND `cat`='jappixmini' AND `k` LIKE 'id:%%'");
393                         info( 'List of addresses purged.' );
394                 }
395         }
396 }
397
398 function jappixmini_script(&$a,&$s) {
399     // adds the script to the page header which starts Jappix Mini
400
401     if(! local_user()) return;
402
403     $activate = get_pconfig(local_user(),'jappixmini','activate');
404     $dontinsertchat = get_pconfig(local_user(), 'jappixmini','dontinsertchat');
405     if (!$activate or $dontinsertchat) return;
406
407     $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/jappix/php/get.php?t=js&amp;g=mini.xml"></script>'."\r\n";
408     $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/jappix/php/get.php?t=js&amp;f=presence.js~caps.js~name.js~roster.js"></script>'."\r\n";
409
410     $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/lib.js"></script>'."\r\n";
411
412     $username = get_pconfig(local_user(),'jappixmini','username');
413     $username = str_replace("'", "\\'", $username);
414     $server = get_pconfig(local_user(),'jappixmini','server');
415     $server = str_replace("'", "\\'", $server);
416     $bosh = get_pconfig(local_user(),'jappixmini','bosh');
417     $bosh = str_replace("'", "\\'", $bosh);
418     $encrypt = get_pconfig(local_user(),'jappixmini','encrypt');
419     $encrypt = intval($encrypt);
420     $password = get_pconfig(local_user(),'jappixmini','password');
421     $password = str_replace("'", "\\'", $password);
422
423     $autoapprove = get_pconfig(local_user(),'jappixmini','autoapprove');
424     $autoapprove = intval($autoapprove);
425     $autosubscribe = get_pconfig(local_user(),'jappixmini','autosubscribe');
426     $autosubscribe = intval($autosubscribe);
427
428     // set proxy if necessary
429     $use_proxy = get_config('jappixmini','bosh_proxy');
430     if ($use_proxy) {
431         $proxy = $a->get_baseurl().'/addon/jappixmini/proxy.php';
432     }
433     else {
434         $proxy = "";
435     }
436
437     // get a list of jabber accounts of the contacts
438     $contacts = Array();
439     $uid = local_user();
440     $rows = q("SELECT * FROM `pconfig` WHERE `uid`=$uid AND `cat`='jappixmini' AND `k` LIKE 'id:%%'");
441     foreach ($rows as $row) {
442         $key = $row['k'];
443         $pos = strpos($key, ":");
444         $dfrn_id = substr($key, $pos+1);
445         $r = q("SELECT `name` FROM `contact` WHERE `uid`=$uid AND (`dfrn-id`='%s' OR `issued-id`='%s')",
446                 dbesc($dfrn_id),
447                 dbesc($dfrn_id)
448         );
449         $name = $r[0]["name"];
450
451         $value = $row['v'];
452         $pos = strpos($value, ":");
453         $address = substr($value, $pos+1);
454         if (!$address) continue;
455         if (!$name) $name = $address;
456
457         $contacts[$address] = $name;
458     }
459     $contacts_json = json_encode($contacts);
460     $contacts_hash = sha1($contacts_json);
461
462     // get nickname
463     $r = q("SELECT `username` FROM `user` WHERE `uid`=$uid");
464     $nickname = json_encode($r[0]["username"]);
465
466     // add javascript to start Jappix Mini
467     $a->page['htmlhead'] .= "<script type=\"text/javascript\">
468         jQuery(document).ready(function() {
469            jappixmini_addon_start('$server', '$username', '$proxy', '$bosh', $encrypt, '$password', $nickname, $contacts_json, '$contacts_hash', $autoapprove, $autosubscribe);
470         });
471     </script>";
472
473     return;
474 }
475
476 function jappixmini_login(&$a, &$o) {
477     // create client secret on login to be able to encrypt jabber passwords
478
479     // for setDB and str_sha1, needed by jappixmini_addon_set_client_secret
480     $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/jappix/php/get.php?t=js&amp;f=datastore.js~jsjac.js"></script>'."\r\n";
481
482     // for jappixmini_addon_set_client_secret
483     $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/lib.js"></script>'."\r\n";
484
485     // save hash of password
486     $o = str_replace("<form ", "<form onsubmit=\"jappixmini_addon_set_client_secret(this.elements['id_password'].value);return true;\" ", $o);
487 }
488
489 function jappixmini_cron(&$a, $d) {
490         // For autosubscribe/autoapprove, we need to maintain a list of jabber addresses of our contacts.
491
492         set_config("jappixmini", "last_cron_execution", $d);
493
494         // go through list of users with jabber enabled
495         $users = q("SELECT `uid` FROM `pconfig` WHERE `cat`='jappixmini' AND (`k`='autosubscribe' OR `k`='autoapprove') AND `v`='1'");
496         logger("jappixmini: Update list of contacts' jabber accounts for ".count($users)." users.");
497
498         if(! count($users))
499                 return;
500
501         foreach ($users as $row) {
502                 $uid = $row["uid"];
503
504                 // for each user, go through list of contacts
505                 $contacts = q("SELECT * FROM `contact` WHERE `uid`=%d AND ((LENGTH(`dfrn-id`) AND LENGTH(`pubkey`)) OR (LENGTH(`issued-id`) AND LENGTH(`prvkey`)))", intval($uid));
506                 foreach ($contacts as $contact_row) {
507                         $request = $contact_row["request"];
508                         if (!$request) continue;
509
510                         $dfrn_id = $contact_row["dfrn-id"];
511                         if ($dfrn_id) {
512                                 $key = $contact_row["pubkey"];
513                                 $encrypt_func = openssl_public_encrypt;
514                                 $decrypt_func = openssl_public_decrypt;
515                                 $role = "prv";
516                         } else {
517                                 $dfrn_id = $contact_row["issued-id"];
518                                 $key = $contact_row["prvkey"];
519                                 $encrypt_func = openssl_private_encrypt;
520                                 $decrypt_func = openssl_private_decrypt;
521                                 $role = "pub";
522                         }
523
524                         // check if jabber address already present
525                         $present = get_pconfig($uid, "jappixmini", "id:".$dfrn_id);
526                         $now = intval(time());
527                         if ($present) {
528                                 // $present has format "timestamp:jabber_address"
529                                 $p = strpos($present, ":");
530                                 $timestamp = intval(substr($present, 0, $p));
531
532                                 // do not re-retrieve jabber address if last retrieval
533                                 // is not older than a week
534                                 if ($now-$timestamp<3600*24*7) continue;
535                         }
536
537                         // construct base retrieval address
538                         $pos = strpos($request, "/dfrn_request/");
539                         if ($pos===false) continue;
540
541                         $base = substr($request, 0, $pos)."/jappixmini?role=$role";
542
543                         // construct own address
544                         $username = get_pconfig($uid, 'jappixmini', 'username');
545                         if (!$username) continue;
546                         $server = get_pconfig($uid, 'jappixmini', 'server');
547                         if (!$server) continue;
548
549                         $address = $username."@".$server;
550
551                         // sign address
552                         $signed_address = "";
553                         $encrypt_func($address, $signed_address, $key);
554
555                         // construct request url
556                         $signed_address_hex = bin2hex($signed_address);
557                         $url = $base."&signed_address=$signed_address_hex&dfrn_id=".urlencode($dfrn_id);
558
559                         try {
560                                 // send request
561                                 $answer_json = fetch_url($url);
562
563                                 // parse answer
564                                 $answer = json_decode($answer_json);
565                                 if ($answer->status != "ok") throw new Exception();
566
567                                 $encrypted_address_hex = $answer->encrypted_address;
568                                 if (!$encrypted_address_hex) throw new Exception();
569
570                                 $encrypted_address = hex2bin($encrypted_address_hex);
571                                 if (!$encrypted_address) throw new Exception();
572
573                                 // decrypt address
574                                 $decrypted_address = "";
575                                 $decrypt_func($encrypted_address, $decrypted_address, $key);
576                                 if (!$decrypted_address) throw new Exception();
577                         } catch (Exception $e) {
578                                 $decrypted_address = "";
579                         }
580
581                         // save address
582                         set_pconfig($uid, "jappixmini", "id:$dfrn_id", "$now:$decrypted_address");
583                 }
584         }
585 }
586
587 function jappixmini_download_source(&$a,&$b) {
588         // Jappix Mini source download link on About page
589
590         $b .= '<h1>Jappix Mini</h1>';
591         $b .= '<p>This site uses the jappixmini addon, which includes Jappix Mini by the <a href="'.$a->get_baseurl().'/addon/jappixmini/jappix/AUTHORS">Jappix authors</a> and is distributed under the terms of the <a href="'.$a->get_baseurl().'/addon/jappixmini/jappix/COPYING">GNU Affero General Public License</a>.</p>';
592         $b .= '<p>You can download the <a href="'.$a->get_baseurl().'/addon/jappixmini.tgz">source code of the addon</a>. The rest of Friendica is distributed under compatible licenses and can be retrieved from <a href="https://github.com/friendica/friendica">https://github.com/friendica/friendica</a> and <a href="https://github.com/friendica/friendica-addons">https://github.com/friendica/friendica-addons</a></p>';
593 }