<?PHP
/*
Version:  1.002

History:
1.002  Artur Cieślak  2008-06-15
       Poprawiono wywołanie funkcji xcopy() - parametry były zamienione miejscami.
1.001  Artur Cieślak  2008-04-16
       Usunięto użycie 2 wywołań programu par z opcjami kolejno c (create) i a (append)
       wywołania te zastąpiono funkcją copy.
*/
$GLOBALS["UPDATED"]+=$GLOBALS["upd"];


$GLOBALS["ALLOW_EXEC"]=0;
if(($GLOBALS["UPDATED"] >= $GLOBALS["DIRTY"]) || isset($_GET["force_dirty_clean"])) {

  if(isset($GLOBALS["DBFNAGL"]) && ($GLOBALS["DBFNAGL"]!="")) {
    $ndbf = sprintf("%s.new",$GLOBALS["DBFNAGL"]);

    xcopy($GLOBALS["DBFNAGL"],$ndbf);

    exec(sprintf("%s q '%s'",$GLOBALS["PAR_PATH"],$ndbf),$tmpwyn5);

    @unlink($GLOBALS["DBFNAGL"]);
    xrename($ndbf,$GLOBALS["DBFNAGL"]);
    chmod($GLOBALS["DBFNAGL"],0666);
  }

  $ndbf = sprintf("%s.new",$GLOBALS["DBFILE"]);

  xcopy($GLOBALS["DBFILE"],$ndbf);
  exec(sprintf("%s q '%s'",$GLOBALS["PAR_PATH"],$ndbf),$tmpwyn5);

  @unlink($GLOBALS["DBFILE"]);
  xrename($ndbf,$GLOBALS["DBFILE"]);
  chmod($GLOBALS["DBFILE"],0666);

  $GLOBALS["ALLOW_EXEC"]=1;
}

// zapisać nowe dane o sesji;
$fp = @fopen($sesfile,"a+");
if($fp) {
  fputs($fp,'<?PHP');
  fputs($fp,"\n");
  fputs($fp,sprintf('$GLOBALS["UPDATED"]=%d;',$GLOBALS["UPDATED"]));
  fputs($fp,"\n");
  fputs($fp,'?>');
  fclose($fp);
  echo "OK";
} else {
  applog(sprintf("Error: Nieudana próba zapisu danych do pliku sesji [%s][potw_2_sp.inc]",$sesfile));
  echo "NO - nie zapisano danych";
}

?>