]> git.mxchange.org Git - friendica-addons.git/blob - jappixmini/jappixmini.php
Merge pull request #312 from annando/1509-pumpio-sync
[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         // bosh address
126         $bosh_address = get_config("jappixmini", "bosh_address");
127         $o .= '<p><label for="jappixmini-address">Adress of the default BOSH proxy. If enabled it overrides the user settings:</label><br />';
128         $o .= '<input id="jappixmini-address" type="text" name="jappixmini-address" value="'.$bosh_address.'" /></p>';
129
130         // default server address
131         $default_server = get_config("jappixmini", "default_server");
132         $o .= '<p><label for="jappixmini-server">Adress of the default jabber server:</label><br />';
133         $o .= '<input id="jappixmini-server" type="text" name="jappixmini-server" value="'.$default_server.'" /></p>';
134
135         // default user name to friendica nickname
136         $default_user = intval(get_config("jappixmini", "default_user"));
137         $default_user = intval($default_user) ? ' checked="checked"' : '';
138         $o .= '<label for="jappixmini-user">Set the default username to the nickname:</label>';
139         $o .= ' <input id="jappixmini-user" type="checkbox" name="jappixmini-defaultuser" value="1"'.$default_user.' /><br />';
140
141         // info text field
142         $info_text = get_config("jappixmini", "infotext");
143         $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 />';
144         $o .= '<textarea id="jappixmini-infotext" name="jappixmini-infotext" rows="5" cols="50">'.htmlentities($info_text).'</textarea></p>';
145
146         // submit button
147         $o .= '<input type="submit" name="jappixmini-admin-settings" value="OK" />';
148 }
149
150 function jappixmini_plugin_admin_post(&$a) {
151         // set info text
152         $submit = $_REQUEST['jappixmini-admin-settings'];
153         if ($submit) {
154                 $info_text = $_REQUEST['jappixmini-infotext'];
155                 $bosh_proxy = intval($_REQUEST['jappixmini-proxy']);
156                 $default_user = intval($_REQUEST['jappixmini-defaultuser']);
157                 $bosh_address = $_REQUEST['jappixmini-address'];
158                 $default_server = $_REQUEST['jappixmini-server'];
159                 set_config("jappixmini", "infotext", $info_text);
160                 set_config("jappixmini", "bosh_proxy", $bosh_proxy);
161                 set_config("jappixmini", "bosh_address", $bosh_address);
162                 set_config("jappixmini", "default_server", $default_server);
163                 set_config("jappixmini", "default_user", $default_user);
164         }
165 }
166
167 function jappixmini_module() {}
168 function jappixmini_init(&$a) {
169         // module page where other Friendica sites can submit Jabber addresses to and also can query Jabber addresses
170         // of local users
171
172         $dfrn_id = $_REQUEST["dfrn_id"];
173         if (!$dfrn_id) killme();
174
175         $role = $_REQUEST["role"];
176         if ($role=="pub") {
177                 $r = q("SELECT * FROM `contact` WHERE LENGTH(`pubkey`) AND `dfrn-id`='%s' LIMIT 1",
178                         dbesc($dfrn_id)
179                 );
180                 if (!count($r)) killme();
181
182                 $encrypt_func = openssl_public_encrypt;
183                 $decrypt_func = openssl_public_decrypt;
184                 $key = $r[0]["pubkey"];
185         } else if ($role=="prv") {
186                 $r = q("SELECT * FROM `contact` WHERE LENGTH(`prvkey`) AND `issued-id`='%s' LIMIT 1",
187                         dbesc($dfrn_id)
188                 );
189                 if (!count($r)) killme();
190
191                 $encrypt_func = openssl_private_encrypt;
192                 $decrypt_func = openssl_private_decrypt;
193                 $key = $r[0]["prvkey"];
194         } else {
195                 killme();
196         }
197
198         $uid = $r[0]["uid"];
199
200         // save the Jabber address we received
201         try {
202                 $signed_address_hex = $_REQUEST["signed_address"];
203                 $signed_address = hex2bin($signed_address_hex);
204
205                 $trusted_address = "";
206                 $decrypt_func($signed_address, $trusted_address, $key);
207
208                 $now = intval(time());
209                 set_pconfig($uid, "jappixmini", "id:$dfrn_id", "$now:$trusted_address");
210         } catch (Exception $e) {
211         }
212
213         // do not return an address if user deactivated plugin
214         $activated = get_pconfig($uid, 'jappixmini', 'activate');
215         if (!$activated) killme();
216
217         // return the requested Jabber address
218         try {
219                 $username = get_pconfig($uid, 'jappixmini', 'username');
220                 $server = get_pconfig($uid, 'jappixmini', 'server');
221                 $address = "$username@$server";
222
223                 $encrypted_address = "";
224                 $encrypt_func($address, $encrypted_address, $key);
225
226                 $encrypted_address_hex = bin2hex($encrypted_address);
227
228                 $answer = Array(
229                         "status"=>"ok",
230                         "encrypted_address"=>$encrypted_address_hex
231                 );
232
233                 $answer_json = json_encode($answer);
234                 echo $answer_json;
235                 killme();
236         } catch (Exception $e) {
237                 killme();
238         }
239 }
240
241 function jappixmini_settings(&$a, &$s) {
242     // addon settings for a user
243
244     $activate = get_pconfig(local_user(),'jappixmini','activate');
245     $activate = intval($activate) ? ' checked="checked"' : '';
246     $dontinsertchat = get_pconfig(local_user(),'jappixmini','dontinsertchat');
247     $insertchat = !(intval($dontinsertchat) ? ' checked="checked"' : '');
248
249     $defaultbosh = get_config("jappixmini", "bosh_address");
250
251     if ($defaultbosh != "")
252         set_pconfig(local_user(),'jappixmini','bosh', $defaultbosh);
253
254     $username = get_pconfig(local_user(),'jappixmini','username');
255     $username = htmlentities($username);
256     $server = get_pconfig(local_user(),'jappixmini','server');
257     $server = htmlentities($server);
258     $bosh = get_pconfig(local_user(),'jappixmini','bosh');
259     $bosh = htmlentities($bosh);
260     $password = get_pconfig(local_user(),'jappixmini','password');
261     $autosubscribe = get_pconfig(local_user(),'jappixmini','autosubscribe');
262     $autosubscribe = intval($autosubscribe) ? ' checked="checked"' : '';
263     $autoapprove = get_pconfig(local_user(),'jappixmini','autoapprove');
264     $autoapprove = intval($autoapprove) ? ' checked="checked"' : '';
265     $encrypt = intval(get_pconfig(local_user(),'jappixmini','encrypt'));
266     $encrypt_checked = $encrypt ? ' checked="checked"' : '';
267     $encrypt_disabled = $encrypt ? '' : ' disabled="disabled"';
268
269     if ($server == "")
270         $server = get_config("jappixmini", "default_server");
271
272     if (($username == "") and get_config("jappixmini", "default_user"))
273         $username = $a->user["nickname"];
274
275     $info_text = get_config("jappixmini", "infotext");
276     $info_text = htmlentities($info_text);
277     $info_text = str_replace("\n", "<br />", $info_text);
278
279     // count contacts
280     $r = q("SELECT COUNT(1) as `cnt` FROM `pconfig` WHERE `uid`=%d AND `cat`='jappixmini' AND `k` LIKE 'id:%%'", local_user());
281     if (count($r)) $contact_cnt = $r[0]["cnt"];
282     else $contact_cnt = 0;
283
284     // count jabber addresses
285     $r = q("SELECT COUNT(1) as `cnt` FROM `pconfig` WHERE `uid`=%d AND `cat`='jappixmini' AND `k` LIKE 'id:%%' AND `v` LIKE '%%@%%'", local_user());
286     if (count($r)) $address_cnt = $r[0]["cnt"];
287     else $address_cnt = 0;
288
289     if (!$activate) {
290         // load scripts if not yet activated so that password can be saved
291         $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";
292         $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";
293
294         $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/lib.js"></script>'."\r\n";
295     }
296
297     $s .= '<span id="settings_jappixmini_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_jappixmini_expanded\'); openClose(\'settings_jappixmini_inflated\');">';
298     $s .= '<h3>'.t('Jappix Mini').'</h3>';
299     $s .= '</span>';
300     $s .= '<div id="settings_jappixmini_expanded" class="settings-block" style="display: none;">';
301     $s .= '<span class="fakelink" onclick="openClose(\'settings_jappixmini_expanded\'); openClose(\'settings_jappixmini_inflated\');">';
302     $s .= '<h3>'.t('Jappix Mini').'</h3>';
303     $s .= '</span>';
304
305     $s .= '<label for="jappixmini-activate">'.t('Activate addon').'</label>';
306     $s .= ' <input id="jappixmini-activate" type="checkbox" name="jappixmini-activate" value="1"'.$activate.' />';
307     $s .= '<br />';
308     $s .= '<label for"jappixmini-dont-insertchat">'.t('Do <em>not</em> insert the Jappixmini Chat-Widget into the webinterface').'</label>';
309     $s .= '<input id="jappixmini-dont-insertchat" type="checkbox" name="jappixmini-dont-insertchat" value="1"'.$insertchat.' />';
310     $s .= '<br />';
311     $s .= '<label for="jappixmini-username">'.t('Jabber username').'</label>';
312     $s .= ' <input id="jappixmini-username" type="text" name="jappixmini-username" value="'.$username.'" />';
313     $s .= '<br />';
314     $s .= '<label for="jappixmini-server">'.t('Jabber server').'</label>';
315     $s .= ' <input id="jappixmini-server" type="text" name="jappixmini-server" value="'.$server.'" />';
316     $s .= '<br />';
317
318     if ($defaultbosh == "") {
319         $s .= '<label for="jappixmini-bosh">'.t('Jabber BOSH host').'</label>';
320         $s .= ' <input id="jappixmini-bosh" type="text" name="jappixmini-bosh" value="'.$bosh.'" />';
321         $s .= '<br />';
322     }
323
324
325     $s .= '<label for="jappixmini-password">'.t('Jabber password').'</label>';
326     $s .= ' <input type="hidden" id="jappixmini-password" name="jappixmini-encrypted-password" value="'.$password.'" />';
327     $s .= ' <input id="jappixmini-clear-password" type="password" value="" onchange="jappixmini_set_password();" />';
328     $s .= '<br />';
329     $onchange = "document.getElementById('jappixmini-friendica-password').disabled = !this.checked;jappixmini_set_password();";
330     $s .= '<label for="jappixmini-encrypt">'.t('Encrypt Jabber password with Friendica password (recommended)').'</label>';
331     $s .= ' <input id="jappixmini-encrypt" type="checkbox" name="jappixmini-encrypt" onchange="'.$onchange.'" value="1"'.$encrypt_checked.' />';
332     $s .= '<br />';
333     $s .= '<label for="jappixmini-friendica-password">'.t('Friendica password').'</label>';
334     $s .= ' <input id="jappixmini-friendica-password" name="jappixmini-friendica-password" type="password" onchange="jappixmini_set_password();" value=""'.$encrypt_disabled.' />';
335     $s .= '<br />';
336     $s .= '<label for="jappixmini-autoapprove">'.t('Approve subscription requests from Friendica contacts automatically').'</label>';
337     $s .= ' <input id="jappixmini-autoapprove" type="checkbox" name="jappixmini-autoapprove" value="1"'.$autoapprove.' />';
338     $s .= '<br />';
339     $s .= '<label for="jappixmini-autosubscribe">'.t('Subscribe to Friendica contacts automatically').'</label>';
340     $s .= ' <input id="jappixmini-autosubscribe" type="checkbox" name="jappixmini-autosubscribe" value="1"'.$autosubscribe.' />';
341     $s .= '<br />';
342     $s .= '<label for="jappixmini-purge">'.t('Purge internal list of jabber addresses of contacts').'</label>';
343     $s .= ' <input id="jappixmini-purge" type="checkbox" name="jappixmini-purge" value="1" />';
344     $s .= '<br />';
345     if ($info_text) $s .= '<br />Configuration help:<p style="margin-left:2em;">'.$info_text.'</p>';
346     $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>';
347     $s .= '<input type="submit" name="jappixmini-submit" value="' . t('Save Settings') . '" />';
348     $s .= ' <input type="button" value="'.t('Add contact').'" onclick="jappixmini_addon_subscribe();" />';
349
350     $s .= '</div>';
351
352     $a->page['htmlhead'] .= "<script type=\"text/javascript\">
353         function jappixmini_set_password() {
354             encrypt = document.getElementById('jappixmini-encrypt').checked;
355             password = document.getElementById('jappixmini-password');
356             clear_password = document.getElementById('jappixmini-clear-password');
357             if (encrypt) {
358                 friendica_password = document.getElementById('jappixmini-friendica-password');
359
360                 if (friendica_password) {
361                     jappixmini_addon_set_client_secret(friendica_password.value);
362                     jappixmini_addon_encrypt_password(clear_password.value, function(encrypted_password){
363                         password.value = encrypted_password;
364                     });
365                 }
366             }
367             else {
368                 password.value = clear_password.value;
369             }
370         }
371
372         jQuery(document).ready(function() {
373             encrypt = document.getElementById('jappixmini-encrypt').checked;
374             password = document.getElementById('jappixmini-password');
375             clear_password = document.getElementById('jappixmini-clear-password');
376             if (encrypt) {
377                 jappixmini_addon_decrypt_password(password.value, function(decrypted_password){
378                     clear_password.value = decrypted_password;
379                 });
380             }
381             else {
382                 clear_password.value = password.value;
383             }
384         });
385     </script>";
386 }
387
388 function jappixmini_settings_post(&$a,&$b) {
389         // save addon settings for a user
390
391         if(! local_user()) return;
392         $uid = local_user();
393
394         if($_POST['jappixmini-submit']) {
395                 $encrypt = intval($b['jappixmini-encrypt']);
396                 if ($encrypt) {
397                         // check that Jabber password was encrypted with correct Friendica password
398                         $friendica_password = trim($b['jappixmini-friendica-password']);
399                         $encrypted = hash('whirlpool',$friendica_password);
400                         $r = q("SELECT * FROM `user` WHERE `uid`=$uid AND `password`='%s'",
401                                 dbesc($encrypted)
402                         );
403                         if (!count($r)) {
404                                 info("Wrong friendica password!");
405                                 return;
406                         }
407                 }
408
409                 $purge = intval($b['jappixmini-purge']);
410
411                 $username = trim($b['jappixmini-username']);
412                 $old_username = get_pconfig($uid,'jappixmini','username');
413                 if ($username!=$old_username) $purge = 1;
414
415                 $server = trim($b['jappixmini-server']);
416                 $old_server = get_pconfig($uid,'jappixmini','server');
417                 if ($server!=$old_server) $purge = 1;
418
419                 set_pconfig($uid,'jappixmini','username',$username);
420                 set_pconfig($uid,'jappixmini','server',$server);
421                 set_pconfig($uid,'jappixmini','bosh',trim($b['jappixmini-bosh']));
422                 set_pconfig($uid,'jappixmini','password',trim($b['jappixmini-encrypted-password']));
423                 set_pconfig($uid,'jappixmini','autosubscribe',intval($b['jappixmini-autosubscribe']));
424                 set_pconfig($uid,'jappixmini','autoapprove',intval($b['jappixmini-autoapprove']));
425                 set_pconfig($uid,'jappixmini','activate',intval($b['jappixmini-activate']));
426                 set_pconfig($uid,'jappixmini','dontinsertchat',intval($b['jappixmini-dont-insertchat']));
427                 set_pconfig($uid,'jappixmini','encrypt',$encrypt);
428                 info( 'Jappix Mini settings saved.' );
429
430                 if ($purge) {
431                         q("DELETE FROM `pconfig` WHERE `uid`=$uid AND `cat`='jappixmini' AND `k` LIKE 'id:%%'");
432                         info( 'List of addresses purged.' );
433                 }
434         }
435 }
436
437 function jappixmini_script(&$a,&$s) {
438     // adds the script to the page header which starts Jappix Mini
439
440     if(! local_user()) return;
441
442     if ($_GET["mode"] == "minimal")
443         return;
444
445     $activate = get_pconfig(local_user(),'jappixmini','activate');
446     $dontinsertchat = get_pconfig(local_user(), 'jappixmini','dontinsertchat');
447     if (!$activate or $dontinsertchat) return;
448
449     $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";
450     $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";
451
452     $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/lib.js"></script>'."\r\n";
453
454     $username = get_pconfig(local_user(),'jappixmini','username');
455     $username = str_replace("'", "\\'", $username);
456     $server = get_pconfig(local_user(),'jappixmini','server');
457     $server = str_replace("'", "\\'", $server);
458     $bosh = get_pconfig(local_user(),'jappixmini','bosh');
459     $bosh = str_replace("'", "\\'", $bosh);
460     $encrypt = get_pconfig(local_user(),'jappixmini','encrypt');
461     $encrypt = intval($encrypt);
462     $password = get_pconfig(local_user(),'jappixmini','password');
463     $password = str_replace("'", "\\'", $password);
464
465     $autoapprove = get_pconfig(local_user(),'jappixmini','autoapprove');
466     $autoapprove = intval($autoapprove);
467     $autosubscribe = get_pconfig(local_user(),'jappixmini','autosubscribe');
468     $autosubscribe = intval($autosubscribe);
469
470     // set proxy if necessary
471     $use_proxy = get_config('jappixmini','bosh_proxy');
472     if ($use_proxy) {
473         $proxy = $a->get_baseurl().'/addon/jappixmini/proxy.php';
474     }
475     else {
476         $proxy = "";
477     }
478
479     // get a list of jabber accounts of the contacts
480     $contacts = Array();
481     $uid = local_user();
482     $rows = q("SELECT * FROM `pconfig` WHERE `uid`=$uid AND `cat`='jappixmini' AND `k` LIKE 'id:%%'");
483     foreach ($rows as $row) {
484         $key = $row['k'];
485         $pos = strpos($key, ":");
486         $dfrn_id = substr($key, $pos+1);
487         $r = q("SELECT `name` FROM `contact` WHERE `uid`=$uid AND (`dfrn-id`='%s' OR `issued-id`='%s')",
488                 dbesc($dfrn_id),
489                 dbesc($dfrn_id)
490         );
491         if (count($r))
492                 $name = $r[0]["name"];
493
494         $value = $row['v'];
495         $pos = strpos($value, ":");
496         $address = substr($value, $pos+1);
497         if (!$address) continue;
498         if (!$name) $name = $address;
499
500         $contacts[$address] = $name;
501     }
502     $contacts_json = json_encode($contacts);
503     $contacts_hash = sha1($contacts_json);
504
505     // get nickname
506     $r = q("SELECT `username` FROM `user` WHERE `uid`=$uid");
507     $nickname = json_encode($r[0]["username"]);
508     $groupchats = get_config('jappixmini','groupchats');
509     //if $groupchats has no value jappix_addon_start will produce a syntax error
510     if(empty($groupchats)){
511         $groupchats = "{}";
512     }
513
514     // add javascript to start Jappix Mini
515     $a->page['htmlhead'] .= "<script type=\"text/javascript\">
516         jQuery(document).ready(function() {
517            jappixmini_addon_start('$server', '$username', '$proxy', '$bosh', $encrypt, '$password', $nickname, $contacts_json, '$contacts_hash', $autoapprove, $autosubscribe, $groupchats);
518         });
519     </script>";
520
521     return;
522 }
523
524 function jappixmini_login(&$a, &$o) {
525     // create client secret on login to be able to encrypt jabber passwords
526
527     // for setDB and str_sha1, needed by jappixmini_addon_set_client_secret
528     $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";
529
530     // for jappixmini_addon_set_client_secret
531     $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/lib.js"></script>'."\r\n";
532
533     // save hash of password
534     $o = str_replace("<form ", "<form onsubmit=\"jappixmini_addon_set_client_secret(this.elements['id_password'].value);return true;\" ", $o);
535 }
536
537 function jappixmini_cron(&$a, $d) {
538         // For autosubscribe/autoapprove, we need to maintain a list of jabber addresses of our contacts.
539
540         set_config("jappixmini", "last_cron_execution", $d);
541
542         // go through list of users with jabber enabled
543         $users = q("SELECT `uid` FROM `pconfig` WHERE `cat`='jappixmini' AND (`k`='autosubscribe' OR `k`='autoapprove') AND `v`='1'");
544         logger("jappixmini: Update list of contacts' jabber accounts for ".count($users)." users.");
545
546         if(! count($users))
547                 return;
548
549         foreach ($users as $row) {
550                 $uid = $row["uid"];
551
552                 // for each user, go through list of contacts
553                 $contacts = q("SELECT * FROM `contact` WHERE `uid`=%d AND ((LENGTH(`dfrn-id`) AND LENGTH(`pubkey`)) OR (LENGTH(`issued-id`) AND LENGTH(`prvkey`)))", intval($uid));
554                 foreach ($contacts as $contact_row) {
555                         $request = $contact_row["request"];
556                         if (!$request) continue;
557
558                         $dfrn_id = $contact_row["dfrn-id"];
559                         if ($dfrn_id) {
560                                 $key = $contact_row["pubkey"];
561                                 $encrypt_func = openssl_public_encrypt;
562                                 $decrypt_func = openssl_public_decrypt;
563                                 $role = "prv";
564                         } else {
565                                 $dfrn_id = $contact_row["issued-id"];
566                                 $key = $contact_row["prvkey"];
567                                 $encrypt_func = openssl_private_encrypt;
568                                 $decrypt_func = openssl_private_decrypt;
569                                 $role = "pub";
570                         }
571
572                         // check if jabber address already present
573                         $present = get_pconfig($uid, "jappixmini", "id:".$dfrn_id);
574                         $now = intval(time());
575                         if ($present) {
576                                 // $present has format "timestamp:jabber_address"
577                                 $p = strpos($present, ":");
578                                 $timestamp = intval(substr($present, 0, $p));
579
580                                 // do not re-retrieve jabber address if last retrieval
581                                 // is not older than a week
582                                 if ($now-$timestamp<3600*24*7) continue;
583                         }
584
585                         // construct base retrieval address
586                         $pos = strpos($request, "/dfrn_request/");
587                         if ($pos===false) continue;
588
589                         $base = substr($request, 0, $pos)."/jappixmini?role=$role";
590
591                         // construct own address
592                         $username = get_pconfig($uid, 'jappixmini', 'username');
593                         if (!$username) continue;
594                         $server = get_pconfig($uid, 'jappixmini', 'server');
595                         if (!$server) continue;
596
597                         $address = $username."@".$server;
598
599                         // sign address
600                         $signed_address = "";
601                         $encrypt_func($address, $signed_address, $key);
602
603                         // construct request url
604                         $signed_address_hex = bin2hex($signed_address);
605                         $url = $base."&signed_address=$signed_address_hex&dfrn_id=".urlencode($dfrn_id);
606
607                         try {
608                                 // send request
609                                 $answer_json = fetch_url($url);
610
611                                 // parse answer
612                                 $answer = json_decode($answer_json);
613                                 if ($answer->status != "ok") throw new Exception();
614
615                                 $encrypted_address_hex = $answer->encrypted_address;
616                                 if (!$encrypted_address_hex) throw new Exception();
617
618                                 $encrypted_address = hex2bin($encrypted_address_hex);
619                                 if (!$encrypted_address) throw new Exception();
620
621                                 // decrypt address
622                                 $decrypted_address = "";
623                                 $decrypt_func($encrypted_address, $decrypted_address, $key);
624                                 if (!$decrypted_address) throw new Exception();
625                         } catch (Exception $e) {
626                                 $decrypted_address = "";
627                         }
628
629                         // save address
630                         set_pconfig($uid, "jappixmini", "id:$dfrn_id", "$now:$decrypted_address");
631                 }
632         }
633 }
634
635 function jappixmini_download_source(&$a,&$b) {
636         // Jappix Mini source download link on About page
637
638         $b .= '<h1>Jappix Mini</h1>';
639         $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>';
640         $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>';
641 }