<?

  define('FPDF_FONTPATH',$_SERVER['DOCUMENT_ROOT'].'/tools/fonts/');
  require($_SERVER['DOCUMENT_ROOT'].'/tools/fpdf.php');

  $urkunde=new FPDF();
  $urkunde->Open();
  $urkunde->AddPage();
  $urkunde->AliasNbPages();

  $q_type=$_REQUEST['type'];
  $q_event=$_REQUEST['event'];
  $q_jahr=$_REQUEST['Jahr'];
  $q_lgr=$_REQUEST['lgr'];
  $q_stnr=$_REQUEST['stnr'];
  $akt_foto=$_REQUEST['akt_foto'];
  $q_group=$_REQUEST['group'];

  $logfile=fopen ($_SERVER['DOCUMENT_ROOT']."/../data/urkunden.log","a");
  fputs($logfile,sprintf("%s\t%s\t%s\t%s\t%s\t%s\n",date("m.d.Y G:i:s"),$q_type,$q_event,$q_jahr,$q_lgr,$q_stnr,$q_group));
  fclose($logfile);

  if($q_group == "staffel")
  { $ergfile=fopen ($_SERVER['DOCUMENT_ROOT']."/../data/erg/$q_type/$q_event/erg".$q_jahr."s".$q_lgr,"r");} else {
    $ergfile=fopen ($_SERVER['DOCUMENT_ROOT']."/../data/erg/$q_type/$q_event/erg".$q_jahr.$q_lgr,"r");}

  $fotofile=$_SERVER['DOCUMENT_ROOT']."/../data/erg/$q_type/$q_event/pics".$q_jahr."/".$akt_foto;
  while (!feof($ergfile)) {
    $line=fgets($ergfile,4096);

    list($name,$vorname,$nachname,$str,$plz,$ort,$nation,$telefon,
    $verein,$jg,$ak,$sex,$geszeit,$bemerk,$jn,
    $stnr,$stgr,$szeit,$rzeit,$lzeit,$gzeit,$status,$platz,$akplatz,$gruppe)
    =split("\t",utf8_decode($line));
    $akplatz=rtrim($akplatz);

    if($stnr==$q_stnr) {
      if($q_group == "staffel")
      { $urkname=$_SERVER['DOCUMENT_ROOT']."/../data/erg/$q_type/$q_event/urk".$q_jahr."s".$q_lgr; } else {
        $urkname=$_SERVER['DOCUMENT_ROOT']."/../data/erg/$q_type/$q_event/urk".$q_jahr.$q_lgr; }
      $urkfile=fopen ($urkname,"r");
      $template = fread ($urkfile, filesize ($urkname));
      fclose ($urkfile);

      list($line,$rest)=split("\n",$template,2);
      while ($line!="") {

        list($command,$value)=split("=",$line,2);

        switch($command) {
          case "Foto" :
	    list($X,$Y,$w)=split(",",$value);
	    $urkunde->Image($fotofile,$X,$Y,$w);
	    break;
          case "Image" :
	    list($file,$X,$Y,$w,$h)=split(",",$value);
	    $urkunde->Image($_SERVER['DOCUMENT_ROOT']."/../data/erg/$q_type/$q_event/".$file,$X,$Y,$w,$h);
	    break;
          case "XY" :
            list($X,$Y)=split(",",$value);
            $urkunde->SetXY($X,$Y);
            break;
          case "Font" :
            list($font,$style,$size)=split(",",$value);
            $urkunde->SetFont($font,$style,$size);
            break;
          default:
	    list($width,$height,$border,$pos,$align,$text)=split(",",$value,6);
	    $text=str_replace("[Nachname]",$nachname,$text);
	    $text=str_replace("[Vorname]",$vorname,$text);
	    if($verein=="ohne Verein") $verein="";
	    $text=str_replace("[Verein]",$verein,$text);
	    $text=str_replace("[AK_lang]",$ak,$text);
	    $text=str_replace("[AKPlatz]",$akplatz,$text);
	    $text=str_replace("[Startnummer]",$stnr,$text);
	    $text=str_replace("[Gruppe]",$gruppe,$text);
            while(preg_match("/\[([0-9]*)\]/",$text,$reg)) {
	      switch($reg[1]) {
	      case "0" :
	        $tmp_time=$gzeit;
	        break;
	      case "1" :
	        $tmp_time=$szeit;
	        break;
	      case "2" :
	        $tmp_time=$rzeit;
	        break;
	      case "3" :
	        $tmp_time=$lzeit;
	        break;
              }
              $tmp_time=ereg_replace("^[0:]*","",$tmp_time);
              $tmp_time=ereg_replace("[ ]*$","",$tmp_time);
              $len=strlen($tmp_time);

              if($len<3) {
                //Sekunden
                $tmp_time.=" Sek.";
              } else if($len<6) {
                //Minuten
                $tmp_time.=" Min.";
              } else {
                //Stunden
                $tmp_time.=" Std.";
              }

              $text=str_replace("[".$reg[1]."]",$tmp_time,$text);
            }
            $urkunde->Cell($width,$height,$text,$border,$pos,$align);
	    break;
        }

        list($line,$rest)=split("\n",$rest,2);
      }

      break;
    }
  }
  fclose ($ergfile);

  $urkunde->Output();
  $urkunde->Close();

?>