]> git.mxchange.org Git - friendica.git/blob - mod/modexp.php
Class file relocations
[friendica.git] / mod / modexp.php
1 <?php
2
3 use Friendica\App;
4 use Friendica\Database\DBM;
5
6 require_once('library/asn1.php');
7
8 function modexp_init(App $a) {
9
10         if($a->argc != 2)
11                 killme();
12
13         $nick = $a->argv[1];
14         $r = q("SELECT `spubkey` FROM `user` WHERE `nickname` = '%s' LIMIT 1",
15                         dbesc($nick)
16         );
17
18         if (! DBM::is_result($r)) {
19                 killme();
20         }
21
22         $lines = explode("\n",$r[0]['spubkey']);
23         unset($lines[0]);
24         unset($lines[count($lines)]);
25         $x = base64_decode(implode('',$lines));
26
27         $r = ASN_BASE::parseASNString($x);
28
29         $m = $r[0]->asnData[1]->asnData[0]->asnData[0]->asnData;
30         $e = $r[0]->asnData[1]->asnData[0]->asnData[1]->asnData;
31
32         header("Content-type: application/magic-public-key");
33         echo 'RSA' . '.' . $m . '.' . $e ;
34
35         killme();
36
37 }
38