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