2016-02-19 22:23:37 -08:00
|
|
|
<?php
|
|
|
|
|
|
2016-02-26 00:50:18 -08:00
|
|
|
// Original code: The Wizard of DATz
|
|
|
|
|
|
|
|
|
|
print "<pre>";
|
2016-02-19 22:23:37 -08:00
|
|
|
|
2016-02-26 00:50:18 -08:00
|
|
|
$pages = array(
|
2016-02-19 22:23:37 -08:00
|
|
|
"http://marcos64.orgfree.com/programas.html",
|
|
|
|
|
"http://marcos64.orgfree.com/varias/crackesp.html",
|
|
|
|
|
"http://marcos64.orgfree.com/varias/castellanos.html",
|
|
|
|
|
"http://marcos64.orgfree.com/varias/loadnrun.html",
|
|
|
|
|
"http://marcos64.orgfree.com/varias/plus4.html",
|
|
|
|
|
);
|
|
|
|
|
|
|
|
|
|
foreach ($pages as $page)
|
|
|
|
|
{
|
|
|
|
|
print "load ".$page."\n";
|
|
|
|
|
|
2016-03-01 02:22:23 -08:00
|
|
|
$content = get_data($page);
|
2016-02-26 00:50:18 -08:00
|
|
|
$content = explode('<a href="', $content);
|
|
|
|
|
$content[0] = null;
|
2016-02-19 22:23:37 -08:00
|
|
|
|
2016-02-26 00:50:18 -08:00
|
|
|
$new = 0;
|
|
|
|
|
$old = 0;
|
2016-02-19 22:23:37 -08:00
|
|
|
|
2016-02-26 00:50:18 -08:00
|
|
|
$page = explode('/', $page);
|
|
|
|
|
$page[count($page) - 1] = null;
|
|
|
|
|
$page = implode('/', $page);
|
2016-02-19 22:23:37 -08:00
|
|
|
|
2016-02-26 00:50:18 -08:00
|
|
|
foreach ($content as $row)
|
|
|
|
|
{
|
|
|
|
|
if ($row)
|
|
|
|
|
{
|
|
|
|
|
$url = explode('"', $row);
|
|
|
|
|
$url = $url[0];
|
|
|
|
|
$ext = explode('.', $url);
|
|
|
|
|
$url = $page.$url;
|
2016-02-19 22:23:37 -08:00
|
|
|
|
2016-02-26 00:50:18 -08:00
|
|
|
if (count($ext) > 1)
|
2016-02-19 22:23:37 -08:00
|
|
|
{
|
2016-02-26 00:50:18 -08:00
|
|
|
$name = explode('</a>', $row);
|
|
|
|
|
$name = trim(strip_tags('<a href="'.$name[0]));
|
2016-02-19 22:23:37 -08:00
|
|
|
|
2016-02-26 00:50:18 -08:00
|
|
|
if (!$r_query[$url])
|
|
|
|
|
{
|
|
|
|
|
$found[] = array($url, $name.".".$ext[count($ext) - 1]);
|
2016-02-19 22:23:37 -08:00
|
|
|
$new++;
|
2016-02-26 00:50:18 -08:00
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
2016-02-19 22:23:37 -08:00
|
|
|
$old++;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
print "found new ".$new.", old ".$old."\n";
|
2016-03-01 02:22:23 -08:00
|
|
|
}
|
2016-02-19 22:23:37 -08:00
|
|
|
|
2016-03-01 02:22:23 -08:00
|
|
|
print "<table><tr><td><pre>";
|
|
|
|
|
|
|
|
|
|
foreach ($found as $row)
|
|
|
|
|
{
|
|
|
|
|
print $row[0]."\n";
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
print "</td><td><pre>";
|
|
|
|
|
|
|
|
|
|
foreach ($found as $row)
|
|
|
|
|
{
|
|
|
|
|
print "<a href=\"".$row[0]."\" target=_blank>".$row[1]."</a>\n";
|
2016-02-19 22:23:37 -08:00
|
|
|
}
|
|
|
|
|
|
2016-03-01 02:22:23 -08:00
|
|
|
print "</td></tr></table>";
|
|
|
|
|
|
2016-02-19 22:23:37 -08:00
|
|
|
?>
|