index.php

<?php

error_reporting(E_ALL);
ini_set('display_errors','On');

date_default_timezone_set('UTC');

function query_str($params, $sep='&amp;', $quoted=0, $encode=1)
{
  $str = '';
  foreach ($params as $key => $value) {
    $str .= (strlen($str) < 1) ? '' : $sep;
    if (($value=='') || is_null($value)) {
      $str .= $key;
      continue;
    }
    $rawval = ($encode) ? rawurlencode($value) : $value;
    if ($quoted) $rawval = '"'.$rawval.'"';
    $str .= $key . '=' . $rawval;
  }
  return ($str);
}

function phpself_querystr($querystr = null)
{
  $ret = $_SERVER['PHP_SELF'];
  $ret = preg_replace('/\/index.php$/', '/', $ret);
  if (!isset($querystr)) parse_str($_SERVER['QUERY_STRING'], $querystr);
  if (is_array($querystr)) {
    if (count($querystr)) {
      $querystr = query_str($querystr);
      if ($querystr) {
	$ret .= '?' . $querystr;
      }
    }
  } else {
    if ($querystr) {
      $ret .= '?' . $querystr;
    }
  }

  return $ret;
}


if ($_SERVER['REQUEST_METHOD'] == 'POST') {

  include 'mkmap.php';

  $config = read_config("connectors.txt");

  $tempdir_base = "/tmp/rndneverputt";

  if (!file_exists($tempdir_base)) {
    mkdir($tempdir_base);
  }

  do {
    $coursebase = rand(0,99999);
    $tempdir = $tempdir_base.'/rndmap-'.$coursebase;
  } while (file_exists($tempdir));

  mkdir($tempdir);

  if (isset($_POST['num_levels']) && preg_match('/^[0-9]+$/', $_POST['num_levels'])) {
    $num_levels = $_POST['num_levels'];
    if ($num_levels < 2) $num_levels = 2;
    if ($num_levels > 29) $num_levels = 29;
  } else $num_levels = 18;

  if (isset($_GET['seed']) && preg_match('/^[0-9]+$/', $_GET['seed'])) {
    $seedi = intval($_GET['seed']);
  } else $seedi = intval(make_seed());

  srand($seedi);

  if (isset($_POST['lev_len']) && preg_match('/^[0-9]+$/', trim($_POST['lev_len']))) {
    $lev_len = trim($_POST['lev_len']);
  }
  switch (intval($lev_len)) {
  default:
  case 0: $maplen_min = 6;  $maplen_max = 20; break;
  case 1: $maplen_min = 6;  $maplen_max = 12; break;
  case 2: $maplen_min = 10; $maplen_max = 17; break;
  case 3: $maplen_min = 15; $maplen_max = 20; break;
  case 4: $maplen_min = 20; $maplen_max = 30; break;
  }

  if (isset($_POST['lev_par']) && preg_match('/^[0-9]+$/', trim($_POST['lev_par']))) {
    $lev_par = trim($_POST['lev_par']);
  }
  switch (intval($lev_par)) {
  case 0: $mappar_min = 1; $mappar_max = 4; break;
  default:
  case 1: $mappar_min = 3; $mappar_max = 6; break;
  case 2: $mappar_min = 5; $mappar_max = 8; break;
  }


  $filelist = array();

  for ($x = 0; $x < $num_levels; $x++) {
    $fname = sprintf("%s/%02d.map", $tempdir, ($x+1));
    $filelist[] = $fname;
    if (isset($_POST['lev_prog'])) $maplen = intval(($x/$num_levels)*($maplen_max-$maplen_min+1))+$maplen_min;
    else $maplen = rand($maplen_min, $maplen_max);

    $fh = fopen($fname, "w");
    $map_length = 1;
    fwrite($fh, output_map($config, $maplen, $map_length));

    $map_length -= rand($mappar_min,$mappar_max);
    if ($map_length < 2) $map_length = 2;
    $map_pars[$x] = $map_length;

    fclose($fh);
  }

  $backgrounds = array("blk_org", "blues", "greens", "greys", "org_yel", "pastel", "purples", "red_blu", "red_wht");

  $fname = sprintf("%s/holes-rnd%s.txt", $tempdir_base, $coursebase);
  $filelist[] = $fname;
  $fh = fopen($fname, "w");
  fwrite($fh, "rndmap-$coursebase/rndmap.jpg\n");
  fwrite($fh, "Randomly generated\\$num_levels hole course\\ \\ \\".date("Y-m-d H:i:s")."\n");
  for ($x = 0; $x < $num_levels; $x++) {
    $num_shots = 12;
    if ($num_shots > $map_pars[$x]) $num_shots = $map_pars[$x];
    if (!isset($bg) || (rand(0,100) < 25))
      $bg = $backgrounds[array_rand($backgrounds)];
    if (!isset($bgm) || (rand(0,100) < 25))
      $bgm = rand(1,5);
    $line = sprintf("rndmap-%s/%02d.sol  back/%s.png  %d  bgm/track%d.ogg\n", $coursebase, ($x+1), $bg, $num_shots, $bgm);
    if ($x == 0) fwrite($fh, $line);
    fwrite($fh, $line);
  }
  fclose($fh);

  $f = array();

  foreach ($filelist as $tmp) {
    $f[] = substr($tmp, strlen($tempdir_base)+1);
  }

  copy('rndmap.jpg', $tempdir_base."/rndmap-$coursebase/rndmap.jpg");
  $f[] = "rndmap-$coursebase/rndmap.jpg";

  chdir($tempdir_base);

  $files = implode(' ', $f);

  switch ($_POST['packer']) {
  case 'tar.gz':
  default:
      system('tar -cf rndmap-'.$coursebase.'.tar '.$files);
      system('gzip rndmap-'.$coursebase.'.tar');
      $puttfile = 'rndmap-'.$coursebase.'.tar.gz';
      $_POST['packer'] = 'tar.gz';
      break;
  case 'zip':
      system('zip -q rndmap-'.$coursebase.'.zip '.$files);
      $puttfile = 'rndmap-'.$coursebase.'.zip';
      break;
  }

  setcookie('rndneverball-packer', $_POST['packer'], time()+60*60*24*365);

  header('Content-Type: application/octet-stream');
  header('Content-Length: '.filesize($puttfile));
  header('Content-Disposition: attachment; filename="'.$puttfile.'"');
  header('Content-Transfer-Encoding: binary');
  @readfile($puttfile);

  system('rm -rf '.$puttfile.' '.$files);
  system('rm -rf '.$tempdir);
  exit;

}

header('Content-type: text/html; charset=iso-8859-1');

function mk_select($name, $options, $selected='')
{
    $ret = '<select name="'.$name.'">'."\n";
    foreach ($options as $opt) {
	$ret .= '<option value="'.$opt['value'].'"';
	if (isset($opt['selected']) ||
	    $selected == $opt['name'] ||
	    (isset($_COOKIE['rndneverball-'.$name]) && $_COOKIE['rndneverball-'.$name] == $opt['value']))
	    $ret .= ' selected';
	$ret .= '>'.$opt['name'].'</option>'."\n";
    }
    $ret .= '</select>'."\n";
    return $ret;
}

$packer_opts = array(array('name' => 'Zip', 'value' => 'zip'),
		     array('name' => 'tar.gz', 'value' => 'tar.gz'));

?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Randomly generated Neverputt courses</title>
</head>
<body>

<h1>Randomly generated <a href="http://neverball.org/">Neverputt</a> courses</h1>

<span style="float:right;width:250px;padding:1em">
<img src="rnd1.png" alt="example level">
<img src="rnd2.png" alt="example level">
</span>

<p>Just click Generate, and you'll get a packed file which contains the course .map files, and the txt file describing the course.
Unpack the files into the neverputt data-dir.
<p>You will have to compile the map-files into sol-files with the mapc-program that comes with neverputt.
<p>
For example on linux you could do
<pre style="background:lightgrey;width:50em;padding:.5em">
for x in data/rndmap-12345/*.map; do ./mapc "$x" data; done
</pre>

<p><br>
<form method="POST" action="<?php phpself_querystr() ?>" name="f1">
<table style="background:lightgrey;padding:1em">
<tr><td>Number of levels:</td><td><input type="text" name="num_levels" size="2" maxlength="2" value="18"> (2 - 29)</td></tr>

<tr><td>Level lengths:</td><td><select name="lev_len">
<option value="0" selected>Default</option>
<option value="1">Short</option>
<option value="2">Medium</option>
<option value="3">Long</option>
<option value="4">Ridiculous</option>
</select>
 <label title="Earlier holes will generally be shorter and later holes longer"><input type="checkbox" name="lev_prog" checked>Progressive</label>
</td></tr>

<tr><td>Level pars:</td><td><select name="lev_par">
<option value="0">Easy</option>
<option value="1" selected>Normal</option>
<option value="2">Hard</option>
</select>
</td></tr>

<tr><td colspan="2"><input type="Submit" value="Generate"></td></tr>

<tr><td colspan="2"><hr></td></tr>

<tr><td>File type:</td><td><?php print mk_select('packer', $packer_opts); ?></td></tr>

</table>
</form>

<p><b>NOTE: The course generation will take a few seconds, so wait for the script to finish instead of clicking several times on the button.</b>

</body></html>