Slideshow Creator - RJM Programming

Text version of ' . $url . ' ...

' . "\n";
    $cont = "";
    if ($isaspec != "") {   // this is a filespec (list?) rather than one file
      $isspec = explode(",", $isaspec);
      for ($ki=0; $ki<sizeof($isspec); $ki++) {
       if ($isspec[$ki] != "") {
        $jsspec = "";
        if (substr($isspec[$ki],0,3) == "../" && strpos(strtolower($_SERVER['SERVER_NAME']), "rjmprogramming.com.au") !== false) {
          $jsspec = str_replace("/../", "/", (str_replace("*../", str_replace("//", "/", str_replace("/PHP/", "/", str_replace("/PHP//", "/", str_replace("slideshow_creator.php", "", "http://" . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'] . str_replace("?" . $_SERVER['QUERY_STRING'], "", $_SERVER['REQUEST_URI']))))), "*" . $isspec[$ki])));
          $isspec[$ki] = str_replace("/../", "/", (str_replace("*../", str_replace("//", "/", str_replace("/PHP/", "/", str_replace("/PHP//", "/", (dirname(__FILE__) . "/")))), "*" . $isspec[$ki])));
        } else if (substr($isspec[$ki],0,2) == "./" && strpos(strtolower($_SERVER['SERVER_NAME']), "rjmprogramming.com.au") !== false) {
          $jsspec = str_replace("/../", "/", (str_replace("*./", str_replace("//", "/", str_replace("/PHjunkP/", "/", str_replace("/PHjunkP//", "/", str_replace("slideshow_creator.php", "", "http://" . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'] . str_replace("?" . $_SERVER['QUERY_STRING'], "", $_SERVER['REQUEST_URI']))))), "*" . $isspec[$ki])));
          $isspec[$ki] = str_replace("/../", "/", (str_replace("*./", str_replace("//", "/", str_replace("/PHjunkP/", "/", str_replace("/PHjunkP//", "/", (dirname(__FILE__) . "/")))), "*" . $isspec[$ki])));
        }
        foreach (glob($isspec[$ki]) as $filename) {
         if ($jsspec != "") {
          $filename = str_replace(str_replace("/PHP/", "/", str_replace("/PHP//", "/", (dirname(__FILE__) . "/"))), str_replace("/PHP/slideshow_creator.php", "/", "http://" . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'] . str_replace("?" . $_SERVER['QUERY_STRING'], "", $_SERVER['REQUEST_URI'])), $filename);
          $bitcont = file_get_contents("http://" . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'] . str_replace("?" . $_SERVER['QUERY_STRING'], "", $_SERVER['REQUEST_URI']) . "?url=" . urlencode($filename) . "&start=" . urlencode($start) . "&end=" . urlencode($end) . "&attrib=" . urlencode($attrib) . "&ptag=" . urlencode($ptag) . "&ctag=" . urlencode($ctag));
         } else if (substr($filename, 1, 1) == ":") { // Windows
          $bitcont = file_get_contents("http://" . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'] . str_replace("?" . $_SERVER['QUERY_STRING'], "", $_SERVER['REQUEST_URI']) . "?url=" . urlencode("file://" . substr($filename, 0, 1) . substr($filename, 2)) . "&start=" . urlencode($start) . "&end=" . urlencode($end) . "&attrib=" . urlencode($attrib) . "&ptag=" . urlencode($ptag) . "&ctag=" . urlencode($ctag));
         } else {  // Linux
          $bitcont = file_get_contents("http://" . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'] . str_replace("?" . $_SERVER['QUERY_STRING'], "", $_SERVER['REQUEST_URI']) . "?url=" . urlencode("file://" . $filename) . "&start=" . urlencode($start) . "&end=" . urlencode($end) . "&attrib=" . urlencode($attrib) . "&ptag=" . urlencode($ptag) . "&ctag=" . urlencode($ctag));
         }
         $bits = explode("<h2>", $bitcont);
         if (sizeof($bits) > 1) {
          $thenbits = explode("</div>", $bits[1]);
          echo "<h2>" . $thenbits[0];
         }
		}
	   }
	  }     
    } else {
      $urls = explode(",", $url);  
      if (sizeof($urls) > 1) {   // list of URLs
        $cont = "";
        for ($ki=0; $ki<sizeof($urls); $ki++) {
         if ($urls[$ki] != "") {
          $bitcont = file_get_contents("http://" . $_SERVER['SERVER_NAME'] . ":" . $_SERVER['SERVER_PORT'] . str_replace("?" . $_SERVER['QUERY_STRING'], "", $_SERVER['REQUEST_URI']) . "?url=" . urlencode($urls[$ki]) . "&start=" . urlencode($start) . "&end=" . urlencode($end) . "&attrib=" . urlencode($attrib) . "&ptag=" . urlencode($ptag) . "&ctag=" . urlencode($ctag));
          $bits = explode("<h2>", $bitcont);
          if (sizeof($bits) > 1) {
           $thenbits = explode("</div>", $bits[1]);
           echo "<h2>" . $thenbits[0];
          }
         }
        }
      } else {   // usual, original, one URL
        $cont = file_get_contents($url);
      }
    }
        
    if (strlen($cont) > 0) {
      
      $tcont = "";
      $esuff = "";
      if (strpos(strtolower($url . "*"), ".xml*") !== false) {
        $esuff = " \n";
      }
      
      $precont = "";
      $ocs = explode("</script>", $cont);
      if (sizeof($ocs) > 1) {
       for ($ik=0; $ik<sizeof($ocs); $ik++) {
        $xocs = explode("<script", $ocs[$ik]);
        if (sizeof($xocs) > 1) {
          $precont .= $xocs[0] . "<script";
          $xxocs = explode(">", $xocs[1]);
          $precont .= $xxocs[0] . ">";
          $precont .= str_replace("<", "<", str_replace(">", ">", substr($xocs[1], (strlen($xxocs[0]) + 1))));
        } else {
          $precont .= $xocs[0];
        }
        $precont .= "</script>";
	   }
	   $cont = $precont;
	  }

$oc = explode($start, $cont);
      for ($ik=0; $ik<sizeof($oc); $ik++) {
        if (strtolower(str_replace($end, "", str_replace("/", "", str_replace(" ", "", $oc[$ik])))) == "br") $tcont .= "\n";
        $eoc = explode($end, $oc[$ik]);
        if (sizeof($eoc) > 1) {
          for ($eik=1; $eik<sizeof($eoc); $eik+=2) {
            $tcont .= $eoc[$eik];
            if ($eoc[$eik] != "") $tcont .= $esuff;
          }
        }
      }

echo $tcont;
          
    }

echo '

Text version of ' . $url . ' ...

URL comma separated allowed

Local web server file:// with/without * for filespecs allowed ... eg. file://./.ml

Text version of ' . $url . ' ...

URL comma separated allowed

Local web server file:// with/without * for filespecs allowed ... eg. file://./*.*ml

Local web server file:// with/without * for filespecs allowed ... eg. file://./.ml