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 addon settings').'</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 addon settings').'</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('Submit') . '" />';
 348     $s .= ' <input type="button" value="'.t('Add contact').'" onclick="jappixmini_addon_subscribe();" />';
 349     $s .= '</div>';
 350
 351     $s .= '</div>';
 352
 353     $a->page['htmlhead'] .= "<script type=\"text/javascript\">
 354         function jappixmini_set_password() {
 355             encrypt = document.getElementById('jappixmini-encrypt').checked;
 356             password = document.getElementById('jappixmini-password');
 357             clear_password = document.getElementById('jappixmini-clear-password');
 358             if (encrypt) {
 359                 friendica_password = document.getElementById('jappixmini-friendica-password');
 360
 361                 if (friendica_password) {
 362                     jappixmini_addon_set_client_secret(friendica_password.value);
 363                     jappixmini_addon_encrypt_password(clear_password.value, function(encrypted_password){
 364                         password.value = encrypted_password;
 365                     });
 366                 }
 367             }
 368             else {
 369                 password.value = clear_password.value;
 370             }
 371         }
 372
 373         jQuery(document).ready(function() {
 374             encrypt = document.getElementById('jappixmini-encrypt').checked;
 375             password = document.getElementById('jappixmini-password');
 376             clear_password = document.getElementById('jappixmini-clear-password');
 377             if (encrypt) {
 378                 jappixmini_addon_decrypt_password(password.value, function(decrypted_password){
 379                     clear_password.value = decrypted_password;
 380                 });
 381             }
 382             else {
 383                 clear_password.value = password.value;
 384             }
 385         });
 386     </script>";
 387 }
 388
 389 function jappixmini_settings_post(&$a,&$b) {
 390         // save addon settings for a user
 391
 392         if(! local_user()) return;
 393         $uid = local_user();
 394
 395         if($_POST['jappixmini-submit']) {
 396                 $encrypt = intval($b['jappixmini-encrypt']);
 397                 if ($encrypt) {
 398                         // check that Jabber password was encrypted with correct Friendica password
 399                         $friendica_password = trim($b['jappixmini-friendica-password']);
 400                         $encrypted = hash('whirlpool',$friendica_password);
 401                         $r = q("SELECT * FROM `user` WHERE `uid`=$uid AND `password`='%s'",
 402                                 dbesc($encrypted)
 403                         );
 404                         if (!count($r)) {
 405                                 info("Wrong friendica password!");
 406                                 return;
 407                         }
 408                 }
 409
 410                 $purge = intval($b['jappixmini-purge']);
 411
 412                 $username = trim($b['jappixmini-username']);
 413                 $old_username = get_pconfig($uid,'jappixmini','username');
 414                 if ($username!=$old_username) $purge = 1;
 415
 416                 $server = trim($b['jappixmini-server']);
 417                 $old_server = get_pconfig($uid,'jappixmini','server');
 418                 if ($server!=$old_server) $purge = 1;
 419
 420                 set_pconfig($uid,'jappixmini','username',$username);
 421                 set_pconfig($uid,'jappixmini','server',$server);
 422                 set_pconfig($uid,'jappixmini','bosh',trim($b['jappixmini-bosh']));
 423                 set_pconfig($uid,'jappixmini','password',trim($b['jappixmini-encrypted-password']));
 424                 set_pconfig($uid,'jappixmini','autosubscribe',intval($b['jappixmini-autosubscribe']));
 425                 set_pconfig($uid,'jappixmini','autoapprove',intval($b['jappixmini-autoapprove']));
 426                 set_pconfig($uid,'jappixmini','activate',intval($b['jappixmini-activate']));
 427                 set_pconfig($uid,'jappixmini','dontinsertchat',intval($b['jappixmini-dont-insertchat']));
 428                 set_pconfig($uid,'jappixmini','encrypt',$encrypt);
 429                 info( 'Jappix Mini settings saved.' );
 430
 431                 if ($purge) {
 432                         q("DELETE FROM `pconfig` WHERE `uid`=$uid AND `cat`='jappixmini' AND `k` LIKE 'id:%%'");
 433                         info( 'List of addresses purged.' );
 434                 }
 435         }
 436 }
 437
 438 function jappixmini_script(&$a,&$s) {
 439     // adds the script to the page header which starts Jappix Mini
 440
 441     if(! local_user()) return;
 442
 443     $activate = get_pconfig(local_user(),'jappixmini','activate');
 444     $dontinsertchat = get_pconfig(local_user(), 'jappixmini','dontinsertchat');
 445     if (!$activate or $dontinsertchat) return;
 446
 447     $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";
 448     $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";
 449
 450     $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/lib.js"></script>'."\r\n";
 451
 452     $username = get_pconfig(local_user(),'jappixmini','username');
 453     $username = str_replace("'", "\\'", $username);
 454     $server = get_pconfig(local_user(),'jappixmini','server');
 455     $server = str_replace("'", "\\'", $server);
 456     $bosh = get_pconfig(local_user(),'jappixmini','bosh');
 457     $bosh = str_replace("'", "\\'", $bosh);
 458     $encrypt = get_pconfig(local_user(),'jappixmini','encrypt');
 459     $encrypt = intval($encrypt);
 460     $password = get_pconfig(local_user(),'jappixmini','password');
 461     $password = str_replace("'", "\\'", $password);
 462
 463     $autoapprove = get_pconfig(local_user(),'jappixmini','autoapprove');
 464     $autoapprove = intval($autoapprove);
 465     $autosubscribe = get_pconfig(local_user(),'jappixmini','autosubscribe');
 466     $autosubscribe = intval($autosubscribe);
 467
 468     // set proxy if necessary
 469     $use_proxy = get_config('jappixmini','bosh_proxy');
 470     if ($use_proxy) {
 471         $proxy = $a->get_baseurl().'/addon/jappixmini/proxy.php';
 472     }
 473     else {
 474         $proxy = "";
 475     }
 476
 477     // get a list of jabber accounts of the contacts
 478     $contacts = Array();
 479     $uid = local_user();
 480     $rows = q("SELECT * FROM `pconfig` WHERE `uid`=$uid AND `cat`='jappixmini' AND `k` LIKE 'id:%%'");
 481     foreach ($rows as $row) {
 482         $key = $row['k'];
 483         $pos = strpos($key, ":");
 484         $dfrn_id = substr($key, $pos+1);
 485         $r = q("SELECT `name` FROM `contact` WHERE `uid`=$uid AND (`dfrn-id`='%s' OR `issued-id`='%s')",
 486                 dbesc($dfrn_id),
 487                 dbesc($dfrn_id)
 488         );
 489         $name = $r[0]["name"];
 490
 491         $value = $row['v'];
 492         $pos = strpos($value, ":");
 493         $address = substr($value, $pos+1);
 494         if (!$address) continue;
 495         if (!$name) $name = $address;
 496
 497         $contacts[$address] = $name;
 498     }
 499     $contacts_json = json_encode($contacts);
 500     $contacts_hash = sha1($contacts_json);
 501
 502     // get nickname
 503     $r = q("SELECT `username` FROM `user` WHERE `uid`=$uid");
 504     $nickname = json_encode($r[0]["username"]);
 505     $groupchats = get_config('jappixmini','groupchats');
 506     //if $groupchats has no value jappix_addon_start will produce a syntax error
 507     if(empty($groupchats)){
 508         $groupchats = "{}";
 509     }
 510
 511     // add javascript to start Jappix Mini
 512     $a->page['htmlhead'] .= "<script type=\"text/javascript\">
 513         jQuery(document).ready(function() {
 514            jappixmini_addon_start('$server', '$username', '$proxy', '$bosh', $encrypt, '$password', $nickname, $contacts_json, '$contacts_hash', $autoapprove, $autosubscribe, $groupchats);
 515         });
 516     </script>";
 517
 518     return;
 519 }
 520
 521 function jappixmini_login(&$a, &$o) {
 522     // create client secret on login to be able to encrypt jabber passwords
 523
 524     // for setDB and str_sha1, needed by jappixmini_addon_set_client_secret
 525     $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";
 526
 527     // for jappixmini_addon_set_client_secret
 528     $a->page['htmlhead'] .= '<script type="text/javascript" src="' . $a->get_baseurl() . '/addon/jappixmini/lib.js"></script>'."\r\n";
 529
 530     // save hash of password
 531     $o = str_replace("<form ", "<form onsubmit=\"jappixmini_addon_set_client_secret(this.elements['id_password'].value);return true;\" ", $o);
 532 }
 533
 534 function jappixmini_cron(&$a, $d) {
 535         // For autosubscribe/autoapprove, we need to maintain a list of jabber addresses of our contacts.
 536
 537         set_config("jappixmini", "last_cron_execution", $d);
 538
 539         // go through list of users with jabber enabled
 540         $users = q("SELECT `uid` FROM `pconfig` WHERE `cat`='jappixmini' AND (`k`='autosubscribe' OR `k`='autoapprove') AND `v`='1'");
 541         logger("jappixmini: Update list of contacts' jabber accounts for ".count($users)." users.");
 542
 543         if(! count($users))
 544                 return;
 545
 546         foreach ($users as $row) {
 547                 $uid = $row["uid"];
 548
 549                 // for each user, go through list of contacts
 550                 $contacts = q("SELECT * FROM `contact` WHERE `uid`=%d AND ((LENGTH(`dfrn-id`) AND LENGTH(`pubkey`)) OR (LENGTH(`issued-id`) AND LENGTH(`prvkey`)))", intval($uid));
 551                 foreach ($contacts as $contact_row) {
 552                         $request = $contact_row["request"];
 553                         if (!$request) continue;
 554
 555                         $dfrn_id = $contact_row["dfrn-id"];
 556                         if ($dfrn_id) {
 557                                 $key = $contact_row["pubkey"];
 558                                 $encrypt_func = openssl_public_encrypt;
 559                                 $decrypt_func = openssl_public_decrypt;
 560                                 $role = "prv";
 561                         } else {
 562                                 $dfrn_id = $contact_row["issued-id"];
 563                                 $key = $contact_row["prvkey"];
 564                                 $encrypt_func = openssl_private_encrypt;
 565                                 $decrypt_func = openssl_private_decrypt;
 566                                 $role = "pub";
 567                         }
 568
 569                         // check if jabber address already present
 570                         $present = get_pconfig($uid, "jappixmini", "id:".$dfrn_id);
 571                         $now = intval(time());
 572                         if ($present) {
 573                                 // $present has format "timestamp:jabber_address"
 574                                 $p = strpos($present, ":");
 575                                 $timestamp = intval(substr($present, 0, $p));
 576
 577                                 // do not re-retrieve jabber address if last retrieval
 578                                 // is not older than a week
 579                                 if ($now-$timestamp<3600*24*7) continue;
 580                         }
 581
 582                         // construct base retrieval address
 583                         $pos = strpos($request, "/dfrn_request/");
 584                         if ($pos===false) continue;
 585
 586                         $base = substr($request, 0, $pos)."/jappixmini?role=$role";
 587
 588                         // construct own address
 589                         $username = get_pconfig($uid, 'jappixmini', 'username');
 590                         if (!$username) continue;
 591                         $server = get_pconfig($uid, 'jappixmini', 'server');
 592                         if (!$server) continue;
 593
 594                         $address = $username."@".$server;
 595
 596                         // sign address
 597                         $signed_address = "";
 598                         $encrypt_func($address, $signed_address, $key);
 599
 600                         // construct request url
 601                         $signed_address_hex = bin2hex($signed_address);
 602                         $url = $base."&signed_address=$signed_address_hex&dfrn_id=".urlencode($dfrn_id);
 603
 604                         try {
 605                                 // send request
 606                                 $answer_json = fetch_url($url);
 607
 608                                 // parse answer
 609                                 $answer = json_decode($answer_json);
 610                                 if ($answer->status != "ok") throw new Exception();
 611
 612                                 $encrypted_address_hex = $answer->encrypted_address;
 613                                 if (!$encrypted_address_hex) throw new Exception();
 614
 615                                 $encrypted_address = hex2bin($encrypted_address_hex);
 616                                 if (!$encrypted_address) throw new Exception();
 617
 618                                 // decrypt address
 619                                 $decrypted_address = "";
 620                                 $decrypt_func($encrypted_address, $decrypted_address, $key);
 621                                 if (!$decrypted_address) throw new Exception();
 622                         } catch (Exception $e) {
 623                                 $decrypted_address = "";
 624                         }
 625
 626                         // save address
 627                         set_pconfig($uid, "jappixmini", "id:$dfrn_id", "$now:$decrypted_address");
 628                 }
 629         }
 630 }
 631
 632 function jappixmini_download_source(&$a,&$b) {
 633         // Jappix Mini source download link on About page
 634
 635         $b .= '<h1>Jappix Mini</h1>';
 636         $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>';
 637         $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>';
 638 }