Mostly C64 site checkers. Some had weird issues that needed to be fixed

This commit is contained in:
Matt Nadareski
2016-02-24 20:40:33 -08:00
parent cde3af9101
commit b84debcdf7
11 changed files with 411 additions and 278 deletions

View File

@@ -33,6 +33,12 @@ $checked = array (
"BananaRepublic",
"bjars",
"BrutalDeluxeSoftware",
"c16de",
"C64ch",
"c64com",
"c64gamescom", // Empty checker page?
"c64gamesde",
);
if (!isset($_GET["source"]))
@@ -44,7 +50,7 @@ if (!isset($_GET["source"]))
if (preg_match("/^.*\.php$/", $file))
{
$file = substr($file, 0, sizeof($file) - 5);
echo "<a href=\"?page=onlinecheck&source=".$file."&debug=1\">".htmlspecialchars($file)."</a><br/>";
echo "<a href=\"?page=onlinecheck&source=".$file."\">".htmlspecialchars($file)."</a><br/>";
}
}
@@ -62,16 +68,15 @@ elseif (!file_exists("../sites/".$_GET["source"].".php"))
$source = $_GET["source"];
// Do all onlinecheck pages use this?
if (array_key_exists($source, $checked))
if (in_array($source, $checked))
{
echo "<h2>Loading pages and links...</h2>";
$r_query = file("sites/".$source.".txt");
$r_query = file("../sites/".$source.".txt");
$r_query = array_flip($r_query);
// There is the case that all keys will contain a whitespace character at the end
$s_query = Array();
$s_query = array();
while (list($k, $v) = each($r_query))
{
$s_query[trim($k)] = $r_query[$k];
@@ -79,16 +84,12 @@ if (array_key_exists($source, $checked))
$r_query = $s_query;
unset($s_query);
$found = Array();
$found = array();
$base_dl_url = "";
}
// If we get to this point, we assume that it's good
// Original code: The Wizard of DATz
include_once("../sites/".$source.".php");
// Original code: The Wizard of DATz
include_once("../sites/".$source.".php");
if (array_key_exists($source, $checked))
{
echo "<h2>New files:</h2>";
foreach ($found as $row)

View File

@@ -4,7 +4,7 @@
$base_dl_url = "http://armas.cbm8bit.com/tapescans/victaps/";
$pages = Array(
$pages = array(
'http://armas.cbm8bit.com/0to9taps.html',
'http://armas.cbm8bit.com/ataps.html',
'http://armas.cbm8bit.com/btaps.html',
@@ -47,7 +47,7 @@ foreach ($pages as $newfile)
foreach ($query as $row)
{
if($row != "")
if ($row != "")
{
$row = explode('<td', $row);
$title = trim(str_replace(" ( NO SCAN YET )", "", strip_tags('<td'.$row[1])));
@@ -57,15 +57,15 @@ foreach ($pages as $newfile)
foreach ($dls as $dl)
{
if($dl != "")
if ($dl != "")
{
$dl = explode ('"', $dl);
$dl = explode('"', $dl);
$dl = $dl[0];
$ext = explode ('.', $dl);
$ext = explode('.', $dl);
$ext = $ext[count($ext)-1];
if($r_query[$dl] != "")
if ($r_query[$dl] != "")
{
$old++;
}

View File

@@ -1,13 +1,15 @@
<?php
// Original code: The Wizard of DATz
print "<pre>";
$page="http://www.c64heaven.com/";
$page="http://www.c64heaven.com/";
print "load ".$page."\n";
print "load ".$page."\n";
$content = implode('', file($page));
$content=implode ('', file ($page));
print str_replace(Array('style'),null,$content);
print str_replace(array('style'), null, $content);
?>

View File

@@ -1,66 +1,77 @@
<?php
if($_GET["start"])
// Original code: The Wizard of DATz
if ($_GET["start"])
{
$start=$_GET["start"];
$fp = fopen("sites/".$source.".txt", "w");
fwrite($fp, $start);
fclose($fp);
}
else
{
$start=implode('', $r_query);
}
print "<pre>Search for new uploads\n\n";
for ($x = $start; $x < $start + 50; $x++)
{
$query = trim(implode('', file("http://c64.ch/demos/realdetail.php?id=".$x)));
$OK = explode('C64.CH - The C64 Demo Portal - News', $query);
$info = array();
$gametitle = explode('<td style="background:url(/img/m/t2b.gif);" colspan="3" width="432"><span class="mt">', $query);
$gameauthor = explode('</span>', $gametitle[1]);
$gametitle = explode(' by <a', $gametitle[1]);
$gametitle = trim(str_replace(array(' (', ')'), array(', ', ''), $gametitle[0]));
$info[] = $gametitle;
$gameauthor = explode('group">', $gameauthor[0]);
$gameauthor = explode('</a>', $gameauthor[1]);
$gameauthor = trim($gameauthor[0]);
$year = explode('/demos/list.php?year=', $query);
$year = explode('</a>', $year[1]);
$year = explode('>', $year[0]);
if ($year)
{
$start=$_GET["start"];
$fp = fopen($_GET["source"]."/ids.txt", "w");
fwrite($fp, $start);
fclose($fp);
$info[] = $year;
}
$party = explode('/demos/list.php?source=party&partyid=', $query);
$party = explode('</a>', $party[1]);
$party = explode('>', $party[0]);
$party = trim(str_replace(array(' (', ')'), array(', ', ''), $party[1]));
if ($party)
{
$info[] = $party;
}
$gametitle = $gameauthor." (".implode(") (", $info).").zip";
if ($OK[1])
{
print $x."\tnot found\n";
}
else
{
$start=implode ('', file ($_GET["source"]."/ids.txt"));
print $x."\t<a href=http://c64.ch/demos/download.php?id=".$x.">".$gametitle."</a>\n";
$last = $x;
}
}
print "<pre>Search for new uploads\n\n";
if ($last)
{
$start = $last + 1;
}
for ($x=$start;$x<$start+50;$x++)
{
$query=trim(implode ('', file ("http://c64.ch/demos/realdetail.php?id=".$x)));
$OK=explode ('C64.CH - The C64 Demo Portal - News', $query);
$info=Array();
$gametitle=explode ('<td style="background:url(/img/m/t2b.gif);" colspan="3" width="432"><span class="mt">', $query);
$gameauthor=explode ('</span>', $gametitle[1]);
$gametitle=explode (' by <a', $gametitle[1]);
$gametitle=trim(str_replace(array(' (',')'),array(', ',''),$gametitle[0]));
$info[]=$gametitle;
$gameauthor=explode ('group">', $gameauthor[0]);
$gameauthor=explode ('</a>', $gameauthor[1]);
$gameauthor=trim($gameauthor[0]);
$year=explode ('/demos/list.php?year=', $query);
$year=explode ('</a>', $year[1]);
$year=explode ('>', $year[0]);
$year=trim($year[1]);
if($year)$info[]=$year;
$party=explode ('/demos/list.php?source=party&partyid=', $query);
$party=explode ('</a>', $party[1]);
$party=explode ('>', $party[0]);
$party=trim(str_replace(array(' (',')'),array(', ',''),$party[1]));
if($party)$info[]=$party;
$gametitle=$gameauthor." (".implode(") (",$info).").zip";
if($OK[1])
{
print $x."\tnot found\n";
}
else
{
print $x."\t<a href=http://c64.ch/demos/download.php?id=".$x.">".$gametitle."</a>\n";
$last=$x;
}
}
if($last) $start=$last+1;
print "\nnext startnr\t<a href=?action=onlinecheck&source=".$_GET["source"]."&start=".($start).">".$start."</a>";
print "\nnext startnr\t<a href=?action=onlinecheck&source=".$_GET["source"]."&start=".($start).">".$start."</a>";
?>

View File

@@ -1,71 +1,68 @@
<?php
$r_query=implode ('', file ($_GET["source"]."/fixed.txt"));
$r_query=explode ("\r\n","\r\n".$r_query);
$r_query=array_flip($r_query);
print "<pre>";
// Original code: The Wizard of DATz
print "Last fixes\n\n";
print "<pre>";
$query=implode ('', file ("http://intros.c64.org/frame.php"));
$query=explode ('<div class="menu_header">FIXED</div>', $query);
$query=explode ('<a href="main.php?module=showintro&iid=', $query[1]);
print "Last fixes\n\n";
$query[0]=null;
$query = implode('', file("http://intros.c64.org/frame.php"));
$query = explode('<div class="menu_header">FIXED</div>', $query);
$query = explode('<a href="main.php?module=showintro&iid=', $query[1]);
foreach($query as $row)
$query[0] = null;
foreach ($query as $row)
{
if ($row)
{
if($row)
{
$id=explode('"',$row);
$gametitle=explode('>',$row);
$gametitle=explode('<',$gametitle[1]);
$gametitle=explode (' ', $gametitle[0]);
$gametitle[count($gametitle)-1]="(".$gametitle[count($gametitle)-1].")";
$gametitle=implode (' ', $gametitle);
$id = explode('"', $row);
$gametitle = explode('>', $row);
$gametitle = explode('<', $gametitle[1]);
$gametitle = explode(' ', $gametitle[0]);
$gametitle[count($gametitle) - 1] = "(".$gametitle[count($gametitle) - 1].")";
$gametitle = implode(' ', $gametitle);
if (!$r_query[$id[0]]) print $id[0]."\t<a href=http://intros.c64.org/inc_download.php?iid=".$id[0].">".$gametitle.".prg</a>\n";
if (!$r_query[$id[0]])
{
print $id[0]."\t<a href=http://intros.c64.org/inc_download.php?iid=".$id[0].">".$gametitle.".prg</a>\n";
}
}
}
if($_GET["start"])
$r_query = array_flip($r_query);
$start = explode("=", $r_query[0]);
$start = $start[1];
print "\nSearch for new uploads\n\n";
for ($x = $start; $x < $start + 50; $x++)
{
$query = implode('', file("http://intros.c64.org/main.php?module=showintro&iid=".$x));
if ($query != "Database error. Please contact us if this problem persists.")
{
$start=$_GET["start"];
$fp = fopen($_GET["source"]."/ids.txt", "w");
fwrite($fp, $start);
fclose($fp);
$gametitle = explode('<span class="introname">', $query);
$gametitle = explode('</span>', $gametitle[1]);
$gametitle = explode(' ', $gametitle[0]);
$gametitle[count($gametitle) - 1] = "(".$gametitle[count($gametitle) - 1].")";
$gametitle = implode(' ', $gametitle);
print $x."\t<a href=http://intros.c64.org/inc_download.php?iid=".$x.">".$gametitle.".prg</a>\n";
$last = $x;
}
else
{
$start=implode ('', file ($_GET["source"]."/ids.txt"));
print $x."\t".$query."\n";
}
}
print "\nSearch for new uploads\n\n";
if ($last)
{
$start = $last + 1;
}
for ($x=$start;$x<$start+50;$x++)
{
$query=implode ('', file ("http://intros.c64.org/main.php?module=showintro&iid=".$x));
if($query!="Database error. Please contact us if this problem persists.")
{
$gametitle=explode ('<span class="introname">', $query);
$gametitle=explode ('</span>', $gametitle[1]);
$gametitle=explode (' ', $gametitle[0]);
$gametitle[count($gametitle)-1]="(".$gametitle[count($gametitle)-1].")";
$gametitle=implode (' ', $gametitle);
print $x."\t<a href=http://intros.c64.org/inc_download.php?iid=".$x.">".$gametitle.".prg</a>\n";
$last=$x;
}
else
{
print $x."\t".$query."\n";
}
}
if($last) $start=$last+1;
print "\nnext startnr\t<a href=?action=onlinecheck&source=C64intros&start=".($start).">".$start."</a>";
print "\nnext startnr\t<a href=?action=onlinecheck&source=C64intros&start=".($start).">".$start."</a>";
?>

View File

@@ -1 +1,77 @@
9643
start=9643
10
3180
36
38
59
3009
143
145
146
147
161
180
181
225
226
234
2681
274
469
471
472
479
569
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
607
625
626
631
632
633
635
636
637
639
640
641
647
653
666
670
671
1398
693
771
772
778
756
757
929
1005
1081
1111
1116
1129
1164
1190
1191
1193
1195
1209
1228
349

View File

@@ -1,6 +1,8 @@
<?php
$dirs=Array(
// Original code: The Wizard of DATz
$dirs = array(
'http://c16.c64games.de/c16/tapes/',
'http://c16.c64games.de/c16/demos/',
'http://c16.c64games.de/c16/tools/',
@@ -8,42 +10,59 @@ $dirs=Array(
'http://c16.c64games.de/c16/basic/',
);
$r_query=implode ('', file ($_GET["source"]."/ids.txt"));
$r_query=explode ("\r\n","\r\n".$r_query);
$r_query=array_flip($r_query);
print "<pre>check folders:\n\n";
$newURLs=Array();
foreach ($dirs as $dir)
{
listDir($dir);
}
function listDir($dir){
GLOBAL $newURLs, $r_query;
print "\nnew urls:\n\n";
foreach ($found as $url)
{
print "<a href=\"".$url."\">".$url."</a>\n";
}
function listDir($dir)
{
GLOBAL $found, $r_query;
print "load: ".$dir."\n";
$query=implode ('', file ($dir));
$query=explode('>Parent Directory<',$query);
if($query[1]){
$query=$query[1];
}else{
$query=$query[0];
$query = implode('', file($dir));
$query = explode('>Parent Directory<', $query);
if ($query[1])
{
$query = $query[1];
}
$query=str_replace(' HREF="',' href="',$query);
$query=explode(' href="',$query);
$query[0]=null;
else
{
$query = $query[0];
}
$query = str_replace(' HREF="', ' href="', $query);
$query = explode(' href="', $query);
$query[0] = null;
$new=0;
$old=0;
$new = 0;
$old = 0;
foreach($query as $row){
if($row){
$url=explode('"',$row);
$url=$dir.$url[0];
foreach ($query as $row)
{
if ($row)
{
$url = explode('"', $row);
$url = $dir.$url[0];
if(substr($url, -1)=='/'){
if (substr($url, -1) == '/')
{
listDir($url);
}else{
}
else
{
if(!$r_query[$url])
{
$newURLs[]=$url;
$found[] = $url;
$new++;
}
else
@@ -58,18 +77,4 @@ function listDir($dir){
print "new: ".$new.", old: ".$old."\n";
}
print "<pre>check folders:\n\n";
foreach($dirs as $dir)
{
listDir($dir);
}
print "\nnew urls:\n\n";
foreach($newURLs as $url)
{
print "<a href=\"".$url."\">".$url."</a>\n";
}
?>

View File

@@ -1,72 +1,98 @@
<?php
print "<pre>";
print "load <a href=?action=onlinecheck&source=".$_GET["source"]."&type=demos>demos</a>\n";
print "load <a href=?action=onlinecheck&source=".$_GET["source"]."&type=games>games</a>\n";
$url=Array(
'demos' => 'http://www.c64.com/demos/demos_show.php?showid=',
'games' => 'http://www.c64.com/games/no-frame.php?showid=',
);
// Original code: The Wizard of DATz
print "<pre>";
print "load <a href=?action=onlinecheck&source=".$source."&type=demos>demos</a>\n";
print "load <a href=?action=onlinecheck&source=".$source."&type=games>games</a>\n";
$url = array(
'demos' => 'http://www.c64.com/demos/demos_show.php?showid=',
'games' => 'http://www.c64.com/games/no-frame.php?showid=',
);
if($_GET["type"])
$r_query = array_flip($r_query);
$demos_start = explode("=", $r_query[0]);
$demos_start = $demos_start[1];
$games_start = explode("=", $r_query[1]);
$games_start = $games_start[1];
$demos_end = parse_games("demos", $demos_start);
$games_end = parse_games("games", $games_start);
/*
// Handy AFTER we automatically download
$handle = fopen("../sites/".$source.".txt", "w");
fwrite($handle, "demos=".$demos_end);
fwrite($handle, "games=".$games_end);
fclose($handle);
*/
function parse_games($type, $start)
{
print "loading ".$type."\n";
for ($x = $start; $x < $start + 50; $x++)
{
print "loading ".$_GET["type"]."\n";
if($_GET["start"])
$query = implode ('', file($url[$type].$x));
if ($type == 'demos')
{
$start=$_GET["start"];
$fp = fopen($_GET["source"]."/".$_GET["type"].".txt", "w");
fwrite($fp, $start);
fclose($fp);
$query = explode('<td height="41" align="center" valign="middle" bgcolor="#535353">', $query);
$query = explode('</td>', $query[1]);
$query = $query[0];
}
else
{
$start=implode ('', file ($_GET["source"]."/".$_GET["type"].".txt"));
$query = explode('<td height="41" colspan="2">', $query);
$query = explode('</td>', $query[1]);
$query = $query[0];
}
for ($x=$start;$x<$start+50;$x++)
{
$query=implode ('', file ($url[$_GET["type"]].$x));
if($_GET["type"]=='demos'){
$query=explode('<td height="41" align="center" valign="middle" bgcolor="#535353">',$query);
$query=explode('</td>',$query[1]);
$query=$query[0];
}else{
$query=explode('<td height="41" colspan="2">',$query);
$query=explode('</td>',$query[1]);
$query=$query[0];
}
$gametitle=explode ('<span class="headline_1">', $query);
$gametitle=explode ('</span>', $gametitle[1]);
$gametitle=trim($gametitle[0]);
$addinfo=explode ('<a ', $query);
$addinfo[0]=null;
$infos=Array();
foreach($addinfo as $info){
if($info){
$info=explode ('</a>', $info);
$info=str_replace(array('(',')','?'),Array('','','x'),trim(strip_tags('<a '.$info[0])));
if($info) $infos[]=$info;
}
}
if($infos) $gametitle=$gametitle." (".implode(") (",$infos).")";
if($gametitle){
print $x."\t<a href=http://www.c64.com/".$_GET["type"]."/download.php?id=".$x.">".$gametitle.".zip</a>\n";
$last=$x;
}else{
print $x."\tnot found\n";
}
}
if($last) $start=$last+1;
print "\nnext startnr\t<a href=?action=onlinecheck&source=".$_GET["source"]."&type=".$_GET["type"]."&start=".($start).">".$start."</a>";
$gametitle = explode('<span class="headline_1">', $query);
$gametitle = explode('</span>', $gametitle[1]);
$gametitle = trim($gametitle[0]);
$addinfo = explode('<a ', $query);
$addinfo[0] = null;
$infos = array();
foreach ($addinfo as $info)
{
if ($info)
{
$info = explode('</a>', $info);
$info = str_replace(array('(', ')', '?'), array('', '', 'x'), trim(strip_tags('<a '.$info[0])));
if ($info)
{
$infos[] = $info;
}
}
}
if ($infos)
{
$gametitle = $gametitle." (".implode(") (", $infos).")";
}
if ($gametitle)
{
print $x."\t<a href=http://www.c64.com/".$type."/download.php?id=".$x.">".$gametitle.".zip</a>\n";
$last = $x;
}
else
{
print $x."\tnot found\n";
}
}
if ($last)
{
$start = $last + 1;
print "\nnext startnr\t<a href=?action=onlinecheck&source=".$source."&type=".$type."&start=".($start).">".$start."</a>";
}
return $start;
}
?>

View File

@@ -0,0 +1,2 @@
demos=2305
games=2420

View File

@@ -0,0 +1,5 @@
<?php
// Original code: The Wizard of DATz
?>

View File

@@ -1,44 +1,44 @@
<?php
// Original code: The Wizard of DATz
print "<pre>";
$r_query=implode ('', file ($_GET["source"]."/ids.txt"));
$r_query=explode ("\r\n","\r\n".$r_query);
$r_query=array_flip($r_query);
$files = array();
$found=Array();
$files=Array();
$translator=Array(
$translator = array(
1 => 'c',
2 => 't',
3 => 'd',
4 => 'o',
);
$translator2=Array(
$translator2 = array(
'c' => 'Cartridge',
't' => 'Tape',
'd' => 'Disk',
'o' => 'Original',
);
for($x=1;$x<=4;$x++)
for ($x = 1; $x <= 4; $x++)
{
$dir = "http://c64games.de/phpseiten/spiele.php?aufruf=true&medium=".$x;
$old=0;
$new=0;
$old = 0;
$new = 0;
$query=implode ('', file ($dir));
$query=explode ('spieledetail.php?filnummer=', $query);
$query[0]=null;
$query = implode('', file($dir));
$query = explode('spieledetail.php?filnummer=', $query);
$query[0] = null;
foreach($query as $row){
if($row){
$row=explode ('"', $row);
$row=$row[0];
foreach ($query as $row)
{
if ($row)
{
$row = explode('"', $row);
$row = $row[0];
$found[$row]=$row;
$found[$row] = $row;
$new++;
}
}
@@ -51,42 +51,47 @@ foreach($found as $id)
{
$dir = "http://c64games.de/phpseiten/spieledetail.php?filnummer=".$id;
$old=0;
$new=0;
$old = 0;
$new = 0;
$query=implode ('', file ($dir));
$query=explode ('../hugo.php?art=', $query);
$query = implode('', file($dir));
$query = explode('../hugo.php?art=', $query);
$titel=explode ('<span style="color:red;font:Bold 14px Arial, Helvetica;"><i> ', $query[0]);
$titel=explode (' </i></span>', $titel[1]);
$titel=$titel[0];
$titel = explode('<span style="color:red;font:Bold 14px Arial, Helvetica;"><i> ', $query[0]);
$titel = explode(' </i></span>', $titel[1]);
$titel = $titel[0];
$year=explode ('Jahr:</td><td><span style="color:white;font:Bold 12px Arial, Helvetica;">', $query[0]);
$year=explode ('<', $year[1]);
$year=$year[0];
$year = explode('Jahr:</td><td><span style="color:white;font:Bold 12px Arial, Helvetica;">', $query[0]);
$year = explode('<', $year[1]);
$year = $year[0];
$Eingespielt=explode ('Eingespielt am:</td><td><span style="color:white;font:Bold 12px Arial, Helvetica;"> ', $query[0]);
$Eingespielt=explode ('<', $Eingespielt[1]);
$Eingespielt=date('Ymd',strtotime($Eingespielt[0]));
$Eingespielt = explode('Eingespielt am:</td><td><span style="color:white;font:Bold 12px Arial, Helvetica;"> ', $query[0]);
$Eingespielt = explode('<', $Eingespielt[1]);
$Eingespielt = date('Ymd', strtotime($Eingespielt[0]));
$manufactor=explode ('Hersteller:</td><td><span style="color:white;font:Bold 12px Arial, Helvetica;">', $query[0]);
$manufactor=explode ('<', $manufactor[1]);
$manufactor=$manufactor[0];
$manufactor = explode('Hersteller:</td><td><span style="color:white;font:Bold 12px Arial, Helvetica;">', $query[0]);
$manufactor = explode('<', $manufactor[1]);
$manufactor = $manufactor[0];
$query[0]=null;
$query[0] = null;
foreach($query as $row){
if($row){
$row=explode ('"', $row);
$row=$row[0];
foreach ($query as $row)
{
if ($row)
{
$row = explode('"', $row);
$row = $row[0];
$ext=explode ('.', $row);
$ext=$ext[count($ext)-1];
$ext = explode('.', $row);
$ext = $ext[count($ext) - 1];
if($r_query[$Eingespielt.'#'.$id]){
if ($r_query[$Eingespielt.'#'.$id])
{
$old++;
}else{
$files[]=Array($Eingespielt.'#'.$id,$row,$titel." (".$manufactor.") (".$year.") (".$translator2[$row[0]].").".$ext);
}
else
{
$files[] = array($Eingespielt.'#'.$id, $row, $titel." (".$manufactor.") (".$year.") (".$translator2[$row[0]].").".$ext);
$new++;
}
}
@@ -98,12 +103,15 @@ foreach($found as $id)
print "<table><tr><td><pre>";
foreach($files as $row){
foreach
($files as $row)
{
print $row[0]."\n";
}
print "</td><td><pre>";
print "</td><td><pre>";
foreach($files as $row){
foreach ($files as $row)
{
print "<a href=\"http://c64games.de/hugo.php?art=".$row[1]."\">".$row[2]."</a>\n";
}