// RJM Programming // January, 2023 set_time_limit(3600); $letlen=8; $langis='en'; $urlis=''; function relative_to_absolute($inth) { global $urlis, $letlen; $froms=[]; $sfroms=" "; $ub="http://" . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'] . $_SERVER['REQUEST_URI']; if ($urlis != "") { $ubf=explode("?", $urlis); $ubff=explode("/", $ubf[0]); if (strpos($ubff[sizeof($ubff) - 1], ".") !== false && (sizeof($ubff) - 1) > 2) { $ub=str_replace("/" . $ubff[sizeof($ubff) - 1], "/", $ubf[0]); } else { $ub=str_replace("@$@", "", str_replace("/@$@", "/", ($ubf[0] . "@$@"))); } $urlis=""; } $ubf=explode("?", $ub); $udirname=str_replace("/wiki_" . "mark_eight.php", "/", $ubf[0]); //echo $udirname; //exit; //$low = strtolower($inth); $outth = $inth; $ideas = array(" action='", ' action="', " Action='", ' Action="', " ACTION='", ' ACTION="', " action=", " Action=", " ACTION=", " href='", ' href="', " Href='", ' Href="', " HREF='", ' HREF="', " href=", " Href=", " HREF=", " src='", ' src="', " Src='", ' Src="', " SRC='", ' SRC="', " src=", " Src=", " SRC="); if ($udirname != "") { $inth=str_replace("'/static/", "'" . explode("/wiki/", $udirname)[0] . "/static/", $inth); $inth=str_replace('"/static/', '"' . explode("/wiki/", $udirname)[0] . "/static/", $inth); $inth=str_replace("'/wiki/", "'" . explode("/wiki/", $udirname)[0] . "/wiki/", $inth); $inth=str_replace('"/wiki/', '"' . explode("/wiki/", $udirname)[0] . "/wiki/", $inth); $inth=str_replace("'/w/", "'" . explode("/wiki/", $udirname)[0] . "/w/", $inth); $inth=str_replace('"/w/', '"' . explode("/wiki/", $udirname)[0] . "/w/", $inth); $outth = $inth; for ($m=0; $m 1) { for ($ii=(sizeof($huhs) - 1); $ii>=1; $ii--) { if (strtolower(str_replace("file", "http", strtolower(substr($huhs[$ii], 0, 4)))) == "http") { $outth = $outth; } else if (substr($huhs[$ii], 0, 1) != "/" && substr($huhs[$ii], 0, 1) != "'" && substr($huhs[$ii], 0, 1) != '"') { $outth = str_replace($huhs[$ii], $udirname . $huhs[$ii], $outth); } else if (substr($huhs[$ii], 1, 1) != "/" && substr($huhs[$ii], 0, 1) != "'" && substr($huhs[$ii], 0, 1) != '"') { $outth = str_replace($huhs[$ii], substr($udirname, 0, (strlen($udirname) - 0)) . $huhs[$ii], $outth); } } } } } $cerrs=explode(">", $outth); for ($jj=1; $jj= $letlen) { if (strpos($sfroms, ' ' . $aerrs[$ii] . ' ') === false) { $berrs=explode(' ' . $aerrs[$ii] . ' ', $outth); //$laste=explode(">", $berrs[0])[-1 + sizeof(explode(">", $berrs[0]))]; //if (strpos($laste, "<") === false) { $sfroms.=$aerrs[$ii] . ' '; //} } } } } $froms=explode(" ", trim($sfroms)); for ($ii=0; $ii' . $froms[$ii] . '<', str_replace('>' . $froms[$ii] . ' ', '>' . $froms[$ii] . ' ', str_replace(' ' . $froms[$ii] . ' ', ' ' . $froms[$ii] . ' ', $outth))); } return $outth; } if (isset($_GET['url'])) { if (isset($_GET['letlen'])) { $letlen=urldecode($_GET['letlen']); } $urlis=urldecode($_GET['protocol']) . urldecode($_GET['lang']) . urldecode($_GET['afterlang']) . str_replace('+','_',urldecode($_GET['url'])); //echo $urlis; //exit; $contis=file_get_contents($urlis); echo relative_to_absolute($contis); exit; } else { echo "

Wikipedia Mark and Above Length Words

RJM Programming - January, 2023

"; } ?>