]> git.mxchange.org Git - friendica.git/blob - mod/p.php
Merge pull request #2650 from annando/1606-diaspora-fetch
[friendica.git] / mod / p.php
1 <?php
2 /*
3 This file is part of the Diaspora protocol. It is used for fetching single public posts.
4 */
5 require_once("include/diaspora.php");
6
7 function p_init($a){
8         if ($a->argc != 2) {
9                 header($_SERVER["SERVER_PROTOCOL"].' 510 '.t('Not Extended'));
10                 killme();
11         }
12
13         $guid = $a->argv[1];
14
15         if (strtolower(substr($guid, -4)) != ".xml") {
16                 header($_SERVER["SERVER_PROTOCOL"].' 404 '.t('Not Found'));
17                 killme();
18         }
19
20         $guid = strtolower(substr($guid, 0, -4));
21
22         // Fetch the item
23         $item = q("SELECT `uid`, `title`, `body`, `guid`, `contact-id`, `private`, `created`, `app`, `location`, `coord`
24                         FROM `item` WHERE `wall` AND NOT `private` AND `guid` = '%s' AND `network` IN ('%s', '%s') AND `id` = `parent` LIMIT 1",
25                 dbesc($guid), NETWORK_DFRN, NETWORK_DIASPORA);
26         if (!$item) {
27                 $r = q("SELECT `author-link`
28                         FROM `item` WHERE `uid` = 0 AND `guid` = '%s' AND `network` IN ('%s', '%s') AND `id` = `parent` LIMIT 1",
29                         dbesc($guid), NETWORK_DFRN, NETWORK_DIASPORA);
30                 if ($r) {
31                         $parts = parse_url($r[0]["author-link"]);
32                         $host = $parts["scheme"]."://".$parts["host"];
33
34                         $location = $host."/p/".urlencode($guid).".xml";
35
36                         header("HTTP/1.1 301 Moved Permanently");
37                         header("Location:".$location);
38                         killme();
39                 }
40
41                 header($_SERVER["SERVER_PROTOCOL"].' 404 '.t('Not Found'));
42                 killme();
43         }
44
45         // Fetch some data from the author (We could combine both queries - but I think this is more readable)
46         $r = q("SELECT `user`.`prvkey`, `contact`.`addr`, `user`.`nickname`, `contact`.`nick` FROM `user`
47                 INNER JOIN `contact` ON `contact`.`uid` = `user`.`uid`
48                 WHERE `user`.`uid` = %d", intval($item[0]["uid"]));
49         if (!$r) {
50                 header($_SERVER["SERVER_PROTOCOL"].' 404 '.t('Not Found'));
51                 killme();
52         }
53         $user = $r[0];
54
55         $status = diaspora::build_status($item[0], $user);
56         $xml = diaspora::build_post_xml($status["type"], $status["message"]);
57
58         header("Content-Type: application/xml; charset=utf-8");
59         echo $xml;
60
61         killme();
62 }