<?
ini_set('memory_limit', '1024M');
set_time_limit(0);
error_reporting(55);
set_include_path(get_include_path().
PATH_SEPARATOR . 'Classes/');
include_once 'PHPExcel/IOFactory.php';
include_once "PHPExcel/Writer/Excel5.php";
 if (!$_GET['file'])   $inif=1; else $inif=$_GET['file'];
$config=parse_ini_file('conf'.$inif.'.ini',TRUE);

$data=get_row($config['FILE']['template'],$config['KEY']['template']);
$data2=get_row($config['FILE']['work'],$config['KEY']['work']);

$result=find_matches ($data,$data2);
#print_r ($result);
$next=$config['REPLACE'];
    foreach ($next as $key){
     $kk++;
     $pos=strpos($key,'-');
     $gett[$kk]=substr($key,++$pos);
     $ins[$kk]=substr($key,0,--$pos);

   $for_insert[]=get_row($config['FILE']['work'],$gett[$kk]);
    }
if ($_POST['decide']){
 $i_all=0;
  foreach ($_POST as $decided) {
if (($decided==1)||($decided=='')) continue;
 $result[]=$decided;
 }
}
if (($config['KEY']['auto_mode']==0)&($i_all>0)) make_choise($strange);

if (($config['KEY']['auto_mode']==1)||($i_all==0)) $flag=1;
if ($flag==1){
$pasted=paste_data ($next,$result,$config,$for_insert);
 if ($config['KEY']['auto_mode']==1){
$pasted.='<br>Проигнорированы следующие неоднозначности';
if (!empty($strange)){
foreach ($strange as $str) {
$pasted.='<br>';

foreach ($str as $str2){
$pos=strpos($str2,'_');
$in_work=substr($str2,0,$pos);
$in_temp=substr($str2,++$pos);
$k=$data[$in_work];
$pasted.=" <b>$str2</b> (".$k." - $data2[$in_temp]) ";
}
}
}
 }

echo form_report($pasted);
}

function make_choise($strange){
global $data,$data2,$config;
$kkk=0;
$i_prev=0;
$i_next=0;
foreach ($config['HELPER'] as $helper){
if ($helper<$config['KEY']['work']) {$prev[$i_prev]=get_row($config['FILE']['work'],$helper);
$i_prev++;}
if ($helper>$config['KEY']['work']) $next[$i_next]=get_row($config['FILE']['work'],$helper);
$i_next++;
}

echo '<form action=index.php method=POST>';

foreach ($strange as $str) {
$output.='<select  name='.$kkk.'> <option value="">Не производить действий</option>';

foreach ($str as $str2){
$pos=strpos($str2,'_');
$in_work=substr($str2,0,$pos);
$in_temp=substr($str2,++$pos);
$k=$data[$in_work];
for($i=0;$i<$i_prev;$i++) $pprev.=" ".$prev[$i][$in_temp];
for($i=0;$i<$i_next;$i++) $pnext.=" ".$next[$i][$in_temp];
$output.=" <option value=$str2>$str2    ($pprev)   $data2[$in_temp]  ($pnext)</option> ";
unset ($pprev);
unset ($pnext);
}
$output.='</select>';
echo "<br> Неоднозначность! (В Шаблоне   -$data[$in_work] (строка $in_work)) ".$output;
unset ($sfk);
unset($output);
$kkk++;
}
echo "<br><input type=hidden name=decide value='1'><input type=submit value=Вперед ></form> ";
}
function paste_data ($next,$result,$config,$for_insert){
 global $gett,$ins;
$objPHPExcel = PHPExcel_IOFactory::load($config['FILE']['template']);
$objPHPExcel->setActiveSheetIndex(0);
$aSheet = $objPHPExcel->getActiveSheet();
#print_r ($result);
if (empty($result))  $flag=1;
if ($flag!=1){
 foreach ($result as $key){
$pos=strpos($key,'_');
$in_work=substr($key,0,$pos);
$in_temp=substr($key,++$pos);
$kk=0;
$pasted.="<br> Вставляем значения по строке $in_work";
foreach ($ins as $flag){
 # echo  "<br>в $flag.$in_work  ".$for_insert[$kk][$in_temp];
$aSheet->setCellValue($flag.$in_work, $for_insert[$kk][$in_temp]);
$kk++;
}
}
}
$objWriter = new PHPExcel_Writer_Excel5($objPHPExcel);
$objWriter->save($config['FILE']['result']);
$objPHPExcel->__destruct;
return $pasted;
}

function form_report($pasted){
global $config, $strange,$inif,$result;
$file=fopen('report.htm','w');
fputs ($file,$pasted);
fclose($file);
$ninif=$inif;
 $ninif=$ninif+1;
 if (file_exists('conf'.$ninif.'.ini')) $nfl='<br><a href=index.php?file='.$ninif.'>Перейти к обработке следующего файла </a> <br>';
if ((empty($result))||(($config[KEY][auto_mode]==1)&(empty($strange)))) $kdx='Ни одного совпадения не найдено'; else $kdx="если желаете, ознакомтесь с <a href=report.htm target=_blank>файлом отчета</a>  ";
echo "Обработка рабочего файла № $inif завершена, $kdx  $nfl<br> <a href=index.php> Старт с начала </a>";
}
function find_matches ($first,$second){
global $strange,$i_all;
$i_all=0;
foreach ($first as $prime){
 $stroka1++;
    if ($stroka1==1) continue;
    $stroka2=0;
    $f_first= strtolower($prime);
    $f_first=trim ($f_first);
    $i=0;
    $i_choise=0;
    if ($f_first=='') continue;
    foreach ($second as $slave){
     $prohod++;
    $stroka2++;
        $f_second= strtolower($slave);
        $f_second=trim ($f_second);
      $res=compare($f_first,$f_second);
   $dan=$stroka1.'_'.$stroka2;
            if ($res==1) {
           $choise[$i]=$dan;
              $i++;
            }
            if ($res==2)
            {

            $choise_i[$i_choise]=$dan;
            $i_choise++;
             }
         }
          if ($i==1) {
          $result[]=$choise[0];
          } else {
            if ($i>1){ foreach ($choise as $chs) $strange[$stroka1][]=$chs;
            $i_all++;
            unset ($chs);
            unset($choise);
            }
            }
            if (($i==0)&($i_choise==1)) {
             $result[]=$choise_i[0];
             unset($i_choise);
             $i_all++;
            }
            if ($i_choise>0){ foreach ($choise_i as $chsi) $strange[$stroka1][]=$chsi;
            $i_all++;
            unset($choise_i);
                        }
    }
return $result;
}

function compare ($a,$b){
global $config;

if ($a==$b) {
    return 1;
} else {
 $len=strlen($a);
if ($config['KEY']['special_mode']==0){
$code=2;
if (levenshtein($a,$b)<=$config['KEY']['simular']) {
 return $code;
  }
} else {
for ($f=0;$f<=(strlen($b)-strlen($a));$f++){
if (strpos($b,$a)!=FALSE) {
return 1;
break;
}
$try=substr($b,$f,strlen($a));
if (levenshtein($a,$try)<=$config['KEY']['simular']){
 return 2;
 break;
 }
}
}
}
}
function get_row($file,$therow){
$objPHPExcel = PHPExcel_IOFactory::load($file);
$objPHPExcel->setActiveSheetIndex(0);
$aSheet = $objPHPExcel->getActiveSheet();
$stroka=1;
    foreach($aSheet->getRowIterator() as $row){
    $stroka++;
    }
$objPHPExcel->__destruct;
$objPHPExcel = PHPExcel_IOFactory::load($file);
$objPHPExcel->setActiveSheetIndex(0);
$aSheet = $objPHPExcel->getActiveSheet();
for($i=1;$i<=$stroka;$i++){
$data[$i]=$aSheet->getCell($therow.$i)->getValue();
}
$objPHPExcel->__destruct;
return $data;
}
?>