subsets3

#!/usr/bin/php
<?php

define('n',"\n");
function olvasd($i){global $f_,$elsok;  if (($tmp=fgets($f_[$i])) !== false) {$elsok[$i]=trim($tmp);} else unset($elsok[$i]); }

$f_[]= @fopen('a', 'r');
$f_[]= @fopen('b', 'r');
$f_[]= @fopen('c', 'r');
$f_[]= @fopen('d', 'r');
$f_[]= @fopen('e', 'r');
$fsize=sizeof($f_); print $fsize." input files will be processed...".n;
for($i=0;$i<pow(2,$fsize);$i++){$tmp='f'.str_pad(decbin($i),$fsize,'0',STR_PAD_LEFT); $$tmp=@fopen($tmp,'w'); /* print str_pad(decbin($i),4,'0',STR_PAD_LEFT)."\n"; */ }
//$f0..00=@fopen('f0..00', 'w');
//..
//$f1..11=@fopen('f1..11', 'w');

$elsok=array(); for($i=0;$i<$fsize;$i++) olvasd($i);

while (!empty($elsok)) {
    asort($elsok); $elso_k=array_keys($elsok); $kiirni=$elsok[$elso_k[0]]; $fajlnev="f";
    for($i=0;$i<$fsize;$i++) {if ((array_key_exists($i,$elsok))&&($kiirni==$elsok[$i])) {$fajlnev.="1"; olvasd($i);} else {$fajlnev.="0";}}
    fwrite($$fajlnev, $kiirni.n);
}

for($i=0;$i<      $fsize; $i++) if (!feof($f_[$i])) {echo "Hiba: varatan fgets() problema.".n;} ;
for($i=0;$i<      $fsize; $i++)    fclose($f_[$i]);
for($i=0;$i<pow(2,$fsize);$i++){$tmp='f'.str_pad(decbin($i),$fsize,'0',STR_PAD_LEFT); fclose($$tmp); print $tmp." file created.\n"; }

/* 5 input files will be processed...
f00000 file created.
f00001 file created.
f00010 file created.
f00011 file created.
f00100 file created.
f00101 file created.
f00110 file created.
f00111 file created.
f01000 file created.
f01001 file created.
f01010 file created.
f01011 file created.
f01100 file created.
f01101 file created.
f01110 file created.
f01111 file created.
f10000 file created.
f10001 file created.
f10010 file created.
f10011 file created.
f10100 file created.
f10101 file created.
f10110 file created.
f10111 file created.
f11000 file created.
f11001 file created.
f11010 file created.
f11011 file created.
f11100 file created.
f11101 file created.
f11110 file created.
f11111 file created.

real    0m10.329s
user    0m8.437s
sys 0m1.880s
*/
?>