include/api.php

   1 <?php
   2 /* To-Do:
   3  - Automatically detect if incoming data is HTML or BBCode
   4 */
   5         require_once("include/bbcode.php");
   6         require_once("include/datetime.php");
   7         require_once("include/conversation.php");
   8         require_once("include/oauth.php");
   9         require_once("include/html2plain.php");
  10         /*
  11          * Twitter-Like API
  12          *
  13          */
  14
  15         $API = Array();
  16         $called_api = Null;
  17
  18         function api_user() {
  19                 // It is not sufficient to use local_user() to check whether someone is allowed to use the API,
  20                 // because this will open CSRF holes (just embed an image with src=friendicasite.com/api/statuses/update?status=CSRF
  21                 // into a page, and visitors will post something without noticing it).
  22                 // Instead, use this function.
  23                 if ($_SESSION["allow_api"])
  24                         return local_user();
  25
  26                 return false;
  27         }
  28
  29         function api_date($str){
  30                 //Wed May 23 06:01:13 +0000 2007
  31                 return datetime_convert('UTC', 'UTC', $str, "D M d H:i:s +0000 Y" );
  32         }
  33
  34
  35         function api_register_func($path, $func, $auth=false){
  36                 global $API;
  37                 $API[$path] = array('func'=>$func, 'auth'=>$auth);
  38
  39                 // Workaround for hotot
  40                 $path = str_replace("api/", "api/1.1/", $path);
  41                 $API[$path] = array('func'=>$func, 'auth'=>$auth);
  42         }
  43
  44         /**
  45          * Simple HTTP Login
  46          */
  47
  48         function api_login(&$a){
  49                 // login with oauth
  50                 try{
  51                         $oauth = new FKOAuth1();
  52                         list($consumer,$token) = $oauth->verify_request(OAuthRequest::from_request());
  53                         if (!is_null($token)){
  54                                 $oauth->loginUser($token->uid);
  55                                 call_hooks('logged_in', $a->user);
  56                                 return;
  57                         }
  58                         echo __file__.__line__.__function__."<pre>"; var_dump($consumer, $token); die();
  59                 }catch(Exception $e){
  60                         logger(__file__.__line__.__function__."\n".$e);
  61                         //die(__file__.__line__.__function__."<pre>".$e); die();
  62                 }
  63
  64
  65
  66                 // workaround for HTTP-auth in CGI mode
  67                 if(x($_SERVER,'REDIRECT_REMOTE_USER')) {
  68                         $userpass = base64_decode(substr($_SERVER["REDIRECT_REMOTE_USER"],6)) ;
  69                         if(strlen($userpass)) {
  70                                 list($name, $password) = explode(':', $userpass);
  71                                 $_SERVER['PHP_AUTH_USER'] = $name;
  72                                 $_SERVER['PHP_AUTH_PW'] = $password;
  73                         }
  74                 }
  75
  76                 if (!isset($_SERVER['PHP_AUTH_USER'])) {
  77                         logger('API_login: ' . print_r($_SERVER,true), LOGGER_DEBUG);
  78                         header('WWW-Authenticate: Basic realm="Friendica"');
  79                         header('HTTP/1.0 401 Unauthorized');
  80                         die((api_error($a, 'json', "This api requires login")));
  81
  82                         //die('This api requires login');
  83                 }
  84
  85                 $user = $_SERVER['PHP_AUTH_USER'];
  86                 $encrypted = hash('whirlpool',trim($_SERVER['PHP_AUTH_PW']));
  87
  88
  89                 /**
  90                  *  next code from mod/auth.php. needs better solution
  91                  */
  92
  93                 // process normal login request
  94
  95                 $r = q("SELECT * FROM `user` WHERE ( `email` = '%s' OR `nickname` = '%s' )
  96                         AND `password` = '%s' AND `blocked` = 0 AND `account_expired` = 0 AND `account_removed` = 0 AND `verified` = 1 LIMIT 1",
  97                         dbesc(trim($user)),
  98                         dbesc(trim($user)),
  99                         dbesc($encrypted)
 100                 );
 101                 if(count($r)){
 102                         $record = $r[0];
 103                 } else {
 104                         logger('API_login failure: ' . print_r($_SERVER,true), LOGGER_DEBUG);
 105                         header('WWW-Authenticate: Basic realm="Friendica"');
 106                         header('HTTP/1.0 401 Unauthorized');
 107                         die('This api requires login');
 108                 }
 109
 110                 require_once('include/security.php');
 111                 authenticate_success($record); $_SESSION["allow_api"] = true;
 112
 113                 call_hooks('logged_in', $a->user);
 114
 115         }
 116
 117         /**************************
 118          *  MAIN API ENTRY POINT  *
 119          **************************/
 120         function api_call(&$a){
 121                 GLOBAL $API, $called_api;
 122
 123                 // preset
 124                 $type="json";
 125
 126                 foreach ($API as $p=>$info){
 127                         if (strpos($a->query_string, $p)===0){
 128                                 $called_api= explode("/",$p);
 129                                 //unset($_SERVER['PHP_AUTH_USER']);
 130                                 if ($info['auth']===true && api_user()===false) {
 131                                                 api_login($a);
 132                                 }
 133
 134                                 load_contact_links(api_user());
 135
 136                                 logger('API call for ' . $a->user['username'] . ': ' . $a->query_string);
 137                                 logger('API parameters: ' . print_r($_REQUEST,true));
 138                                 $type="json";
 139                                 if (strpos($a->query_string, ".xml")>0) $type="xml";
 140                                 if (strpos($a->query_string, ".json")>0) $type="json";
 141                                 if (strpos($a->query_string, ".rss")>0) $type="rss";
 142                                 if (strpos($a->query_string, ".atom")>0) $type="atom";
 143                                 if (strpos($a->query_string, ".as")>0) $type="as";
 144
 145                                 $r = call_user_func($info['func'], $a, $type);
 146                                 if ($r===false) return;
 147
 148                                 switch($type){
 149                                         case "xml":
 150                                                 $r = mb_convert_encoding($r, "UTF-8",mb_detect_encoding($r));
 151                                                 header ("Content-Type: text/xml");
 152                                                 return '<?xml version="1.0" encoding="UTF-8"?>'."\n".$r;
 153                                                 break;
 154                                         case "json":
 155                                                 header ("Content-Type: application/json");
 156                                                 foreach($r as $rr)
 157                                                         return json_encode($rr);
 158                                                 break;
 159                                         case "rss":
 160                                                 header ("Content-Type: application/rss+xml");
 161                                                 return '<?xml version="1.0" encoding="UTF-8"?>'."\n".$r;
 162                                                 break;
 163                                         case "atom":
 164                                                 header ("Content-Type: application/atom+xml");
 165                                                 return '<?xml version="1.0" encoding="UTF-8"?>'."\n".$r;
 166                                                 break;
 167                                         case "as":
 168                                                 //header ("Content-Type: application/json");
 169                                                 //foreach($r as $rr)
 170                                                 //      return json_encode($rr);
 171                                                 return json_encode($r);
 172                                                 break;
 173
 174                                 }
 175                                 //echo "<pre>"; var_dump($r); die();
 176                         }
 177                 }
 178                 header("HTTP/1.1 404 Not Found");
 179                 logger('API call not implemented: '.$a->query_string." - ".print_r($_REQUEST,true));
 180                 return(api_error($a, $type, "not implemented"));
 181
 182         }
 183
 184         function api_error(&$a, $type, $error) {
 185                 $r = "<status><error>".$error."</error><request>".$a->query_string."</request></status>";
 186                 switch($type){
 187                         case "xml":
 188                                 header ("Content-Type: text/xml");
 189                                 return '<?xml version="1.0" encoding="UTF-8"?>'."\n".$r;
 190                                 break;
 191                         case "json":
 192                                 header ("Content-Type: application/json");
 193                                 return json_encode(array('error' => $error, 'request' => $a->query_string));
 194                                 break;
 195                         case "rss":
 196                                 header ("Content-Type: application/rss+xml");
 197                                 return '<?xml version="1.0" encoding="UTF-8"?>'."\n".$r;
 198                                 break;
 199                         case "atom":
 200                                 header ("Content-Type: application/atom+xml");
 201                                 return '<?xml version="1.0" encoding="UTF-8"?>'."\n".$r;
 202                                 break;
 203                 }
 204         }
 205
 206         /**
 207          * RSS extra info
 208          */
 209         function api_rss_extra(&$a, $arr, $user_info){
 210                 if (is_null($user_info)) $user_info = api_get_user($a);
 211                 $arr['$user'] = $user_info;
 212                 $arr['$rss'] = array(
 213                         'alternate' => $user_info['url'],
 214                         'self' => $a->get_baseurl(). "/". $a->query_string,
 215                         'base' => $a->get_baseurl(),
 216                         'updated' => api_date(null),
 217                         'atom_updated' => datetime_convert('UTC','UTC','now',ATOM_TIME),
 218                         'language' => $user_info['language'],
 219                         'logo'  => $a->get_baseurl()."/images/friendica-32.png",
 220                 );
 221
 222                 return $arr;
 223         }
 224
 225
 226         /**
 227          * Unique contact to contact url.
 228          */
 229         function api_unique_id_to_url($id){
 230                 $r = q("SELECT url FROM unique_contacts WHERE id=%d LIMIT 1",
 231                         intval($id));
 232                 if ($r)
 233                         return ($r[0]["url"]);
 234                 else
 235                         return false;
 236         }
 237
 238         /**
 239          * Returns user info array.
 240          */
 241         function api_get_user(&$a, $contact_id = Null, $type = "json"){
 242                 global $called_api;
 243                 $user = null;
 244                 $extra_query = "";
 245                 $url = "";
 246                 $nick = "";
 247
 248                 logger("api_get_user: Fetching user data for user ".$contact_id, LOGGER_DEBUG);
 249
 250                 // Searching for contact URL
 251                 if(!is_null($contact_id) AND (intval($contact_id) == 0)){
 252                         $user = dbesc(normalise_link($contact_id));
 253                         $url = $user;
 254                         $extra_query = "AND `contact`.`nurl` = '%s' ";
 255                         if (api_user()!==false)  $extra_query .= "AND `contact`.`uid`=".intval(api_user());
 256                 }
 257
 258                 // Searching for unique contact id
 259                 if(!is_null($contact_id) AND (intval($contact_id) != 0)){
 260                         $user = dbesc(api_unique_id_to_url($contact_id));
 261
 262                         if ($user == "")
 263                                 die(api_error($a, $type, t("User not found.")));
 264
 265                         $url = $user;
 266                         $extra_query = "AND `contact`.`nurl` = '%s' ";
 267                         if (api_user()!==false)  $extra_query .= "AND `contact`.`uid`=".intval(api_user());
 268                 }
 269
 270                 if(is_null($user) && x($_GET, 'user_id')) {
 271                         $user = dbesc(api_unique_id_to_url($_GET['user_id']));
 272
 273                         if ($user == "")
 274                                 die(api_error($a, $type, t("User not found.")));
 275
 276                         $url = $user;
 277                         $extra_query = "AND `contact`.`nurl` = '%s' ";
 278                         if (api_user()!==false)  $extra_query .= "AND `contact`.`uid`=".intval(api_user());
 279                 }
 280                 if(is_null($user) && x($_GET, 'screen_name')) {
 281                         $user = dbesc($_GET['screen_name']);
 282                         $nick = $user;
 283                         $extra_query = "AND `contact`.`nick` = '%s' ";
 284                         if (api_user()!==false)  $extra_query .= "AND `contact`.`uid`=".intval(api_user());
 285                 }
 286
 287                 if (is_null($user) AND ($a->argc > (count($called_api)-1)) AND (count($called_api) > 0)){
 288                         $argid = count($called_api);
 289                         list($user, $null) = explode(".",$a->argv[$argid]);
 290                         if(is_numeric($user)){
 291                                 $user = dbesc(api_unique_id_to_url($user));
 292
 293                                 if ($user == "")
 294                                         return false;
 295
 296                                 $url = $user;
 297                                 $extra_query = "AND `contact`.`nurl` = '%s' ";
 298                                 if (api_user()!==false)  $extra_query .= "AND `contact`.`uid`=".intval(api_user());
 299                         } else {
 300                                 $user = dbesc($user);
 301                                 $nick = $user;
 302                                 $extra_query = "AND `contact`.`nick` = '%s' ";
 303                                 if (api_user()!==false)  $extra_query .= "AND `contact`.`uid`=".intval(api_user());
 304                         }
 305                 }
 306
 307                 logger("api_get_user: user ".$user, LOGGER_DEBUG);
 308
 309                 if (!$user) {
 310                         if (api_user()===false) {
 311                                 api_login($a); return False;
 312                         } else {
 313                                 $user = $_SESSION['uid'];
 314                                 $extra_query = "AND `contact`.`uid` = %d AND `contact`.`self` = 1 ";
 315                         }
 316
 317                 }
 318
 319                 logger('api_user: ' . $extra_query . ', user: ' . $user);
 320                 // user info
 321                 $uinfo = q("SELECT *, `contact`.`id` as `cid` FROM `contact`
 322                                 WHERE 1
 323                                 $extra_query",
 324                                 $user
 325                 );
 326
 327                 // Selecting the id by priority, friendica first
 328                 api_best_nickname($uinfo);
 329
 330                 // if the contact wasn't found, fetch it from the unique contacts
 331                 if (count($uinfo)==0) {
 332                         $r = array();
 333
 334                         if ($url != "")
 335                                 $r = q("SELECT * FROM unique_contacts WHERE url='%s' LIMIT 1", $url);
 336                         elseif ($nick != "")
 337                                 $r = q("SELECT * FROM unique_contacts WHERE nick='%s' LIMIT 1", $nick);
 338
 339                         if ($r) {
 340                                 // If no nick where given, extract it from the address
 341                                 if (($r[0]['nick'] == "") OR ($r[0]['name'] == $r[0]['nick']))
 342                                         $r[0]['nick'] = api_get_nick($r[0]["url"]);
 343
 344                                 $ret = array(
 345                                         'id' => $r[0]["id"],
 346                                         'id_str' => (string) $r[0]["id"],
 347                                         'name' => $r[0]["name"],
 348                                         'screen_name' => (($r[0]['nick']) ? $r[0]['nick'] : $r[0]['name']),
 349                                         'location' => NULL,
 350                                         'description' => NULL,
 351                                         'profile_image_url' => $r[0]["avatar"],
 352                                         'profile_image_url_https' => $r[0]["avatar"],
 353                                         'url' => $r[0]["url"],
 354                                         'protected' => false,
 355                                         'followers_count' => 0,
 356                                         'friends_count' => 0,
 357                                         'created_at' => api_date(0),
 358                                         'favourites_count' => 0,
 359                                         'utc_offset' => 0,
 360                                         'time_zone' => 'UTC',
 361                                         'statuses_count' => 0,
 362                                         'following' => false,
 363                                         'verified' => false,
 364                                         'statusnet_blocking' => false,
 365                                         'notifications' => false,
 366                                         'statusnet_profile_url' => $r[0]["url"],
 367                                         'uid' => 0,
 368                                         'cid' => 0,
 369                                         'self' => 0,
 370                                         'network' => '',
 371                                 );
 372
 373                                 return $ret;
 374                         } else
 375                                 die(api_error($a, $type, t("User not found.")));
 376
 377                 }
 378
 379                 if($uinfo[0]['self']) {
 380                         $usr = q("select * from user where uid = %d limit 1",
 381                                 intval(api_user())
 382                         );
 383                         $profile = q("select * from profile where uid = %d and `is-default` = 1 limit 1",
 384                                 intval(api_user())
 385                         );
 386
 387                         //AND `allow_cid`='' AND `allow_gid`='' AND `deny_cid`='' AND `deny_gid`=''",
 388                         // count public wall messages
 389                         $r = q("SELECT count(*) as `count` FROM `item`
 390                                         WHERE  `uid` = %d
 391                                         AND `type`='wall'",
 392                                         intval($uinfo[0]['uid'])
 393                         );
 394                         $countitms = $r[0]['count'];
 395                 }
 396                 else {
 397                         //AND `allow_cid`='' AND `allow_gid`='' AND `deny_cid`='' AND `deny_gid`=''",
 398                         $r = q("SELECT count(*) as `count` FROM `item`
 399                                         WHERE  `contact-id` = %d",
 400                                         intval($uinfo[0]['id'])
 401                         );
 402                         $countitms = $r[0]['count'];
 403                 }
 404
 405                 // count friends
 406                 $r = q("SELECT count(*) as `count` FROM `contact`
 407                                 WHERE  `uid` = %d AND `rel` IN ( %d, %d )
 408                                 AND `self`=0 AND `blocked`=0 AND `pending`=0 AND `hidden`=0",
 409                                 intval($uinfo[0]['uid']),
 410                                 intval(CONTACT_IS_SHARING),
 411                                 intval(CONTACT_IS_FRIEND)
 412                 );
 413                 $countfriends = $r[0]['count'];
 414
 415                 $r = q("SELECT count(*) as `count` FROM `contact`
 416                                 WHERE  `uid` = %d AND `rel` IN ( %d, %d )
 417                                 AND `self`=0 AND `blocked`=0 AND `pending`=0 AND `hidden`=0",
 418                                 intval($uinfo[0]['uid']),
 419                                 intval(CONTACT_IS_FOLLOWER),
 420                                 intval(CONTACT_IS_FRIEND)
 421                 );
 422                 $countfollowers = $r[0]['count'];
 423
 424                 $r = q("SELECT count(*) as `count` FROM item where starred = 1 and uid = %d and deleted = 0",
 425                         intval($uinfo[0]['uid'])
 426                 );
 427                 $starred = $r[0]['count'];
 428
 429
 430                 if(! $uinfo[0]['self']) {
 431                         $countfriends = 0;
 432                         $countfollowers = 0;
 433                         $starred = 0;
 434                 }
 435
 436                 // Add a nick if it isn't present there
 437                 if (($uinfo[0]['nick'] == "") OR ($uinfo[0]['name'] == $uinfo[0]['nick'])) {
 438                         $uinfo[0]['nick'] = api_get_nick($uinfo[0]["url"]);
 439                 }
 440
 441                 // Fetching unique id
 442                 $r = q("SELECT id FROM unique_contacts WHERE url='%s' LIMIT 1", dbesc(normalise_link($uinfo[0]['url'])));
 443
 444                 // If not there, then add it
 445                 if (count($r) == 0) {
 446                         q("INSERT INTO unique_contacts (url, name, nick, avatar) VALUES ('%s', '%s', '%s', '%s')",
 447                                 dbesc(normalise_link($uinfo[0]['url'])), dbesc($uinfo[0]['name']),dbesc($uinfo[0]['nick']), dbesc($uinfo[0]['micro']));
 448
 449                         $r = q("SELECT id FROM unique_contacts WHERE url='%s' LIMIT 1", dbesc(normalise_link($uinfo[0]['url'])));
 450                 }
 451
 452                 require_once('include/contact_selectors.php');
 453                 $network_name = network_to_name($uinfo[0]['network']);
 454
 455                 $ret = Array(
 456                         'id' => intval($r[0]['id']),
 457                         'id_str' => (string) intval($r[0]['id']),
 458                         'name' => (($uinfo[0]['name']) ? $uinfo[0]['name'] : $uinfo[0]['nick']),
 459                         'screen_name' => (($uinfo[0]['nick']) ? $uinfo[0]['nick'] : $uinfo[0]['name']),
 460                         'location' => ($usr) ? $usr[0]['default-location'] : $network_name,
 461                         'description' => (($profile) ? $profile[0]['pdesc'] : NULL),
 462                         'profile_image_url' => $uinfo[0]['micro'],
 463                         'profile_image_url_https' => $uinfo[0]['micro'],
 464                         'url' => $uinfo[0]['url'],
 465                         'protected' => false,
 466                         'followers_count' => intval($countfollowers),
 467                         'friends_count' => intval($countfriends),
 468                         'created_at' => api_date($uinfo[0]['created']),
 469                         'favourites_count' => intval($starred),
 470                         'utc_offset' => "0",
 471                         'time_zone' => 'UTC',
 472                         'statuses_count' => intval($countitms),
 473                         'following' => (($uinfo[0]['rel'] == CONTACT_IS_FOLLOWER) OR ($uinfo[0]['rel'] == CONTACT_IS_FRIEND)),
 474                         'verified' => true,
 475                         'statusnet_blocking' => false,
 476                         'notifications' => false,
 477                         'statusnet_profile_url' => $a->get_baseurl()."/contacts/".$uinfo[0]['cid'],
 478                         'uid' => intval($uinfo[0]['uid']),
 479                         'cid' => intval($uinfo[0]['cid']),
 480                         'self' => $uinfo[0]['self'],
 481                         'network' => $uinfo[0]['network'],
 482                 );
 483
 484                 return $ret;
 485
 486         }
 487
 488         function api_item_get_user(&$a, $item) {
 489
 490                 $author = q("SELECT * FROM unique_contacts WHERE url='%s' LIMIT 1",
 491                         dbesc(normalise_link($item['author-link'])));
 492
 493                 if (count($author) == 0) {
 494                         q("INSERT INTO unique_contacts (url, name, avatar) VALUES ('%s', '%s', '%s')",
 495                         dbesc(normalise_link($item["author-link"])), dbesc($item["author-name"]), dbesc($item["author-avatar"]));
 496
 497                         $author = q("SELECT id FROM unique_contacts WHERE url='%s' LIMIT 1",
 498                                 dbesc(normalise_link($item['author-link'])));
 499                 } else if ($item["author-link"].$item["author-name"] != $author[0]["url"].$author[0]["name"]) {
 500                         q("UPDATE unique_contacts SET name = '%s', avatar = '%s' WHERE url = '%s'",
 501                         dbesc($item["author-name"]), dbesc($item["author-avatar"]), dbesc(normalise_link($item["author-link"])));
 502                 }
 503
 504                 $owner = q("SELECT id FROM unique_contacts WHERE url='%s' LIMIT 1",
 505                         dbesc(normalise_link($item['owner-link'])));
 506
 507                 if (count($owner) == 0) {
 508                         q("INSERT INTO unique_contacts (url, name, avatar) VALUES ('%s', '%s', '%s')",
 509                         dbesc(normalise_link($item["owner-link"])), dbesc($item["owner-name"]), dbesc($item["owner-avatar"]));
 510
 511                         $owner = q("SELECT id FROM unique_contacts WHERE url='%s' LIMIT 1",
 512                                 dbesc(normalise_link($item['owner-link'])));
 513                 } else if ($item["owner-link"].$item["owner-name"] != $owner[0]["url"].$owner[0]["name"]) {
 514                         q("UPDATE unique_contacts SET name = '%s', avatar = '%s' WHERE url = '%s'",
 515                         dbesc($item["owner-name"]), dbesc($item["owner-avatar"]), dbesc(normalise_link($item["owner-link"])));
 516                 }
 517
 518                 // Comments in threads may appear as wall-to-wall postings.
 519                 // So only take the owner at the top posting.
 520                 if ($item["id"] == $item["parent"])
 521                         $status_user = api_get_user($a,$item["owner-link"]);
 522                 else
 523                         $status_user = api_get_user($a,$item["author-link"]);
 524
 525                 $status_user["protected"] = (($item["allow_cid"] != "") OR
 526                                                 ($item["allow_gid"] != "") OR
 527                                                 ($item["deny_cid"] != "") OR
 528                                                 ($item["deny_gid"] != "") OR
 529                                                 $item["private"]);
 530
 531                 return ($status_user);
 532         }
 533
 534
 535         /**
 536          *  load api $templatename for $type and replace $data array
 537          */
 538         function api_apply_template($templatename, $type, $data){
 539
 540                 $a = get_app();
 541
 542                 switch($type){
 543                         case "atom":
 544                         case "rss":
 545                         case "xml":
 546                                 $data = array_xmlify($data);
 547                                 $tpl = get_markup_template("api_".$templatename."_".$type.".tpl");
 548                                 if(! $tpl) {
 549                                         header ("Content-Type: text/xml");
 550                                         echo '<?xml version="1.0" encoding="UTF-8"?>'."\n".'<status><error>not implemented</error></status>';
 551                                         killme();
 552                                 }
 553                                 $ret = replace_macros($tpl, $data);
 554                                 break;
 555                         case "json":
 556                                 $ret = $data;
 557                                 break;
 558                 }
 559
 560                 return $ret;
 561         }
 562
 563         /**
 564          ** TWITTER API
 565          */
 566
 567         /**
 568          * Returns an HTTP 200 OK response code and a representation of the requesting user if authentication was successful;
 569          * returns a 401 status code and an error message if not.
 570          * http://developer.twitter.com/doc/get/account/verify_credentials
 571          */
 572         function api_account_verify_credentials(&$a, $type){
 573                 if (api_user()===false) return false;
 574
 575                 unset($_REQUEST["user_id"]);
 576                 unset($_GET["user_id"]);
 577
 578                 unset($_REQUEST["screen_name"]);
 579                 unset($_GET["screen_name"]);
 580
 581                 $skip_status = (x($_REQUEST,'skip_status')?$_REQUEST['skip_status']:false);
 582
 583                 $user_info = api_get_user($a);
 584
 585                 // "verified" isn't used here in the standard
 586                 unset($user_info["verified"]);
 587
 588                 // - Adding last status
 589                 if (!$skip_status) {
 590                         $user_info["status"] = api_status_show($a,"raw");
 591                         if (!count($user_info["status"]))
 592                                 unset($user_info["status"]);
 593                         else
 594                                 unset($user_info["status"]["user"]);
 595                 }
 596
 597                 // "uid" and "self" are only needed for some internal stuff, so remove it from here
 598                 unset($user_info["uid"]);
 599                 unset($user_info["self"]);
 600
 601                 return api_apply_template("user", $type, array('$user' => $user_info));
 602
 603         }
 604         api_register_func('api/account/verify_credentials','api_account_verify_credentials', true);
 605
 606
 607         /**
 608          * get data from $_POST or $_GET
 609          */
 610         function requestdata($k){
 611                 if (isset($_POST[$k])){
 612                         return $_POST[$k];
 613                 }
 614                 if (isset($_GET[$k])){
 615                         return $_GET[$k];
 616                 }
 617                 return null;
 618         }
 619
 620 /*Waitman Gobble Mod*/
 621         function api_statuses_mediap(&$a, $type) {
 622                 if (api_user()===false) {
 623                         logger('api_statuses_update: no user');
 624                         return false;
 625                 }
 626                 $user_info = api_get_user($a);
 627
 628                 $_REQUEST['type'] = 'wall';
 629                 $_REQUEST['profile_uid'] = api_user();
 630                 $_REQUEST['api_source'] = true;
 631                 $txt = requestdata('status');
 632                 //$txt = urldecode(requestdata('status'));
 633
 634                 require_once('library/HTMLPurifier.auto.php');
 635                 require_once('include/html2bbcode.php');
 636
 637                 if((strpos($txt,'<') !== false) || (strpos($txt,'>') !== false)) {
 638                         $txt = html2bb_video($txt);
 639                         $config = HTMLPurifier_Config::createDefault();
 640                         $config->set('Cache.DefinitionImpl', null);
 641                         $purifier = new HTMLPurifier($config);
 642                         $txt = $purifier->purify($txt);
 643                 }
 644                 $txt = html2bbcode($txt);
 645
 646                 $a->argv[1]=$user_info['screen_name']; //should be set to username?
 647
 648                 $_REQUEST['hush']='yeah'; //tell wall_upload function to return img info instead of echo
 649                 require_once('mod/wall_upload.php');
 650                 $bebop = wall_upload_post($a);
 651
 652                 //now that we have the img url in bbcode we can add it to the status and insert the wall item.
 653                 $_REQUEST['body']=$txt."\n\n".$bebop;
 654                 require_once('mod/item.php');
 655                 item_post($a);
 656
 657                 // this should output the last post (the one we just posted).
 658                 return api_status_show($a,$type);
 659         }
 660         api_register_func('api/statuses/mediap','api_statuses_mediap', true);
 661 /*Waitman Gobble Mod*/
 662
 663
 664         function api_statuses_update(&$a, $type) {
 665                 if (api_user()===false) {
 666                         logger('api_statuses_update: no user');
 667                         return false;
 668                 }
 669                 $user_info = api_get_user($a);
 670
 671                 // convert $_POST array items to the form we use for web posts.
 672
 673                 // logger('api_post: ' . print_r($_POST,true));
 674
 675                 if(requestdata('htmlstatus')) {
 676                         require_once('library/HTMLPurifier.auto.php');
 677                         require_once('include/html2bbcode.php');
 678
 679                         $txt = requestdata('htmlstatus');
 680                         if((strpos($txt,'<') !== false) || (strpos($txt,'>') !== false)) {
 681
 682                                 $txt = html2bb_video($txt);
 683
 684                                 $config = HTMLPurifier_Config::createDefault();
 685                                 $config->set('Cache.DefinitionImpl', null);
 686
 687
 688                                 $purifier = new HTMLPurifier($config);
 689                                 $txt = $purifier->purify($txt);
 690
 691                                 $_REQUEST['body'] = html2bbcode($txt);
 692                         }
 693
 694                 }
 695                 else
 696                         $_REQUEST['body'] = requestdata('status');
 697
 698                 $_REQUEST['title'] = requestdata('title');
 699
 700                 $parent = requestdata('in_reply_to_status_id');
 701                 if(ctype_digit($parent))
 702                         $_REQUEST['parent'] = $parent;
 703                 else
 704                         $_REQUEST['parent_uri'] = $parent;
 705
 706                 if(requestdata('lat') && requestdata('long'))
 707                         $_REQUEST['coord'] = sprintf("%s %s",requestdata('lat'),requestdata('long'));
 708                 $_REQUEST['profile_uid'] = api_user();
 709
 710                 if($parent)
 711                         $_REQUEST['type'] = 'net-comment';
 712                 else {
 713 //                      logger("api_statuses_update: upload ".print_r($_FILES, true)." ".print_r($_POST, true)." ".print_r($_GET, true), LOGGER_DEBUG);
 714 //die("blubb");
 715                         $_REQUEST['type'] = 'wall';
 716                         if(x($_FILES,'media')) {
 717                                 // upload the image if we have one
 718                                 $_REQUEST['hush']='yeah'; //tell wall_upload function to return img info instead of echo
 719                                 require_once('mod/wall_upload.php');
 720                                 $media = wall_upload_post($a);
 721                                 if(strlen($media)>0)
 722                                         $_REQUEST['body'] .= "\n\n".$media;
 723                         }
 724                 }
 725
 726                 // set this so that the item_post() function is quiet and doesn't redirect or emit json
 727
 728                 $_REQUEST['api_source'] = true;
 729
 730                 // call out normal post function
 731
 732                 require_once('mod/item.php');
 733                 item_post($a);
 734
 735                 // this should output the last post (the one we just posted).
 736                 return api_status_show($a,$type);
 737         }
 738         api_register_func('api/statuses/update','api_statuses_update', true);
 739         api_register_func('api/statuses/update_with_media','api_statuses_update', true);
 740
 741
 742         function api_status_show(&$a, $type){
 743                 $user_info = api_get_user($a);
 744
 745                 logger('api_status_show: user_info: '.print_r($user_info, true), LOGGER_DEBUG);
 746
 747                 // get last public wall message
 748                 $lastwall = q("SELECT `item`.*, `i`.`contact-id` as `reply_uid`, `i`.`author-link` AS `item-author`
 749                                 FROM `item`, `item` as `i`
 750                                 WHERE `item`.`contact-id` = %d
 751                                         AND ((`item`.`author-link` IN ('%s', '%s')) OR (`item`.`owner-link` IN ('%s', '%s')))
 752                                         AND `i`.`id` = `item`.`parent`
 753                                         AND `item`.`type`!='activity'
 754                                         AND `item`.`allow_cid`='' AND `item`.`allow_gid`='' AND `item`.`deny_cid`='' AND `item`.`deny_gid`=''
 755                                 ORDER BY `item`.`created` DESC
 756                                 LIMIT 1",
 757                                 intval($user_info['cid']),
 758                                 dbesc($user_info['url']),
 759                                 dbesc(normalise_link($user_info['url'])),
 760                                 dbesc($user_info['url']),
 761                                 dbesc(normalise_link($user_info['url']))
 762                 );
 763
 764                 if (count($lastwall)>0){
 765                         $lastwall = $lastwall[0];
 766
 767                         $in_reply_to_status_id = NULL;
 768                         $in_reply_to_user_id = NULL;
 769                         $in_reply_to_status_id_str = NULL;
 770                         $in_reply_to_user_id_str = NULL;
 771                         $in_reply_to_screen_name = NULL;
 772                         if (intval($lastwall['parent']) != intval($lastwall['id'])) {
 773                                 $in_reply_to_status_id= intval($lastwall['parent']);
 774                                 $in_reply_to_status_id_str = (string) intval($lastwall['parent']);
 775
 776                                 $r = q("SELECT * FROM unique_contacts WHERE `url` = '%s'", dbesc(normalise_link($lastwall['item-author'])));
 777                                 if ($r) {
 778                                         if ($r[0]['nick'] == "")
 779                                                 $r[0]['nick'] = api_get_nick($r[0]["url"]);
 780
 781                                         $in_reply_to_screen_name = (($r[0]['nick']) ? $r[0]['nick'] : $r[0]['name']);
 782                                         $in_reply_to_user_id = intval($r[0]['id']);
 783                                         $in_reply_to_user_id_str = (string) intval($r[0]['id']);
 784                                 }
 785                         }
 786
 787                         // There seems to be situation, where both fields are identical:
 788                         // https://github.com/friendica/friendica/issues/1010
 789                         // This is a bugfix for that.
 790                         if (intval($in_reply_to_status_id) == intval($lastwall['id'])) {
 791                                 logger('api_status_show: this message should never appear: id: '.$lastwall['id'].' similar to reply-to: '.$in_reply_to_status_id, LOGGER_DEBUG);
 792                                 $in_reply_to_status_id = NULL;
 793                                 $in_reply_to_user_id = NULL;
 794                                 $in_reply_to_status_id_str = NULL;
 795                                 $in_reply_to_user_id_str = NULL;
 796                                 $in_reply_to_screen_name = NULL;
 797                         }
 798
 799                         $status_info = array(
 800                                 'text' => trim(html2plain(bbcode(api_clean_plain_items($lastwall['body']), false, false, 2, true), 0)),
 801                                 'truncated' => false,
 802                                 'created_at' => api_date($lastwall['created']),
 803                                 'in_reply_to_status_id' => $in_reply_to_status_id,
 804                                 'in_reply_to_status_id_str' => $in_reply_to_status_id_str,
 805                                 'source' => (($lastwall['app']) ? $lastwall['app'] : 'web'),
 806                                 'id' => intval($lastwall['id']),
 807                                 'id_str' => (string) $lastwall['id'],
 808                                 'in_reply_to_user_id' => $in_reply_to_user_id,
 809                                 'in_reply_to_user_id_str' => $in_reply_to_user_id_str,
 810                                 'in_reply_to_screen_name' => $in_reply_to_screen_name,
 811                                 'geo' => NULL,
 812                                 'favorited' => false,
 813                                 // attachments
 814                                 'user' => $user_info,
 815                                 'statusnet_html'                => trim(bbcode($lastwall['body'], false, false)),
 816                                 'statusnet_conversation_id'     => $lastwall['parent'],
 817                         );
 818
 819                         if ($lastwall['title'] != "")
 820                                 $status_info['statusnet_html'] = "<h4>".bbcode($lastwall['title'])."</h4>\n".$status_info['statusnet_html'];
 821
 822                         $entities = api_get_entitities($status_info['text'], $lastwall['body']);
 823                         if (count($entities) > 0)
 824                                 $status_info['entities'] = $entities;
 825
 826                         if (($lastwall['item_network'] != "") AND ($status["source"] == 'web'))
 827                                 $status_info["source"] = network_to_name($lastwall['item_network']);
 828                         elseif (($lastwall['item_network'] != "") AND (network_to_name($lastwall['item_network']) != $status_info["source"]))
 829                                 $status_info["source"] = trim($status_info["source"].' ('.network_to_name($lastwall['item_network']).')');
 830
 831                         // "uid" and "self" are only needed for some internal stuff, so remove it from here
 832                         unset($status_info["user"]["uid"]);
 833                         unset($status_info["user"]["self"]);
 834                 }
 835
 836                 if ($type == "raw")
 837                         return($status_info);
 838
 839                 return  api_apply_template("status", $type, array('$status' => $status_info));
 840
 841         }
 842
 843
 844
 845
 846
 847         /**
 848          * Returns extended information of a given user, specified by ID or screen name as per the required id parameter.
 849          * The author's most recent status will be returned inline.
 850          * http://developer.twitter.com/doc/get/users/show
 851          */
 852         function api_users_show(&$a, $type){
 853                 $user_info = api_get_user($a);
 854
 855                 $lastwall = q("SELECT `item`.*
 856                                 FROM `item`, `contact`
 857                                 WHERE `item`.`uid` = %d AND `verb` = '%s' AND `item`.`contact-id` = %d
 858                                         AND ((`item`.`author-link` IN ('%s', '%s')) OR (`item`.`owner-link` IN ('%s', '%s')))
 859                                         AND `contact`.`id`=`item`.`contact-id`
 860                                         AND `type`!='activity'
 861                                         AND `item`.`allow_cid`='' AND `item`.`allow_gid`='' AND `item`.`deny_cid`='' AND `item`.`deny_gid`=''
 862                                 ORDER BY `created` DESC
 863                                 LIMIT 1",
 864                                 intval(api_user()),
 865                                 dbesc(ACTIVITY_POST),
 866                                 intval($user_info['cid']),
 867                                 dbesc($user_info['url']),
 868                                 dbesc(normalise_link($user_info['url'])),
 869                                 dbesc($user_info['url']),
 870                                 dbesc(normalise_link($user_info['url']))
 871                 );
 872                 if (count($lastwall)>0){
 873                         $lastwall = $lastwall[0];
 874
 875                         $in_reply_to_status_id = NULL;
 876                         $in_reply_to_user_id = NULL;
 877                         $in_reply_to_status_id_str = NULL;
 878                         $in_reply_to_user_id_str = NULL;
 879                         $in_reply_to_screen_name = NULL;
 880                         if ($lastwall['parent']!=$lastwall['id']) {
 881                                 $reply = q("SELECT `item`.`id`, `item`.`contact-id` as `reply_uid`, `contact`.`nick` as `reply_author`, `item`.`author-link` AS `item-author`
 882                                                 FROM `item`,`contact` WHERE `contact`.`id`=`item`.`contact-id` AND `item`.`id` = %d", intval($lastwall['parent']));
 883                                 if (count($reply)>0) {
 884                                         $in_reply_to_status_id = intval($lastwall['parent']);
 885                                         $in_reply_to_status_id_str = (string) intval($lastwall['parent']);
 886
 887                                         $r = q("SELECT * FROM unique_contacts WHERE `url` = '%s'", dbesc(normalise_link($reply[0]['item-author'])));
 888                                         if ($r) {
 889                                                 if ($r[0]['nick'] == "")
 890                                                         $r[0]['nick'] = api_get_nick($r[0]["url"]);
 891
 892                                                 $in_reply_to_screen_name = (($r[0]['nick']) ? $r[0]['nick'] : $r[0]['name']);
 893                                                 $in_reply_to_user_id = intval($r[0]['id']);
 894                                                 $in_reply_to_user_id_str = (string) intval($r[0]['id']);
 895                                         }
 896                                 }
 897                         }
 898                         $user_info['status'] = array(
 899                                 'text' => trim(html2plain(bbcode(api_clean_plain_items($lastwall['body']), false, false, 2, true), 0)),
 900                                 'truncated' => false,
 901                                 'created_at' => api_date($lastwall['created']),
 902                                 'in_reply_to_status_id' => $in_reply_to_status_id,
 903                                 'in_reply_to_status_id_str' => $in_reply_to_status_id_str,
 904                                 'source' => (($lastwall['app']) ? $lastwall['app'] : 'web'),
 905                                 'id' => intval($lastwall['contact-id']),
 906                                 'id_str' => (string) $lastwall['contact-id'],
 907                                 'in_reply_to_user_id' => $in_reply_to_user_id,
 908                                 'in_reply_to_user_id_str' => $in_reply_to_user_id_str,
 909                                 'in_reply_to_screen_name' => $in_reply_to_screen_name,
 910                                 'geo' => NULL,
 911                                 'favorited' => false,
 912                                 'statusnet_html'                => trim(bbcode($lastwall['body'], false, false)),
 913                                 'statusnet_conversation_id'     => $lastwall['parent'],
 914                         );
 915
 916                         if ($lastwall['title'] != "")
 917                                 $user_info['statusnet_html'] = "<h4>".bbcode($lastwall['title'])."</h4>\n".$user_info['statusnet_html'];
 918
 919                         $entities = api_get_entitities($user_info['text'], $lastwall['body']);
 920                         if (count($entities) > 0)
 921                                 $user_info['entities'] = $entities;
 922
 923                         if (($lastwall['item_network'] != "") AND ($user_info["status"]["source"] == 'web'))
 924                                 $user_info["status"]["source"] = network_to_name($lastwall['item_network']);
 925                         if (($lastwall['item_network'] != "") AND (network_to_name($lastwall['item_network']) != $user_info["status"]["source"]))
 926                                 $user_info["status"]["source"] = trim($user_info["status"]["source"].' ('.network_to_name($lastwall['item_network']).')');
 927
 928                 }
 929
 930                 // "uid" and "self" are only needed for some internal stuff, so remove it from here
 931                 unset($user_info["uid"]);
 932                 unset($user_info["self"]);
 933
 934                 return  api_apply_template("user", $type, array('$user' => $user_info));
 935
 936         }
 937         api_register_func('api/users/show','api_users_show');
 938
 939         /**
 940          *
 941          * http://developer.twitter.com/doc/get/statuses/home_timeline
 942          *
 943          * TODO: Optional parameters
 944          * TODO: Add reply info
 945          */
 946         function api_statuses_home_timeline(&$a, $type){
 947                 if (api_user()===false) return false;
 948
 949                 unset($_REQUEST["user_id"]);
 950                 unset($_GET["user_id"]);
 951
 952                 unset($_REQUEST["screen_name"]);
 953                 unset($_GET["screen_name"]);
 954
 955                 $user_info = api_get_user($a);
 956                 // get last newtork messages
 957
 958
 959                 // params
 960                 $count = (x($_REQUEST,'count')?$_REQUEST['count']:20);
 961                 $page = (x($_REQUEST,'page')?$_REQUEST['page']-1:0);
 962                 if ($page<0) $page=0;
 963                 $since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
 964                 $max_id = (x($_REQUEST,'max_id')?$_REQUEST['max_id']:0);
 965                 //$since_id = 0;//$since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
 966                 $exclude_replies = (x($_REQUEST,'exclude_replies')?1:0);
 967                 $conversation_id = (x($_REQUEST,'conversation_id')?$_REQUEST['conversation_id']:0);
 968
 969                 $start = $page*$count;
 970
 971                 $sql_extra = '';
 972                 if ($max_id > 0)
 973                         $sql_extra .= ' AND `item`.`id` <= '.intval($max_id);
 974                 if ($exclude_replies > 0)
 975                         $sql_extra .= ' AND `item`.`parent` = `item`.`id`';
 976                 if ($conversation_id > 0)
 977                         $sql_extra .= ' AND `item`.`parent` = '.intval($conversation_id);
 978
 979                 $r = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
 980                         `contact`.`name`, `contact`.`photo`, `contact`.`url`, `contact`.`rel`,
 981                         `contact`.`network`, `contact`.`thumb`, `contact`.`dfrn-id`, `contact`.`self`,
 982                         `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`
 983                         FROM `item`, `contact`
 984                         WHERE `item`.`uid` = %d AND `verb` = '%s'
 985                         AND `item`.`visible` = 1 and `item`.`moderated` = 0 AND `item`.`deleted` = 0
 986                         AND `contact`.`id` = `item`.`contact-id`
 987                         AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
 988                         $sql_extra
 989                         AND `item`.`id`>%d
 990                         ORDER BY `item`.`id` DESC LIMIT %d ,%d ",
 991                         intval(api_user()),
 992                         dbesc(ACTIVITY_POST),
 993                         intval($since_id),
 994                         intval($start), intval($count)
 995                 );
 996
 997                 $ret = api_format_items($r,$user_info);
 998
 999                 // We aren't going to try to figure out at the item, group, and page
1000                 // level which items you've seen and which you haven't. If you're looking
1001                 // at the network timeline just mark everything seen.
1002
1003                 $r = q("UPDATE `item` SET `unseen` = 0
1004                         WHERE `unseen` = 1 AND `uid` = %d",
1005                         //intval($user_info['uid'])
1006                         intval(api_user())
1007                 );
1008
1009
1010                 $data = array('$statuses' => $ret);
1011                 switch($type){
1012                         case "atom":
1013                         case "rss":
1014                                 $data = api_rss_extra($a, $data, $user_info);
1015                                 break;
1016                         case "as":
1017                                 $as = api_format_as($a, $ret, $user_info);
1018                                 $as['title'] = $a->config['sitename']." Home Timeline";
1019                                 $as['link']['url'] = $a->get_baseurl()."/".$user_info["screen_name"]."/all";
1020                                 return($as);
1021                                 break;
1022                 }
1023
1024                 return  api_apply_template("timeline", $type, $data);
1025         }
1026         api_register_func('api/statuses/home_timeline','api_statuses_home_timeline', true);
1027         api_register_func('api/statuses/friends_timeline','api_statuses_home_timeline', true);
1028
1029         function api_statuses_public_timeline(&$a, $type){
1030                 if (api_user()===false) return false;
1031
1032                 $user_info = api_get_user($a);
1033                 // get last newtork messages
1034
1035
1036                 // params
1037                 $count = (x($_REQUEST,'count')?$_REQUEST['count']:20);
1038                 $page = (x($_REQUEST,'page')?$_REQUEST['page']-1:0);
1039                 if ($page<0) $page=0;
1040                 $since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
1041                 $max_id = (x($_REQUEST,'max_id')?$_REQUEST['max_id']:0);
1042                 //$since_id = 0;//$since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
1043                 $exclude_replies = (x($_REQUEST,'exclude_replies')?1:0);
1044                 $conversation_id = (x($_REQUEST,'conversation_id')?$_REQUEST['conversation_id']:0);
1045
1046                 $start = $page*$count;
1047
1048                 if ($max_id > 0)
1049                         $sql_extra = 'AND `item`.`id` <= '.intval($max_id);
1050                 if ($exclude_replies > 0)
1051                         $sql_extra .= ' AND `item`.`parent` = `item`.`id`';
1052                 if ($conversation_id > 0)
1053                         $sql_extra .= ' AND `item`.`parent` = '.intval($conversation_id);
1054
1055                 $r = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
1056                         `contact`.`name`, `contact`.`photo`, `contact`.`url`, `contact`.`rel`,
1057                         `contact`.`network`, `contact`.`thumb`, `contact`.`self`, `contact`.`writable`,
1058                         `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`,
1059                         `user`.`nickname`, `user`.`hidewall`
1060                         FROM `item` STRAIGHT_JOIN `contact` ON `contact`.`id` = `item`.`contact-id`
1061                         STRAIGHT_JOIN `user` ON `user`.`uid` = `item`.`uid`
1062                         WHERE `verb` = '%s' AND `item`.`visible` = 1 AND `item`.`deleted` = 0 and `item`.`moderated` = 0
1063                         AND `item`.`allow_cid` = ''  AND `item`.`allow_gid` = ''
1064                         AND `item`.`deny_cid`  = '' AND `item`.`deny_gid`  = ''
1065                         AND `item`.`private` = 0 AND `item`.`wall` = 1 AND `user`.`hidewall` = 0
1066                         AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
1067                         $sql_extra
1068                         AND `item`.`id`>%d
1069                         ORDER BY `item`.`id` DESC LIMIT %d, %d ",
1070                         dbesc(ACTIVITY_POST),
1071                         intval($since_id),
1072                         intval($start),
1073                         intval($count));
1074
1075                 $ret = api_format_items($r,$user_info);
1076
1077
1078                 $data = array('$statuses' => $ret);
1079                 switch($type){
1080                         case "atom":
1081                         case "rss":
1082                                 $data = api_rss_extra($a, $data, $user_info);
1083                                 break;
1084                         case "as":
1085                                 $as = api_format_as($a, $ret, $user_info);
1086                                 $as['title'] = $a->config['sitename']." Public Timeline";
1087                                 $as['link']['url'] = $a->get_baseurl()."/";
1088                                 return($as);
1089                                 break;
1090                 }
1091
1092                 return  api_apply_template("timeline", $type, $data);
1093         }
1094         api_register_func('api/statuses/public_timeline','api_statuses_public_timeline', true);
1095
1096         /**
1097          *
1098          */
1099         function api_statuses_show(&$a, $type){
1100                 if (api_user()===false) return false;
1101
1102                 $user_info = api_get_user($a);
1103
1104                 // params
1105                 $id = intval($a->argv[3]);
1106
1107                 if ($id == 0)
1108                         $id = intval($_REQUEST["id"]);
1109
1110                 // Hotot workaround
1111                 if ($id == 0)
1112                         $id = intval($a->argv[4]);
1113
1114                 logger('API: api_statuses_show: '.$id);
1115
1116                 $conversation = (x($_REQUEST,'conversation')?1:0);
1117
1118                 $sql_extra = '';
1119                 if ($conversation)
1120                         $sql_extra .= " AND `item`.`parent` = %d ORDER BY `received` ASC ";
1121                 else
1122                         $sql_extra .= " AND `item`.`id` = %d";
1123
1124                 $r = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
1125                         `contact`.`name`, `contact`.`photo`, `contact`.`url`, `contact`.`rel`,
1126                         `contact`.`network`, `contact`.`thumb`, `contact`.`dfrn-id`, `contact`.`self`,
1127                         `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`
1128                         FROM `item`, `contact`
1129                         WHERE `item`.`visible` = 1 and `item`.`moderated` = 0 AND `item`.`deleted` = 0
1130                         AND `contact`.`id` = `item`.`contact-id`
1131                         AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
1132                         $sql_extra",
1133                         intval($id)
1134                 );
1135
1136                 if (!$r)
1137                         die(api_error($a, $type, t("There is no status with this id.")));
1138
1139                 $ret = api_format_items($r,$user_info);
1140
1141                 if ($conversation) {
1142                         $data = array('$statuses' => $ret);
1143                         return api_apply_template("timeline", $type, $data);
1144                 } else {
1145                         $data = array('$status' => $ret[0]);
1146                         /*switch($type){
1147                                 case "atom":
1148                                 case "rss":
1149                                         $data = api_rss_extra($a, $data, $user_info);
1150                         }*/
1151                         return  api_apply_template("status", $type, $data);
1152                 }
1153         }
1154         api_register_func('api/statuses/show','api_statuses_show', true);
1155
1156
1157         /**
1158          *
1159          */
1160         function api_conversation_show(&$a, $type){
1161                 if (api_user()===false) return false;
1162
1163                 $user_info = api_get_user($a);
1164
1165                 // params
1166                 $id = intval($a->argv[3]);
1167                 $count = (x($_REQUEST,'count')?$_REQUEST['count']:20);
1168                 $page = (x($_REQUEST,'page')?$_REQUEST['page']-1:0);
1169                 if ($page<0) $page=0;
1170                 $since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
1171                 $max_id = (x($_REQUEST,'max_id')?$_REQUEST['max_id']:0);
1172
1173                 $start = $page*$count;
1174
1175                 if ($id == 0)
1176                         $id = intval($_REQUEST["id"]);
1177
1178                 // Hotot workaround
1179                 if ($id == 0)
1180                         $id = intval($a->argv[4]);
1181
1182                 logger('API: api_conversation_show: '.$id);
1183
1184                 $sql_extra = '';
1185
1186                 if ($max_id > 0)
1187                         $sql_extra = ' AND `item`.`id` <= '.intval($max_id);
1188
1189                 $r = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
1190                         `contact`.`name`, `contact`.`photo`, `contact`.`url`, `contact`.`rel`,
1191                         `contact`.`network`, `contact`.`thumb`, `contact`.`dfrn-id`, `contact`.`self`,
1192                         `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`
1193                         FROM `item` INNER JOIN (SELECT `uri`,`parent` FROM `item` WHERE `id` = %d) AS `temp1`
1194                         ON (`item`.`thr-parent` = `temp1`.`uri` AND `item`.`parent` = `temp1`.`parent`), `contact`
1195                         WHERE `item`.`visible` = 1 and `item`.`moderated` = 0 AND `item`.`deleted` = 0
1196                         AND `item`.`uid` = %d AND `item`.`verb` = '%s' AND `contact`.`id` = `item`.`contact-id`
1197                         AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
1198                         AND `item`.`id`>%d $sql_extra
1199                         ORDER BY `item`.`id` DESC LIMIT %d ,%d",
1200                         intval($id), intval(api_user()),
1201                         dbesc(ACTIVITY_POST),
1202                         intval($since_id),
1203                         intval($start), intval($count)
1204                 );
1205
1206                 if (!$r)
1207                         die(api_error($a, $type, t("There is no conversation with this id.")));
1208
1209                 $ret = api_format_items($r,$user_info);
1210
1211                 $data = array('$statuses' => $ret);
1212                 return api_apply_template("timeline", $type, $data);
1213         }
1214         api_register_func('api/conversation/show','api_conversation_show', true);
1215
1216
1217         /**
1218          *
1219          */
1220         function api_statuses_repeat(&$a, $type){
1221                 global $called_api;
1222
1223                 if (api_user()===false) return false;
1224
1225                 $user_info = api_get_user($a);
1226
1227                 // params
1228                 $id = intval($a->argv[3]);
1229
1230                 if ($id == 0)
1231                         $id = intval($_REQUEST["id"]);
1232
1233                 // Hotot workaround
1234                 if ($id == 0)
1235                         $id = intval($a->argv[4]);
1236
1237                 logger('API: api_statuses_repeat: '.$id);
1238
1239                 $r = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`, `contact`.`nick` as `reply_author`,
1240                         `contact`.`name`, `contact`.`photo` as `reply_photo`, `contact`.`url` as `reply_url`, `contact`.`rel`,
1241                         `contact`.`network`, `contact`.`thumb`, `contact`.`dfrn-id`, `contact`.`self`,
1242                         `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`
1243                         FROM `item`, `contact`
1244                         WHERE `item`.`visible` = 1 and `item`.`moderated` = 0 AND `item`.`deleted` = 0
1245                         AND `contact`.`id` = `item`.`contact-id`
1246                         AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
1247                         $sql_extra
1248                         AND `item`.`id`=%d",
1249                         intval($id)
1250                 );
1251
1252                 if ($r[0]['body'] != "") {
1253                         if (!intval(get_config('system','old_share'))) {
1254                                 if (strpos($r[0]['body'], "[/share]") !== false) {
1255                                         $pos = strpos($r[0]['body'], "[share");
1256                                         $post = substr($r[0]['body'], $pos);
1257                                 } else {
1258                                         $post = "[share author='".str_replace("'", "&#039;", $r[0]['author-name']).
1259                                                         "' profile='".$r[0]['author-link'].
1260                                                         "' avatar='".$r[0]['author-avatar'].
1261                                                         "' link='".$r[0]['plink']."']";
1262                                         $post .= $r[0]['body'];
1263                                         $post .= "[/share]";
1264                                 }
1265                                 $_REQUEST['body'] = $post;
1266                         } else
1267                                 $_REQUEST['body'] = html_entity_decode("&#x2672; ", ENT_QUOTES, 'UTF-8')."[url=".$r[0]['reply_url']."]".$r[0]['reply_author']."[/url] \n".$r[0]['body'];
1268
1269                         $_REQUEST['profile_uid'] = api_user();
1270                         $_REQUEST['type'] = 'wall';
1271                         $_REQUEST['api_source'] = true;
1272
1273                         require_once('mod/item.php');
1274                         item_post($a);
1275                 }
1276
1277                 // this should output the last post (the one we just posted).
1278                 $called_api = null;
1279                 return(api_status_show($a,$type));
1280         }
1281         api_register_func('api/statuses/retweet','api_statuses_repeat', true);
1282
1283         /**
1284          *
1285          */
1286         function api_statuses_destroy(&$a, $type){
1287                 if (api_user()===false) return false;
1288
1289                 $user_info = api_get_user($a);
1290
1291                 // params
1292                 $id = intval($a->argv[3]);
1293
1294                 if ($id == 0)
1295                         $id = intval($_REQUEST["id"]);
1296
1297                 // Hotot workaround
1298                 if ($id == 0)
1299                         $id = intval($a->argv[4]);
1300
1301                 logger('API: api_statuses_destroy: '.$id);
1302
1303                 $ret = api_statuses_show($a, $type);
1304
1305                 require_once('include/items.php');
1306                 drop_item($id, false);
1307
1308                 return($ret);
1309         }
1310         api_register_func('api/statuses/destroy','api_statuses_destroy', true);
1311
1312         /**
1313          *
1314          * http://developer.twitter.com/doc/get/statuses/mentions
1315          *
1316          */
1317         function api_statuses_mentions(&$a, $type){
1318                 if (api_user()===false) return false;
1319
1320                 unset($_REQUEST["user_id"]);
1321                 unset($_GET["user_id"]);
1322
1323                 unset($_REQUEST["screen_name"]);
1324                 unset($_GET["screen_name"]);
1325
1326                 $user_info = api_get_user($a);
1327                 // get last newtork messages
1328
1329
1330                 // params
1331                 $count = (x($_REQUEST,'count')?$_REQUEST['count']:20);
1332                 $page = (x($_REQUEST,'page')?$_REQUEST['page']-1:0);
1333                 if ($page<0) $page=0;
1334                 $since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
1335                 $max_id = (x($_REQUEST,'max_id')?$_REQUEST['max_id']:0);
1336                 //$since_id = 0;//$since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
1337
1338                 $start = $page*$count;
1339
1340                 // Ugly code - should be changed
1341                 $myurl = $a->get_baseurl() . '/profile/'. $a->user['nickname'];
1342                 $myurl = substr($myurl,strpos($myurl,'://')+3);
1343                 //$myurl = str_replace(array('www.','.'),array('','\\.'),$myurl);
1344                 $myurl = str_replace('www.','',$myurl);
1345                 $diasp_url = str_replace('/profile/','/u/',$myurl);
1346
1347                 if ($max_id > 0)
1348                         $sql_extra = ' AND `item`.`id` <= '.intval($max_id);
1349
1350                 $r = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
1351                         `contact`.`name`, `contact`.`photo`, `contact`.`url`, `contact`.`rel`,
1352                         `contact`.`network`, `contact`.`thumb`, `contact`.`dfrn-id`, `contact`.`self`,
1353                         `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`
1354                         FROM `item`, `contact`
1355                         WHERE `item`.`uid` = %d AND `verb` = '%s'
1356                         AND NOT (`item`.`author-link` IN ('https://%s', 'http://%s'))
1357                         AND `item`.`visible` = 1 and `item`.`moderated` = 0 AND `item`.`deleted` = 0
1358                         AND `contact`.`id` = `item`.`contact-id`
1359                         AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
1360                         AND `item`.`parent` IN (SELECT `iid` from thread where uid = %d AND `mention`)
1361                         $sql_extra
1362                         AND `item`.`id`>%d
1363                         ORDER BY `item`.`id` DESC LIMIT %d ,%d ",
1364                         intval(api_user()),
1365                         dbesc(ACTIVITY_POST),
1366                         dbesc(protect_sprintf($myurl)),
1367                         dbesc(protect_sprintf($myurl)),
1368                         intval(api_user()),
1369                         intval($since_id),
1370                         intval($start), intval($count)
1371                 );
1372
1373                 $ret = api_format_items($r,$user_info);
1374
1375
1376                 $data = array('$statuses' => $ret);
1377                 switch($type){
1378                         case "atom":
1379                         case "rss":
1380                                 $data = api_rss_extra($a, $data, $user_info);
1381                                 break;
1382                         case "as":
1383                                 $as = api_format_as($a, $ret, $user_info);
1384                                 $as["title"] = $a->config['sitename']." Mentions";
1385                                 $as['link']['url'] = $a->get_baseurl()."/";
1386                                 return($as);
1387                                 break;
1388                 }
1389
1390                 return  api_apply_template("timeline", $type, $data);
1391         }
1392         api_register_func('api/statuses/mentions','api_statuses_mentions', true);
1393         api_register_func('api/statuses/replies','api_statuses_mentions', true);
1394
1395
1396         function api_statuses_user_timeline(&$a, $type){
1397                 if (api_user()===false) return false;
1398
1399                 $user_info = api_get_user($a);
1400                 // get last network messages
1401
1402                 logger("api_statuses_user_timeline: api_user: ". api_user() .
1403                            "\nuser_info: ".print_r($user_info, true) .
1404                            "\n_REQUEST:  ".print_r($_REQUEST, true),
1405                            LOGGER_DEBUG);
1406
1407                 // params
1408                 $count = (x($_REQUEST,'count')?$_REQUEST['count']:20);
1409                 $page = (x($_REQUEST,'page')?$_REQUEST['page']-1:0);
1410                 if ($page<0) $page=0;
1411                 $since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
1412                 //$since_id = 0;//$since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
1413                 $exclude_replies = (x($_REQUEST,'exclude_replies')?1:0);
1414                 $conversation_id = (x($_REQUEST,'conversation_id')?$_REQUEST['conversation_id']:0);
1415
1416                 $start = $page*$count;
1417
1418                 $sql_extra = '';
1419                 if ($user_info['self']==1)
1420                         $sql_extra .= " AND `item`.`wall` = 1 ";
1421
1422                 if ($exclude_replies > 0)
1423                         $sql_extra .= ' AND `item`.`parent` = `item`.`id`';
1424                 if ($conversation_id > 0)
1425                         $sql_extra .= ' AND `item`.`parent` = '.intval($conversation_id);
1426
1427                 $r = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
1428                         `contact`.`name`, `contact`.`photo`, `contact`.`url`, `contact`.`rel`,
1429                         `contact`.`network`, `contact`.`thumb`, `contact`.`dfrn-id`, `contact`.`self`,
1430                         `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`
1431                         FROM `item`, `contact`
1432                         WHERE `item`.`uid` = %d AND `verb` = '%s'
1433                         AND `item`.`contact-id` = %d
1434                         AND `item`.`visible` = 1 and `item`.`moderated` = 0 AND `item`.`deleted` = 0
1435                         AND `contact`.`id` = `item`.`contact-id`
1436                         AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
1437                         $sql_extra
1438                         AND `item`.`id`>%d
1439                         ORDER BY `item`.`id` DESC LIMIT %d ,%d ",
1440                         intval(api_user()),
1441                         dbesc(ACTIVITY_POST),
1442                         intval($user_info['cid']),
1443                         intval($since_id),
1444                         intval($start), intval($count)
1445                 );
1446
1447                 $ret = api_format_items($r,$user_info, true);
1448
1449                 $data = array('$statuses' => $ret);
1450                 switch($type){
1451                         case "atom":
1452                         case "rss":
1453                                 $data = api_rss_extra($a, $data, $user_info);
1454                 }
1455
1456                 return  api_apply_template("timeline", $type, $data);
1457         }
1458
1459         api_register_func('api/statuses/user_timeline','api_statuses_user_timeline', true);
1460
1461
1462         function api_favorites(&$a, $type){
1463                 global $called_api;
1464
1465                 if (api_user()===false) return false;
1466
1467                 $called_api= array();
1468
1469                 $user_info = api_get_user($a);
1470
1471                 // in friendica starred item are private
1472                 // return favorites only for self
1473                 logger('api_favorites: self:' . $user_info['self']);
1474
1475                 if ($user_info['self']==0) {
1476                         $ret = array();
1477                 } else {
1478                         $sql_extra = "";
1479
1480                         // params
1481                         $since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
1482                         $max_id = (x($_REQUEST,'max_id')?$_REQUEST['max_id']:0);
1483                         $count = (x($_GET,'count')?$_GET['count']:20);
1484                         $page = (x($_REQUEST,'page')?$_REQUEST['page']-1:0);
1485                         if ($page<0) $page=0;
1486
1487                         $start = $page*$count;
1488
1489                         if ($max_id > 0)
1490                                 $sql_extra .= ' AND `item`.`id` <= '.intval($max_id);
1491
1492                         $r = q("SELECT `item`.*, `item`.`id` AS `item_id`, `item`.`network` AS `item_network`,
1493                                 `contact`.`name`, `contact`.`photo`, `contact`.`url`, `contact`.`rel`,
1494                                 `contact`.`network`, `contact`.`thumb`, `contact`.`dfrn-id`, `contact`.`self`,
1495                                 `contact`.`id` AS `cid`, `contact`.`uid` AS `contact-uid`
1496                                 FROM `item`, `contact`
1497                                 WHERE `item`.`uid` = %d AND `verb` = '%s'
1498                                 AND `item`.`visible` = 1 and `item`.`moderated` = 0 AND `item`.`deleted` = 0
1499                                 AND `item`.`starred` = 1
1500                                 AND `contact`.`id` = `item`.`contact-id`
1501                                 AND `contact`.`blocked` = 0 AND `contact`.`pending` = 0
1502                                 $sql_extra
1503                                 AND `item`.`id`>%d
1504                                 ORDER BY `item`.`id` DESC LIMIT %d ,%d ",
1505                                 intval(api_user()),
1506                                 dbesc(ACTIVITY_POST),
1507                                 intval($since_id),
1508                                 intval($start), intval($count)
1509                         );
1510
1511                         $ret = api_format_items($r,$user_info);
1512
1513                 }
1514
1515                 $data = array('$statuses' => $ret);
1516                 switch($type){
1517                         case "atom":
1518                         case "rss":
1519                                 $data = api_rss_extra($a, $data, $user_info);
1520                 }
1521
1522                 return  api_apply_template("timeline", $type, $data);
1523         }
1524
1525         api_register_func('api/favorites','api_favorites', true);
1526
1527         function api_format_as($a, $ret, $user_info) {
1528
1529                 $as = array();
1530                 $as['title'] = $a->config['sitename']." Public Timeline";
1531                 $items = array();
1532                 foreach ($ret as $item) {
1533                         $singleitem["actor"]["displayName"] = $item["user"]["name"];
1534                         $singleitem["actor"]["id"] = $item["user"]["contact_url"];
1535                         $avatar[0]["url"] = $item["user"]["profile_image_url"];
1536                         $avatar[0]["rel"] = "avatar";
1537                         $avatar[0]["type"] = "";
1538                         $avatar[0]["width"] = 96;
1539                         $avatar[0]["height"] = 96;
1540                         $avatar[1]["url"] = $item["user"]["profile_image_url"];
1541                         $avatar[1]["rel"] = "avatar";
1542                         $avatar[1]["type"] = "";
1543                         $avatar[1]["width"] = 48;
1544                         $avatar[1]["height"] = 48;
1545                         $avatar[2]["url"] = $item["user"]["profile_image_url"];
1546                         $avatar[2]["rel"] = "avatar";
1547                         $avatar[2]["type"] = "";
1548                         $avatar[2]["width"] = 24;
1549                         $avatar[2]["height"] = 24;
1550                         $singleitem["actor"]["avatarLinks"] = $avatar;
1551
1552                         $singleitem["actor"]["image"]["url"] = $item["user"]["profile_image_url"];
1553                         $singleitem["actor"]["image"]["rel"] = "avatar";
1554                         $singleitem["actor"]["image"]["type"] = "";
1555                         $singleitem["actor"]["image"]["width"] = 96;
1556                         $singleitem["actor"]["image"]["height"] = 96;
1557                         $singleitem["actor"]["type"] = "person";
1558                         $singleitem["actor"]["url"] = $item["person"]["contact_url"];
1559                         $singleitem["actor"]["statusnet:profile_info"]["local_id"] = $item["user"]["id"];
1560                         $singleitem["actor"]["statusnet:profile_info"]["following"] = $item["user"]["following"] ? "true" : "false";
1561                         $singleitem["actor"]["statusnet:profile_info"]["blocking"] = "false";
1562                         $singleitem["actor"]["contact"]["preferredUsername"] = $item["user"]["screen_name"];
1563                         $singleitem["actor"]["contact"]["displayName"] = $item["user"]["name"];
1564                         $singleitem["actor"]["contact"]["addresses"] = "";
1565
1566                         $singleitem["body"] = $item["text"];
1567                         $singleitem["object"]["displayName"] = $item["text"];
1568                         $singleitem["object"]["id"] = $item["url"];
1569                         $singleitem["object"]["type"] = "note";
1570                         $singleitem["object"]["url"] = $item["url"];
1571                         //$singleitem["context"] =;
1572                         $singleitem["postedTime"] = date("c", strtotime($item["published"]));
1573                         $singleitem["provider"]["objectType"] = "service";
1574                         $singleitem["provider"]["displayName"] = "Test";
1575                         $singleitem["provider"]["url"] = "http://test.tld";
1576                         $singleitem["title"] = $item["text"];
1577                         $singleitem["verb"] = "post";
1578                         $singleitem["statusnet:notice_info"]["local_id"] = $item["id"];
1579                         $singleitem["statusnet:notice_info"]["source"] = $item["source"];
1580                         $singleitem["statusnet:notice_info"]["favorite"] = "false";
1581                         $singleitem["statusnet:notice_info"]["repeated"] = "false";
1582                         //$singleitem["original"] = $item;
1583                         $items[] = $singleitem;
1584                 }
1585                 $as['items'] = $items;
1586                 $as['link']['url'] = $a->get_baseurl()."/".$user_info["screen_name"]."/all";
1587                 $as['link']['rel'] = "alternate";
1588                 $as['link']['type'] = "text/html";
1589                 return($as);
1590         }
1591
1592         function api_format_messages($item, $recipient, $sender) {
1593                 // standard meta information
1594                 $ret=Array(
1595                                 'id'                    => $item['id'],
1596                                 'sender_id'             => $sender['id'] ,
1597                                 'text'                  => "",
1598                                 'recipient_id'          => $recipient['id'],
1599                                 'created_at'            => api_date($item['created']),
1600                                 'sender_screen_name'    => $sender['screen_name'],
1601                                 'recipient_screen_name' => $recipient['screen_name'],
1602                                 'sender'                => $sender,
1603                                 'recipient'             => $recipient,
1604                 );
1605
1606                 // "uid" and "self" are only needed for some internal stuff, so remove it from here
1607                 unset($ret["sender"]["uid"]);
1608                 unset($ret["sender"]["self"]);
1609                 unset($ret["recipient"]["uid"]);
1610                 unset($ret["recipient"]["self"]);
1611
1612                 //don't send title to regular StatusNET requests to avoid confusing these apps
1613                 if (x($_GET, 'getText')) {
1614                         $ret['title'] = $item['title'] ;
1615                         if ($_GET["getText"] == "html") {
1616                                 $ret['text'] = bbcode($item['body'], false, false);
1617                         }
1618                         elseif ($_GET["getText"] == "plain") {
1619                                 //$ret['text'] = html2plain(bbcode($item['body'], false, false, true), 0);
1620                                 $ret['text'] = trim(html2plain(bbcode(api_clean_plain_items($item['body']), false, false, 2, true), 0));
1621                         }
1622                 }
1623                 else {
1624                         $ret['text'] = $item['title']."\n".html2plain(bbcode(api_clean_plain_items($item['body']), false, false, 2, true), 0);
1625                 }
1626                 if (isset($_GET["getUserObjects"]) && $_GET["getUserObjects"] == "false") {
1627                         unset($ret['sender']);
1628                         unset($ret['recipient']);
1629                 }
1630
1631                 return $ret;
1632         }
1633
1634         function api_get_entitities(&$text, $bbcode) {
1635                 /*
1636                 To-Do:
1637                 * Links at the first character of the post
1638                 */
1639
1640                 $a = get_app();
1641
1642                 $result = q("SELECT `installed` FROM `addon` WHERE `name` = 'privacy_image_cache' AND `installed`");
1643                 $image_cache = (count($result) > 0);
1644
1645                 $include_entities = strtolower(x($_REQUEST,'include_entities')?$_REQUEST['include_entities']:"false");
1646
1647                 if ($include_entities != "true") {
1648                         if ($image_cache) {
1649                                 require_once("addon/privacy_image_cache/privacy_image_cache.php");
1650
1651                                 preg_match_all("/\[img](.*?)\[\/img\]/ism", $bbcode, $images);
1652
1653                                 foreach ($images[1] AS $image) {
1654                                         $replace = $a->get_baseurl()."/privacy_image_cache/".privacy_image_cache_cachename($image);
1655                                         $text = str_replace($image, $replace, $text);
1656                                 }
1657                         }
1658                         return array();
1659                 }
1660
1661                 $bbcode = bb_CleanPictureLinks($bbcode);
1662
1663                 // Change pure links in text to bbcode uris
1664                 $bbcode = preg_replace("/([^\]\='".'"'."]|^)(https?\:\/\/[a-zA-Z0-9\:\/\-\?\&\;\.\=\_\~\#\%\$\!\+\,]+)/ism", '$1[url=$2]$2[/url]', $bbcode);
1665
1666                 $entities = array();
1667                 $entities["hashtags"] = array();
1668                 $entities["symbols"] = array();
1669                 $entities["urls"] = array();
1670                 $entities["user_mentions"] = array();
1671
1672                 $URLSearchString = "^\[\]";
1673
1674                 $bbcode = preg_replace("/#\[url\=([$URLSearchString]*)\](.*?)\[\/url\]/ism",'#$2',$bbcode);
1675
1676                 $bbcode = preg_replace("/\[bookmark\=([$URLSearchString]*)\](.*?)\[\/bookmark\]/ism",'[url=$1]$2[/url]',$bbcode);
1677                 //$bbcode = preg_replace("/\[url\](.*?)\[\/url\]/ism",'[url=$1]$1[/url]',$bbcode);
1678                 $bbcode = preg_replace("/\[video\](.*?)\[\/video\]/ism",'[url=$1]$1[/url]',$bbcode);
1679
1680                 $bbcode = preg_replace("/\[youtube\]([A-Za-z0-9\-_=]+)(.*?)\[\/youtube\]/ism",
1681                                         '[url=https://www.youtube.com/watch?v=$1]https://www.youtube.com/watch?v=$1[/url]', $bbcode);
1682                 $bbcode = preg_replace("/\[youtube\](.*?)\[\/youtube\]/ism",'[url=$1]$1[/url]',$bbcode);
1683
1684                 $bbcode = preg_replace("/\[vimeo\]([0-9]+)(.*?)\[\/vimeo\]/ism",
1685                                         '[url=https://vimeo.com/$1]https://vimeo.com/$1[/url]', $bbcode);
1686                 $bbcode = preg_replace("/\[vimeo\](.*?)\[\/vimeo\]/ism",'[url=$1]$1[/url]',$bbcode);
1687
1688                 $bbcode = preg_replace("/\[img\=([0-9]*)x([0-9]*)\](.*?)\[\/img\]/ism", '[img]$3[/img]', $bbcode);
1689
1690                 //preg_match_all("/\[url\]([$URLSearchString]*)\[\/url\]/ism", $bbcode, $urls1);
1691                 preg_match_all("/\[url\=([$URLSearchString]*)\](.*?)\[\/url\]/ism", $bbcode, $urls);
1692
1693                 $ordered_urls = array();
1694                 foreach ($urls[1] AS $id=>$url) {
1695                         //$start = strpos($text, $url, $offset);
1696                         $start = iconv_strpos($text, $url, 0, "UTF-8");
1697                         if (!($start === false))
1698                                 $ordered_urls[$start] = array("url" => $url, "title" => $urls[2][$id]);
1699                 }
1700
1701                 ksort($ordered_urls);
1702
1703                 $offset = 0;
1704                 //foreach ($urls[1] AS $id=>$url) {
1705                 foreach ($ordered_urls AS $url) {
1706                         if ((substr($url["title"], 0, 7) != "http://") AND (substr($url["title"], 0, 8) != "https://") AND
1707                                 !strpos($url["title"], "http://") AND !strpos($url["title"], "https://"))
1708                                 $display_url = $url["title"];
1709                         else {
1710                                 $display_url = str_replace(array("http://www.", "https://www."), array("", ""), $url["url"]);
1711                                 $display_url = str_replace(array("http://", "https://"), array("", ""), $display_url);
1712
1713                                 if (strlen($display_url) > 26)
1714                                         $display_url = substr($display_url, 0, 25)."…";
1715                         }
1716
1717                         //$start = strpos($text, $url, $offset);
1718                         $start = iconv_strpos($text, $url["url"], $offset, "UTF-8");
1719                         if (!($start === false)) {
1720                                 $entities["urls"][] = array("url" => $url["url"],
1721                                                                 "expanded_url" => $url["url"],
1722                                                                 "display_url" => $display_url,
1723                                                                 "indices" => array($start, $start+strlen($url["url"])));
1724                                 $offset = $start + 1;
1725                         }
1726                 }
1727
1728                 preg_match_all("/\[img](.*?)\[\/img\]/ism", $bbcode, $images);
1729                 $ordered_images = array();
1730                 foreach ($images[1] AS $image) {
1731                         //$start = strpos($text, $url, $offset);
1732                         $start = iconv_strpos($text, $image, 0, "UTF-8");
1733                         if (!($start === false))
1734                                 $ordered_images[$start] = $image;
1735                 }
1736                 //$entities["media"] = array();
1737                 $offset = 0;
1738
1739                 foreach ($ordered_images AS $url) {
1740                         $display_url = str_replace(array("http://www.", "https://www."), array("", ""), $url);
1741                         $display_url = str_replace(array("http://", "https://"), array("", ""), $display_url);
1742
1743                         if (strlen($display_url) > 26)
1744                                 $display_url = substr($display_url, 0, 25)."…";
1745
1746                         $start = iconv_strpos($text, $url, $offset, "UTF-8");
1747                         if (!($start === false)) {
1748                                 require_once("include/Photo.php");
1749                                 $image = get_photo_info($url);
1750                                 if ($image) {
1751                                         // If privacy_image_cache is activated, then use the following sizes:
1752                                         // thumb  (150), small (340), medium (600) and large (1024)
1753                                         if ($image_cache) {
1754                                                 require_once("addon/privacy_image_cache/privacy_image_cache.php");
1755                                                 $media_url = $a->get_baseurl()."/privacy_image_cache/".privacy_image_cache_cachename($url);
1756
1757                                                 $sizes = array();
1758                                                 $scale = scale_image($image[0], $image[1], 150);
1759                                                 $sizes["thumb"] = array("w" => $scale["width"], "h" => $scale["height"], "resize" => "fit");
1760
1761                                                 if (($image[0] > 150) OR ($image[1] > 150)) {
1762                                                         $scale = scale_image($image[0], $image[1], 340);
1763                                                         $sizes["small"] = array("w" => $scale["width"], "h" => $scale["height"], "resize" => "fit");
1764                                                 }
1765
1766                                                 $scale = scale_image($image[0], $image[1], 600);
1767                                                 $sizes["medium"] = array("w" => $scale["width"], "h" => $scale["height"], "resize" => "fit");
1768
1769                                                 if (($image[0] > 600) OR ($image[1] > 600)) {
1770                                                         $scale = scale_image($image[0], $image[1], 1024);
1771                                                         $sizes["large"] = array("w" => $scale["width"], "h" => $scale["height"], "resize" => "fit");
1772                                                 }
1773                                         } else {
1774                                                 $media_url = $url;
1775                                                 $sizes["medium"] = array("w" => $image[0], "h" => $image[1], "resize" => "fit");
1776                                         }
1777
1778                                         $entities["media"][] = array(
1779                                                                 "id" => $start+1,
1780                                                                 "id_str" => (string)$start+1,
1781                                                                 "indices" => array($start, $start+strlen($url)),
1782                                                                 "media_url" => normalise_link($media_url),
1783                                                                 "media_url_https" => $media_url,
1784                                                                 "url" => $url,
1785                                                                 "display_url" => $display_url,
1786                                                                 "expanded_url" => $url,
1787                                                                 "type" => "photo",
1788                                                                 "sizes" => $sizes);
1789                                 }
1790                                 $offset = $start + 1;
1791                         }
1792                 }
1793
1794                 return($entities);
1795         }
1796
1797         function api_format_items($r,$user_info, $filter_user = false) {
1798
1799                 $a = get_app();
1800                 $ret = Array();
1801
1802                 foreach($r as $item) {
1803                         api_share_as_retweet($a, api_user(), $item);
1804
1805                         localize_item($item);
1806                         $status_user = api_item_get_user($a,$item);
1807
1808                         // Look if the posts are matching if they should be filtered by user id
1809                         if ($filter_user AND ($status_user["id"] != $user_info["id"]))
1810                                 continue;
1811
1812                         if ($item['thr-parent'] != $item['uri']) {
1813                                 $r = q("SELECT id FROM item WHERE uid=%d AND uri='%s' LIMIT 1",
1814                                         intval(api_user()),
1815                                         dbesc($item['thr-parent']));
1816                                 if ($r)
1817                                         $in_reply_to_status_id = intval($r[0]['id']);
1818                                 else
1819                                         $in_reply_to_status_id = intval($item['parent']);
1820
1821                                 $in_reply_to_status_id_str = (string) intval($item['parent']);
1822
1823                                 $in_reply_to_screen_name = NULL;
1824                                 $in_reply_to_user_id = NULL;
1825                                 $in_reply_to_user_id_str = NULL;
1826
1827                                 $r = q("SELECT `author-link` FROM item WHERE uid=%d AND id=%d LIMIT 1",
1828                                         intval(api_user()),
1829                                         intval($in_reply_to_status_id));
1830                                 if ($r) {
1831                                         $r = q("SELECT * FROM unique_contacts WHERE `url` = '%s'", dbesc(normalise_link($r[0]['author-link'])));
1832
1833                                         if ($r) {
1834                                                 if ($r[0]['nick'] == "")
1835                                                         $r[0]['nick'] = api_get_nick($r[0]["url"]);
1836
1837                                                 $in_reply_to_screen_name = (($r[0]['nick']) ? $r[0]['nick'] : $r[0]['name']);
1838                                                 $in_reply_to_user_id = intval($r[0]['id']);
1839                                                 $in_reply_to_user_id_str = (string) intval($r[0]['id']);
1840                                         }
1841                                 }
1842                         } else {
1843                                 $in_reply_to_screen_name = NULL;
1844                                 $in_reply_to_user_id = NULL;
1845                                 $in_reply_to_status_id = NULL;
1846                                 $in_reply_to_user_id_str = NULL;
1847                                 $in_reply_to_status_id_str = NULL;
1848                         }
1849
1850                         // Workaround for ostatus messages where the title is identically to the body
1851                         //$statusbody = trim(html2plain(bbcode(api_clean_plain_items($item['body']), false, false, 5, true), 0));
1852                         $html = bbcode(api_clean_plain_items($item['body']), false, false, 2, true);
1853                         $statusbody = trim(html2plain($html, 0));
1854
1855                         $statustitle = trim($item['title']);
1856
1857                         if (($statustitle != '') and (strpos($statusbody, $statustitle) !== false))
1858                                 $statustext = trim($statusbody);
1859                         else
1860                                 $statustext = trim($statustitle."\n\n".$statusbody);
1861
1862                         if (($item["network"] == NETWORK_FEED) and (strlen($statustext)> 1000))
1863                                 $statustext = substr($statustext, 0, 1000)."... \n".$item["plink"];
1864
1865                         $status = array(
1866                                 'text'          => $statustext,
1867                                 'truncated' => False,
1868                                 'created_at'=> api_date($item['created']),
1869                                 'in_reply_to_status_id' => $in_reply_to_status_id,
1870                                 'in_reply_to_status_id_str' => $in_reply_to_status_id_str,
1871                                 'source'    => (($item['app']) ? $item['app'] : 'web'),
1872                                 'id'            => intval($item['id']),
1873                                 'id_str'        => (string) intval($item['id']),
1874                                 'in_reply_to_user_id' => $in_reply_to_user_id,
1875                                 'in_reply_to_user_id_str' => $in_reply_to_user_id_str,
1876                                 'in_reply_to_screen_name' => $in_reply_to_screen_name,
1877                                 'geo' => NULL,
1878                                 'favorited' => $item['starred'] ? true : false,
1879                                 //'attachments' => array(),
1880                                 'user' =>  $status_user ,
1881                                 //'entities' => NULL,
1882                                 'statusnet_html'                => trim(bbcode($item['body'], false, false)),
1883                                 'statusnet_conversation_id'     => $item['parent'],
1884                         );
1885
1886                         if ($item['title'] != "")
1887                                 $status['statusnet_html'] = "<h4>".bbcode($item['title'])."</h4>\n".$status['statusnet_html'];
1888
1889                         $entities = api_get_entitities($status['text'], $item['body']);
1890                         if (count($entities) > 0)
1891                                 $status['entities'] = $entities;
1892
1893                         if (($item['item_network'] != "") AND ($status["source"] == 'web'))
1894                                 $status["source"] = network_to_name($item['item_network']);
1895                         else if (($item['item_network'] != "") AND (network_to_name($item['item_network']) != $status["source"]))
1896                                 $status["source"] = trim($status["source"].' ('.network_to_name($item['item_network']).')');
1897
1898
1899                         // Retweets are only valid for top postings
1900                         // It doesn't work reliable with the link if its a feed
1901                         $IsRetweet = ($item['owner-link'] != $item['author-link']);
1902                         if ($IsRetweet)
1903                                 $IsRetweet = (($item['owner-name'] != $item['author-name']) OR ($item['owner-avatar'] != $item['author-avatar']));
1904
1905                         if ($IsRetweet AND ($item["id"] == $item["parent"])) {
1906                                 $retweeted_status = $status;
1907                                 $retweeted_status["user"] = api_get_user($a,$item["author-link"]);
1908
1909                                 $status["retweeted_status"] = $retweeted_status;
1910                         }
1911
1912                         // "uid" and "self" are only needed for some internal stuff, so remove it from here
1913                         unset($status["user"]["uid"]);
1914                         unset($status["user"]["self"]);
1915
1916                         // 'geo' => array('type' => 'Point',
1917                         //                   'coordinates' => array((float) $notice->lat,
1918                         //                                          (float) $notice->lon));
1919
1920                         $ret[] = $status;
1921                 };
1922                 return $ret;
1923         }
1924
1925
1926         function api_account_rate_limit_status(&$a,$type) {
1927
1928                 $hash = array(
1929                           'reset_time_in_seconds' => strtotime('now + 1 hour'),
1930                           'remaining_hits' => (string) 150,
1931                           'hourly_limit' => (string) 150,
1932                           'reset_time' => api_date(datetime_convert('UTC','UTC','now + 1 hour',ATOM_TIME)),
1933                 );
1934                 if ($type == "xml")
1935                         $hash['resettime_in_seconds'] = $hash['reset_time_in_seconds'];
1936
1937                 return api_apply_template('ratelimit', $type, array('$hash' => $hash));
1938
1939         }
1940         api_register_func('api/account/rate_limit_status','api_account_rate_limit_status',true);
1941
1942         function api_help_test(&$a,$type) {
1943
1944                 if ($type == 'xml')
1945                         $ok = "true";
1946                 else
1947                         $ok = "ok";
1948
1949                 return api_apply_template('test', $type, array("$ok" => $ok));
1950
1951         }
1952         api_register_func('api/help/test','api_help_test',false);
1953
1954         function api_lists(&$a,$type) {
1955
1956                 $ret = array();
1957                 return array($ret);
1958         }
1959         api_register_func('api/lists','api_lists',true);
1960
1961         function api_lists_list(&$a,$type) {
1962
1963                 $ret = array();
1964                 return array($ret);
1965         }
1966         api_register_func('api/lists/list','api_lists_list',true);
1967
1968         /**
1969          *  https://dev.twitter.com/docs/api/1/get/statuses/friends
1970          *  This function is deprecated by Twitter
1971          *  returns: json, xml
1972          **/
1973         function api_statuses_f(&$a, $type, $qtype) {
1974                 if (api_user()===false) return false;
1975                 $user_info = api_get_user($a);
1976
1977                 if (x($_GET,'cursor') && $_GET['cursor']=='undefined'){
1978                         /* this is to stop Hotot to load friends multiple times
1979                         *  I'm not sure if I'm missing return something or
1980                         *  is a bug in hotot. Workaround, meantime
1981                         */
1982
1983                         /*$ret=Array();
1984                         return array('$users' => $ret);*/
1985                         return false;
1986                 }
1987
1988                 if($qtype == 'friends')
1989                         $sql_extra = sprintf(" AND ( `rel` = %d OR `rel` = %d ) ", intval(CONTACT_IS_SHARING), intval(CONTACT_IS_FRIEND));
1990                 if($qtype == 'followers')
1991                         $sql_extra = sprintf(" AND ( `rel` = %d OR `rel` = %d ) ", intval(CONTACT_IS_FOLLOWER), intval(CONTACT_IS_FRIEND));
1992
1993                 // friends and followers only for self
1994                 if ($user_info['self'] == 0)
1995                         $sql_extra = " AND false ";
1996
1997                 $r = q("SELECT `nurl` FROM `contact` WHERE `uid` = %d AND `self` = 0 AND `blocked` = 0 AND `pending` = 0 $sql_extra",
1998                         intval(api_user())
1999                 );
2000
2001                 $ret = array();
2002                 foreach($r as $cid){
2003                         $user = api_get_user($a, $cid['nurl']);
2004                         // "uid" and "self" are only needed for some internal stuff, so remove it from here
2005                         unset($user["uid"]);
2006                         unset($user["self"]);
2007
2008                         if ($user)
2009                                 $ret[] = $user;
2010                 }
2011
2012                 return array('$users' => $ret);
2013
2014         }
2015         function api_statuses_friends(&$a, $type){
2016                 $data =  api_statuses_f($a,$type,"friends");
2017                 if ($data===false) return false;
2018                 return  api_apply_template("friends", $type, $data);
2019         }
2020         function api_statuses_followers(&$a, $type){
2021                 $data = api_statuses_f($a,$type,"followers");
2022                 if ($data===false) return false;
2023                 return  api_apply_template("friends", $type, $data);
2024         }
2025         api_register_func('api/statuses/friends','api_statuses_friends',true);
2026         api_register_func('api/statuses/followers','api_statuses_followers',true);
2027
2028
2029
2030
2031
2032
2033         function api_statusnet_config(&$a,$type) {
2034                 $name = $a->config['sitename'];
2035                 $server = $a->get_hostname();
2036                 $logo = $a->get_baseurl() . '/images/friendica-64.png';
2037                 $email = $a->config['admin_email'];
2038                 $closed = (($a->config['register_policy'] == REGISTER_CLOSED) ? 'true' : 'false');
2039                 $private = (($a->config['system']['block_public']) ? 'true' : 'false');
2040                 $textlimit = (string) (($a->config['max_import_size']) ? $a->config['max_import_size'] : 200000);
2041                 if($a->config['api_import_size'])
2042                         $texlimit = string($a->config['api_import_size']);
2043                 $ssl = (($a->config['system']['have_ssl']) ? 'true' : 'false');
2044                 $sslserver = (($ssl === 'true') ? str_replace('http:','https:',$a->get_baseurl()) : '');
2045
2046                 $config = array(
2047                         'site' => array('name' => $name,'server' => $server, 'theme' => 'default', 'path' => '',
2048                                 'logo' => $logo, 'fancy' => true, 'language' => 'en', 'email' => $email, 'broughtby' => '',
2049                                 'broughtbyurl' => '', 'timezone' => 'UTC', 'closed' => $closed, 'inviteonly' => false,
2050                                 'private' => $private, 'textlimit' => $textlimit, 'sslserver' => $sslserver, 'ssl' => $ssl,
2051                                 'shorturllength' => '30',
2052                                 'friendica' => array(
2053                                                 'FRIENDICA_PLATFORM' => FRIENDICA_PLATFORM,
2054                                                 'FRIENDICA_VERSION' => FRIENDICA_VERSION,
2055                                                 'DFRN_PROTOCOL_VERSION' => DFRN_PROTOCOL_VERSION,
2056                                                 'DB_UPDATE_VERSION' => DB_UPDATE_VERSION
2057                                                 )
2058                         ),
2059                 );
2060
2061                 return api_apply_template('config', $type, array('$config' => $config));
2062
2063         }
2064         api_register_func('api/statusnet/config','api_statusnet_config',false);
2065
2066         function api_statusnet_version(&$a,$type) {
2067
2068                 // liar
2069
2070                 if($type === 'xml') {
2071                         header("Content-type: application/xml");
2072                         echo '<?xml version="1.0" encoding="UTF-8"?>' . "\r\n" . '<version>0.9.7</version>' . "\r\n";
2073                         killme();
2074                 }
2075                 elseif($type === 'json') {
2076                         header("Content-type: application/json");
2077                         echo '"0.9.7"';
2078                         killme();
2079                 }
2080         }
2081         api_register_func('api/statusnet/version','api_statusnet_version',false);
2082
2083
2084         function api_ff_ids(&$a,$type,$qtype) {
2085                 if(! api_user())
2086                         return false;
2087
2088                 $user_info = api_get_user($a);
2089
2090                 if($qtype == 'friends')
2091                         $sql_extra = sprintf(" AND ( `rel` = %d OR `rel` = %d ) ", intval(CONTACT_IS_SHARING), intval(CONTACT_IS_FRIEND));
2092                 if($qtype == 'followers')
2093                         $sql_extra = sprintf(" AND ( `rel` = %d OR `rel` = %d ) ", intval(CONTACT_IS_FOLLOWER), intval(CONTACT_IS_FRIEND));
2094
2095                 if (!$user_info["self"])
2096                         $sql_extra = " AND false ";
2097
2098                 $stringify_ids = (x($_REQUEST,'stringify_ids')?$_REQUEST['stringify_ids']:false);
2099
2100                 $r = q("SELECT unique_contacts.id FROM contact, unique_contacts WHERE contact.nurl = unique_contacts.url AND `uid` = %d AND `self` = 0 AND `blocked` = 0 AND `pending` = 0 $sql_extra",
2101                         intval(api_user())
2102                 );
2103
2104                 if(is_array($r)) {
2105
2106                         if($type === 'xml') {
2107                                 header("Content-type: application/xml");
2108                                 echo '<?xml version="1.0" encoding="UTF-8"?>' . "\r\n" . '<ids>' . "\r\n";
2109                                 foreach($r as $rr)
2110                                         echo '<id>' . $rr['id'] . '</id>' . "\r\n";
2111                                 echo '</ids>' . "\r\n";
2112                                 killme();
2113                         }
2114                         elseif($type === 'json') {
2115                                 $ret = array();
2116                                 header("Content-type: application/json");
2117                                 foreach($r as $rr)
2118                                         if ($stringify_ids)
2119                                                 $ret[] = $rr['id'];
2120                                         else
2121                                                 $ret[] = intval($rr['id']);
2122
2123                                 echo json_encode($ret);
2124                                 killme();
2125                         }
2126                 }
2127         }
2128
2129         function api_friends_ids(&$a,$type) {
2130                 api_ff_ids($a,$type,'friends');
2131         }
2132         function api_followers_ids(&$a,$type) {
2133                 api_ff_ids($a,$type,'followers');
2134         }
2135         api_register_func('api/friends/ids','api_friends_ids',true);
2136         api_register_func('api/followers/ids','api_followers_ids',true);
2137
2138
2139         function api_direct_messages_new(&$a, $type) {
2140                 if (api_user()===false) return false;
2141
2142                 if (!x($_POST, "text") OR (!x($_POST,"screen_name") AND !x($_POST,"user_id"))) return;
2143
2144                 $sender = api_get_user($a);
2145
2146                 require_once("include/message.php");
2147
2148                 if ($_POST['screen_name']) {
2149                         $r = q("SELECT `id`, `nurl`, `network` FROM `contact` WHERE `uid`=%d AND `nick`='%s'",
2150                                         intval(api_user()),
2151                                         dbesc($_POST['screen_name']));
2152
2153                         // Selecting the id by priority, friendica first
2154                         api_best_nickname($r);
2155
2156                         $recipient = api_get_user($a, $r[0]['nurl']);
2157                 } else
2158                         $recipient = api_get_user($a, $_POST['user_id']);
2159
2160                 $replyto = '';
2161                 $sub     = '';
2162                 if (x($_REQUEST,'replyto')) {
2163                         $r = q('SELECT `parent-uri`, `title` FROM `mail` WHERE `uid`=%d AND `id`=%d',
2164                                         intval(api_user()),
2165                                         intval($_REQUEST['replyto']));
2166                         $replyto = $r[0]['parent-uri'];
2167                         $sub     = $r[0]['title'];
2168                 }
2169                 else {
2170                         if (x($_REQUEST,'title')) {
2171                                 $sub = $_REQUEST['title'];
2172                         }
2173                         else {
2174                                 $sub = ((strlen($_POST['text'])>10)?substr($_POST['text'],0,10)."...":$_POST['text']);
2175                         }
2176                 }
2177
2178                 $id = send_message($recipient['cid'], $_POST['text'], $sub, $replyto);
2179
2180                 if ($id>-1) {
2181                         $r = q("SELECT * FROM `mail` WHERE id=%d", intval($id));
2182                         $ret = api_format_messages($r[0], $recipient, $sender);
2183
2184                 } else {
2185                         $ret = array("error"=>$id);
2186                 }
2187
2188                 $data = Array('$messages'=>$ret);
2189
2190                 switch($type){
2191                         case "atom":
2192                         case "rss":
2193                                 $data = api_rss_extra($a, $data, $user_info);
2194                 }
2195
2196                 return  api_apply_template("direct_messages", $type, $data);
2197
2198         }
2199         api_register_func('api/direct_messages/new','api_direct_messages_new',true);
2200
2201         function api_direct_messages_box(&$a, $type, $box) {
2202                 if (api_user()===false) return false;
2203
2204                 unset($_REQUEST["user_id"]);
2205                 unset($_GET["user_id"]);
2206
2207                 unset($_REQUEST["screen_name"]);
2208                 unset($_GET["screen_name"]);
2209
2210                 $user_info = api_get_user($a);
2211
2212                 // params
2213                 $count = (x($_GET,'count')?$_GET['count']:20);
2214                 $page = (x($_REQUEST,'page')?$_REQUEST['page']-1:0);
2215                 if ($page<0) $page=0;
2216
2217                 $since_id = (x($_REQUEST,'since_id')?$_REQUEST['since_id']:0);
2218                 $max_id = (x($_REQUEST,'max_id')?$_REQUEST['max_id']:0);
2219
2220                 $start = $page*$count;
2221
2222                 //$profile_url = $a->get_baseurl() . '/profile/' . $a->user['nickname'];
2223                 $profile_url = $user_info["url"];
2224
2225                 if ($box=="sentbox") {
2226                         $sql_extra = "`mail`.`from-url`='".dbesc( $profile_url )."'";
2227                 }
2228                 elseif ($box=="conversation") {
2229                         $sql_extra = "`mail`.`parent-uri`='".dbesc( $_GET["uri"] )  ."'";
2230                 }
2231                 elseif ($box=="all") {
2232                         $sql_extra = "true";
2233                 }
2234                 elseif ($box=="inbox") {
2235                         $sql_extra = "`mail`.`from-url`!='".dbesc( $profile_url )."'";
2236                 }
2237
2238                 if ($max_id > 0)
2239                         $sql_extra .= ' AND `mail`.`id` <= '.intval($max_id);
2240
2241                 $r = q("SELECT `mail`.*, `contact`.`nurl` AS `contact-url` FROM `mail`,`contact` WHERE `mail`.`contact-id` = `contact`.`id` AND `mail`.`uid`=%d AND $sql_extra AND `mail`.`id` > %d ORDER BY `mail`.`id` DESC LIMIT %d,%d",
2242                                 intval(api_user()),
2243                                 intval($since_id),
2244                                 intval($start), intval($count)
2245                 );
2246
2247                 $ret = Array();
2248                 foreach($r as $item) {
2249                         if ($box == "inbox" || $item['from-url'] != $profile_url){
2250                                 $recipient = $user_info;
2251                                 $sender = api_get_user($a,normalise_link($item['contact-url']));
2252                         }
2253                         elseif ($box == "sentbox" || $item['from-url'] != $profile_url){
2254                                 $recipient = api_get_user($a,normalise_link($item['contact-url']));
2255                                 $sender = $user_info;
2256
2257                         }
2258
2259                         $ret[]=api_format_messages($item, $recipient, $sender);
2260                 }
2261
2262
2263                 $data = array('$messages' => $ret);
2264                 switch($type){
2265                         case "atom":
2266                         case "rss":
2267                                 $data = api_rss_extra($a, $data, $user_info);
2268                 }
2269
2270                 return  api_apply_template("direct_messages", $type, $data);
2271
2272         }
2273
2274         function api_direct_messages_sentbox(&$a, $type){
2275                 return api_direct_messages_box($a, $type, "sentbox");
2276         }
2277         function api_direct_messages_inbox(&$a, $type){
2278                 return api_direct_messages_box($a, $type, "inbox");
2279         }
2280         function api_direct_messages_all(&$a, $type){
2281                 return api_direct_messages_box($a, $type, "all");
2282         }
2283         function api_direct_messages_conversation(&$a, $type){
2284                 return api_direct_messages_box($a, $type, "conversation");
2285         }
2286         api_register_func('api/direct_messages/conversation','api_direct_messages_conversation',true);
2287         api_register_func('api/direct_messages/all','api_direct_messages_all',true);
2288         api_register_func('api/direct_messages/sent','api_direct_messages_sentbox',true);
2289         api_register_func('api/direct_messages','api_direct_messages_inbox',true);
2290
2291
2292
2293         function api_oauth_request_token(&$a, $type){
2294                 try{
2295                         $oauth = new FKOAuth1();
2296                         $r = $oauth->fetch_request_token(OAuthRequest::from_request());
2297                 }catch(Exception $e){
2298                         echo "error=". OAuthUtil::urlencode_rfc3986($e->getMessage()); killme();
2299                 }
2300                 echo $r;
2301                 killme();
2302         }
2303         function api_oauth_access_token(&$a, $type){
2304                 try{
2305                         $oauth = new FKOAuth1();
2306                         $r = $oauth->fetch_access_token(OAuthRequest::from_request());
2307                 }catch(Exception $e){
2308                         echo "error=". OAuthUtil::urlencode_rfc3986($e->getMessage()); killme();
2309                 }
2310                 echo $r;
2311                 killme();
2312         }
2313
2314         api_register_func('api/oauth/request_token', 'api_oauth_request_token', false);
2315         api_register_func('api/oauth/access_token', 'api_oauth_access_token', false);
2316
2317 function api_share_as_retweet($a, $uid, &$item) {
2318         $body = trim($item["body"]);
2319
2320         // Skip if it isn't a pure repeated messages
2321         // Does it start with a share?
2322         if (strpos($body, "[share") > 0)
2323                 return(false);
2324
2325         // Does it end with a share?
2326         if (strlen($body) > (strrpos($body, "[/share]") + 8))
2327                 return(false);
2328
2329         $attributes = preg_replace("/\[share(.*?)\]\s?(.*?)\s?\[\/share\]\s?/ism","$1",$body);
2330         // Skip if there is no shared message in there
2331         if ($body == $attributes)
2332                 return(false);
2333
2334         $author = "";
2335         preg_match("/author='(.*?)'/ism", $attributes, $matches);
2336         if ($matches[1] != "")
2337                 $author = html_entity_decode($matches[1],ENT_QUOTES,'UTF-8');
2338
2339         preg_match('/author="(.*?)"/ism', $attributes, $matches);
2340         if ($matches[1] != "")
2341                 $author = $matches[1];
2342
2343         $profile = "";
2344         preg_match("/profile='(.*?)'/ism", $attributes, $matches);
2345         if ($matches[1] != "")
2346                 $profile = $matches[1];
2347
2348         preg_match('/profile="(.*?)"/ism', $attributes, $matches);
2349         if ($matches[1] != "")
2350                 $profile = $matches[1];
2351
2352         $avatar = "";
2353         preg_match("/avatar='(.*?)'/ism", $attributes, $matches);
2354         if ($matches[1] != "")
2355                 $avatar = $matches[1];
2356
2357         preg_match('/avatar="(.*?)"/ism', $attributes, $matches);
2358         if ($matches[1] != "")
2359                 $avatar = $matches[1];
2360
2361         $shared_body = preg_replace("/\[share(.*?)\]\s?(.*?)\s?\[\/share\]\s?/ism","$2",$body);
2362
2363         if (($shared_body == "") OR ($profile == "") OR ($author == "") OR ($avatar == ""))
2364                 return(false);
2365
2366         $item["body"] = $shared_body;
2367         $item["author-name"] = $author;
2368         $item["author-link"] = $profile;
2369         $item["author-avatar"] = $avatar;
2370
2371         return(true);
2372
2373 }
2374
2375 function api_get_nick($profile) {
2376 /* To-Do:
2377  - remove trailing jung from profile url
2378  - pump.io check has to check the website
2379 */
2380
2381         $nick = "";
2382
2383         $friendica = preg_replace("=https?://(.*)/profile/(.*)=ism", "$2", $profile);
2384         if ($friendica != $profile)
2385                 $nick = $friendica;
2386
2387         if (!$nick == "") {
2388                 $diaspora = preg_replace("=https?://(.*)/u/(.*)=ism", "$2", $profile);
2389                 if ($diaspora != $profile)
2390                         $nick = $diaspora;
2391         }
2392
2393         if (!$nick == "") {
2394                 $twitter = preg_replace("=https?://twitter.com/(.*)=ism", "$1", $profile);
2395                 if ($twitter != $profile)
2396                         $nick = $twitter;
2397         }
2398
2399
2400         if (!$nick == "") {
2401                 $StatusnetHost = preg_replace("=https?://(.*)/user/(.*)=ism", "$1", $profile);
2402                 if ($StatusnetHost != $profile) {
2403                         $StatusnetUser = preg_replace("=https?://(.*)/user/(.*)=ism", "$2", $profile);
2404                         if ($StatusnetUser != $profile) {
2405                                 $UserData = fetch_url("http://".$StatusnetHost."/api/users/show.json?user_id=".$StatusnetUser);
2406                                 $user = json_decode($UserData);
2407                                 if ($user)
2408                                         $nick = $user->screen_name;
2409                         }
2410                 }
2411         }
2412
2413         // To-Do: look at the page if its really a pumpio site
2414         //if (!$nick == "") {
2415         //      $pumpio = preg_replace("=https?://(.*)/(.*)/=ism", "$2", $profile."/");
2416         //      if ($pumpio != $profile)
2417         //              $nick = $pumpio;
2418                 //      <div class="media" id="profile-block" data-profile-id="acct:kabniel@microca.st">
2419
2420         //}
2421
2422         if ($nick != "") {
2423                 q("UPDATE unique_contacts SET nick = '%s' WHERE url = '%s'",
2424                         dbesc($nick), dbesc(normalise_link($profile)));
2425                 return($nick);
2426         }
2427
2428         return(false);
2429 }
2430
2431 function api_clean_plain_items($Text) {
2432         $include_entities = strtolower(x($_REQUEST,'include_entities')?$_REQUEST['include_entities']:"false");
2433
2434         $Text = bb_CleanPictureLinks($Text);
2435
2436         $URLSearchString = "^\[\]";
2437
2438         $Text = preg_replace("/([!#@])\[url\=([$URLSearchString]*)\](.*?)\[\/url\]/ism",'$1$3',$Text);
2439
2440         if ($include_entities == "true") {
2441                 $Text = preg_replace("/\[url\=([$URLSearchString]*)\](.*?)\[\/url\]/ism",'[url=$1]$1[/url]',$Text);
2442         }
2443
2444         $Text = preg_replace_callback("((.*?)\[class=(.*?)\](.*?)\[\/class\])ism","api_cleanup_share",$Text);
2445         return($Text);
2446 }
2447
2448 function api_cleanup_share($shared) {
2449         if ($shared[2] != "type-link")
2450                 return($shared[0]);
2451
2452         if (!preg_match_all("/\[bookmark\=([^\]]*)\](.*?)\[\/bookmark\]/ism",$shared[3], $bookmark))
2453                 return($shared[0]);
2454
2455         $title = "";
2456         $link = "";
2457
2458         if (isset($bookmark[2][0]))
2459                 $title = $bookmark[2][0];
2460
2461         if (isset($bookmark[1][0]))
2462                 $link = $bookmark[1][0];
2463
2464         if (strpos($shared[1],$title) !== false)
2465                 $title = "";
2466
2467         if (strpos($shared[1],$link) !== false)
2468                 $link = "";
2469
2470         $text = trim($shared[1]);
2471
2472         //if (strlen($text) < strlen($title))
2473         if (($text == "") AND ($title != ""))
2474                 $text .= "\n\n".trim($title);
2475
2476         if ($link != "")
2477                 $text .= "\n".trim($link);
2478
2479         return(trim($text));
2480 }
2481
2482 function api_best_nickname(&$contacts) {
2483         $best_contact = array();
2484
2485         if (count($contact) == 0)
2486                 return;
2487
2488         foreach ($contacts AS $contact)
2489                 if ($contact["network"] == "") {
2490                         $contact["network"] = "dfrn";
2491                         $best_contact = array($contact);
2492                 }
2493
2494         if (sizeof($best_contact) == 0)
2495                 foreach ($contacts AS $contact)
2496                         if ($contact["network"] == "dfrn")
2497                                 $best_contact = array($contact);
2498
2499         if (sizeof($best_contact) == 0)
2500                 foreach ($contacts AS $contact)
2501                         if ($contact["network"] == "dspr")
2502                                 $best_contact = array($contact);
2503
2504         if (sizeof($best_contact) == 0)
2505                 foreach ($contacts AS $contact)
2506                         if ($contact["network"] == "stat")
2507                                 $best_contact = array($contact);
2508
2509         if (sizeof($best_contact) == 0)
2510                 foreach ($contacts AS $contact)
2511                         if ($contact["network"] == "pump")
2512                                 $best_contact = array($contact);
2513
2514         if (sizeof($best_contact) == 0)
2515                 foreach ($contacts AS $contact)
2516                         if ($contact["network"] == "twit")
2517                                 $best_contact = array($contact);
2518
2519         if (sizeof($best_contact) == 1)
2520                 $contacts = $best_contact;
2521         else
2522                 $contacts = array($contacts[0]);
2523 }
2524
2525 /*
2526 Not implemented by now:
2527 favorites
2528 favorites/create
2529 favorites/destroy
2530 statuses/retweets_of_me
2531 friendships/create
2532 friendships/destroy
2533 friendships/exists
2534 friendships/show
2535 account/update_location
2536 account/update_profile_background_image
2537 account/update_profile_image
2538 blocks/create
2539 blocks/destroy
2540
2541 Not implemented in status.net:
2542 statuses/retweeted_to_me
2543 statuses/retweeted_by_me
2544 direct_messages/destroy
2545 account/end_session
2546 account/update_delivery_device
2547 notifications/follow
2548 notifications/leave
2549 blocks/exists
2550 blocks/blocking
2551 lists
2552 */