<?php
  /*
    Zjistovani poctu prodanych linku a mesicniho vydelku na Backlinks
    Vytvoril: Jiri Hrazdil <jiri@hrazdil.info>, 2008
    Stazeno z: http://hrazdil.info/blog/125-zjistovani-vydelku-na-backlinks-v-php 
    Nez mi napisete mail, ze neco nefunguje, tak se podivejte do vyse uvedeno clanku a stahnete si aktualni verzi.
  */   
  
  $backlinksLogin = "";            // zde doplnte prihlasovaci jmeno k backlinks  
  $backlinksPassword = "";         // zde doplnte heslo k backlinks
  
  $ch = curl_init("http://backlinks.com/login.php");
  
  curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
  curl_setopt($ch, CURLOPT_HEADER, 0);
  curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
  curl_setopt($ch, CURLOPT_COOKIEFILE, "cookies-backlinks.txt");
  curl_setopt($ch, CURLOPT_COOKIEJAR, "cookies-backlinks.txt");
  curl_setopt($ch, CURLOPT_USERAGENT, "Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)");
  $postdata = "FormAction=login&FormName=Login&Login=$backLinksLogin&Password=$backLinksPassword";
  curl_setopt($ch, CURLOPT_POST, 1);
  curl_setopt($ch, CURLOPT_POSTFIELDS, $postdata);
  
  $data = curl_exec($ch);
  
  $links = 0;
  $week = 0;
  $rev = 0;
  
  if (preg_match("/<A href=\"soldlinks.php\">(\d+)<\/A>/", $data, $regs)) {
    $links = $regs[1];
  }
  if (preg_match("/Text links sold within last.*<SELECT.*>.*<\/SELECT>.*<\/td>.*<td class=\"DataTD\"><b>:<\/b>&nbsp;(\d+)\s/Us", $data, $regs)) {
    $week = $regs[1];
  }
  if (preg_match("/Total monthly revenue.*<\/td>.*<td class=\"DataTD\"><b>:<\/b>&nbsp;.(\d+)\s+/Us", $data, $regs)) {
    $rev = $regs[1];
  }
  
  echo "celkem prodano odkazu: $links<br>";
  echo "za posledni tyden: $week<br>";
  echo "celkova hodnota linku za tento mesic: $rev USD";
?>