<?php
  
  require("../common_db.php");
  
  if ($\_POST[\text{'}method\text{'}]\; ==\; "add")\; \{$endPoint = "http://del.icio.us/api/posts/add?";
    $parameters\; =\; array();$parameters[] = array('url', urlencode($\_POST[\text{'}url\text{'}]));$parameters[] = array('extended', urlencode($\_POST[\text{'}extended\text{'}]));$parameters[] = array('tags', urlencode($\_POST[\text{'}tags\text{'}]));$parameters[] = array('description', urlencode($\_POST[\text{'}description\text{'}]));$parameters[] = array('dt', date("Y-m-jTH:i:sZ"));
    $xml\; =\; callDelicious($endPoint, $parameters);\; \}else\; \{$endPoint = "http://del.icio.us/api/tags/get?";
    $xml\; =\; callDelicious($endPoint, array());  
    $usedTags\; =\; array();\; foreach($xml as $tag)\; \{$usedTags[] = $tag[\text{'}tag\text{'}];\; \}\; sort($usedTags);
    $usedTags\; =\; implode("\; ",$usedTags);
    
    echo <<< htmlCodeBlock
    <form method="post">
    <input type="hidden" name="method" value="add">
    URL: <input type="text" name="url"><br>
    Extended: <input type="text" name="extended"><br>
    Descirption:<input type="text" name="description"><br>
    Tags:<input type="text" name="tags"><br>
    Previously Used Tags: $usedTags$<br>
    <br>
    <input type="submit">
    </form>
  htmlCodeBlock;
  }
  
    
    
    
    /*
    foreach(xml as $post)\; \{\; echo\; "Site:\; \{$post['description']} at {$post[\text{'}href\text{'}]\}\; has\; the\; following\; tag(s):\; \{$post['tag']}\n";
    }
    */  
  function callDelicious($endPoint,$parameters)
  {
    foreach ($parameters\; AS$paramater)
    {
            $endPoint\; .=$paramater[0] . "=" . //echo endPoint;
    
    $key\; =\; md5($endPoint);
    $today\; =\; date("Y-m-j\; H:i:s",\; time()\; -\; 5\; *\; 60);$query = "SELECT `key`, `xml` FROM 11_delicious_cache WHERE `key` = 'today' ORDER BY `tstamp` DESC LIMIT 1";
    $result\; =\; getAssoc($query, 0);
    
    if (isset($result[\text{'}$xml']))
    {
      //echo "Cache copy is valid";
      $xml\; =\; simplexml\_load\_string($result['xml']); 
    }else 
    {
       $xml\; =\; baseCall($endPoint);
       if ($xml\; ==\; null)\; \{\; return\; null;\; \}else\; if\; ($xml == "THROTTLE")
       {
         // Throttled, get best possible
           $query\; =\; "SELECT\; `key`,\; `xml`\; FROM\; 11\_delicious\_cache\; WHERE\; `key`\; =\; \text{'}$key' ORDER BY `tstamp` DESC LIMIT 1";
           $result\; =\; getAssoc($query, 0);
           if (isset($result[\text{'}xml\text{'}]))\; \{$safeXML = mysql_real_escape_string($result[\text{'}xml\text{'}]);$insertQuery = "REPLACE INTO 11_delicious_cache (`key`, `xml`, `tstamp`) VALUES (MD5('$endPoint\text{'}),\; \text{'}$safeXML', null)";
             insertQuery($insertQuery);$xml = simplexml_load_string($result[\text{'}xml\text{'}]);\; \}else\; \{\; //Wasn\text{'}t\; able\; to\; locate\; any\; cached\; copy$xml = null; 
           }
           
       }else if (is_object($xml))\; \{\; //echo\; "Couldn\text{'}t\; Cache,\; but\; I\; got\; the\; goods\; from\; the\; server";$safeXML = mysql_real_escape_string($xml->asXML());$insertQuery = "REPLACE INTO 11_delicious_cache (`key`, `xml`, `tstamp`) VALUES (MD5('$endPoint\text{'}),\; \text{'}$safeXML', null)";
         insertQuery($insertQuery);\; \}else\; \{$xml = null;
       }
    }
    return $xml;\; \}\; function\; baseCall($endPoint)
  {
   
    $authorization\; =\; base64\_encode("username:password");$url_info = parse_url($endPoint);$host = $url\_info[\text{'}host\text{'}];$path = $url\_info[\text{'}path\text{'}]\; .\; "?"\; .$url_info['query'];  
    $data\; =\; "";$fp=fsockopen($host,\; 80);\; fputs($fp, "POST " . $path\; .\; "\; HTTP/1.1\backslash r\backslash n");\; fputs($fp, "Host: " . $host\; ."\backslash r\backslash n");\; fputs($fp, "Authorization: Basic $authorization\backslash r\backslash n");\; fputs($fp, "Accept: text/xml,application/xml,application/xhtml+xml,text/html;q=0.9,text/plain\r\n");
    fputs($fp,\; "Accept-Charset:\; ISO-8859-1,utf-8;q=0.7,*;q=0.7\backslash r\backslash n");\; fputs($fp, "Connection: close\r\n");
    fputs($fp,\; "User-Agent:\; PReinheimer\; Test\; App\; v0.1\backslash r\backslash n");\; fputs($fp, "Content-Type: application/x-www-form-urlencoded\r\n");
    fputs($fp,\; "Content-Length:\; "\; .\; strlen($data) . "\r\n\r\n");
    fputs($fp,\; "$data");
  
    $response="";\; while(!feof($fp))
    {
      $response.=fgets($fp, 128);
    }
    fclose($fp);\; list($http_headers, $http\_content)=explode("\backslash r\backslash n\backslash r\backslash n",$response);
    if (strpos($http\_headers,\; "200\; OK"))\; \{$firstLine = strpos($http\_content,\; "\backslash n");$http_content = substr($http\_content,$firstLine + 1);
      $lastLine\; =\; strrpos($http_content, ">");
      $http\_content\; =\; substr($http_content, 0, $lastLine\; +\; 1);$xml = simplexml_load_string($http\_content);\; //echo\; "$<pre>http_content</pre>";
      return $xml;\; \}else\; if\; (strpos($http_headers, "503"))
    {
      return "THROTTLE";
    }else 
    {
      return NULL;
    }
  }
  
  ?>