'.$firms.' '.podpis($firms).' (UZ)'.$text.''; } return $text; } # **************************************************************** # Результаты поиска на английском языке # **************************************************************** function english() { global $whered, $do, $fo; $lang=$lg; $f=$fo; $d=$do; $lg="en"; if ($lang==$lg) { return; } $f=mb_strtolower($f, 'UTF-8'); $f=preg_replace("/[\"'\/\_\+=,\\\.\#\$\!\?\*\^\&\[\]\|;\(\)[:space:]]+/s", " ", " $f "); $f=preg_replace("/ (http|www|at|in|on|from|to|since|till|into|onto|before|after|about|for|during|of|with|by|between|among|except|besides|over|below|out|behind|it|is|are|the|a) /su", " ", $f); $f=trim($f); if (preg_match("/^[^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ .*$/sDu", $f)) { $f=preg_replace("/^([^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+) .*$/sDu", "\\1", $f); } $f=trim(preg_replace("/s /su", " ", $f)); $f=str_replace("'", "", preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", preg_replace("/[[:space:]]+/s", " ", trim($f)))); $f=preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", $f); if (!$f) { return; } $slov=explode(" ", $f); $nslov=count($slov); $qw=''; for ($j=0; $j<$nslov; $j++) { $word=trim($slov[$j]); @ $b=mb_substr($word, 0, 3, 'utf-8'); $c=md5($b); $c1=substr($c, 0, 1); $c2=substr($c, 1, 1); $c3=substr($c, 2, 1); $c=$c1.$c2.$c3; if ($qw) { $qw.=' or'; } $qw.=" b='$c'"; } if (!$qw) { return; } $dbi=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/words.db'); $word=$dbi->querySingle("select b from words where$qw order by n limit 1"); $dbi=null; if (!$word) { return; } $s1=substr($word, 0, 1); $s2=substr($word, 1, 1); $s3=substr($word, 2, 1); $where=" where$whered search like '% ".str_replace(" ", "%' and search like '% ", $f)."%'"; $where=preg_replace("/ (\d)/s", "\\1", $where); if (mb_strlen($word, 'utf-8')<3) { $where=""; } $db=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/'.$s1.'/'.$s2.'/'.$s3.'.db'); $firms=$db->querySingle("select count(*) from companies$where"); $db=null; if ($firms<1) { return; } return ', '.$firms.' '.podpis($firms).' ('.strtoupper($lg).')'; } # **************************************************************** # Результаты поиска на русском языке # **************************************************************** function russian() { global $whered, $do, $fo; $lang=$lg; $f=$fo; $d=$do; $lg="ru"; if ($lang==$lg) { return; } $f=str_replace('ё', 'е', mb_strtolower($f, 'UTF-8')); $f=preg_replace("/[\"'\/\_\+=,\\\.\#\$\!\?\*\^\&\[\]\|;\(\)[:space:]]+/s", " ", " $f "); $f=preg_replace("/ (в|без|до|из|к|на|по|о|от|перед|при|через|с|у|за|над|для|об|под|про|около|после|несмотря|спустя|г|ул|пр|и|или) /su", " ", $f); $f=trim($f); if (preg_match("/^[а-яa-z0-9]+ [а-яa-z0-9]+ [а-яa-z0-9]+ [а-яa-z0-9]+ [а-яa-z0-9]+ .*$/sDu", $f)) { $f=preg_replace("/^([а-яa-z0-9]+ [а-яa-z0-9]+ [а-яa-z0-9]+ [а-яa-z0-9]+ [а-яa-z0-9]+) .*$/sDu", "\\1", $f); } $f=trim(preg_replace("/\b([^[:space:]]{1,3})\b/su", "(\\1)", $f)); $f=trim(preg_replace("/[аяиюыойуеьъ]{1,2} /su", " ", $f)); $f=trim(preg_replace("/[\(\)]/su", "", $f)); $f=str_replace("'", "", preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", preg_replace("/[[:space:]]+/s", " ", trim($f)))); $f=preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", $f); if (!$f) { return; } $slov=explode(" ", $f); $nslov=count($slov); $qw=''; for ($j=0; $j<$nslov; $j++) { $word=trim($slov[$j]); @ $b=mb_substr($word, 0, 3, 'utf-8'); $c=md5($b); $c1=substr($c, 0, 1); $c2=substr($c, 1, 1); $c3=substr($c, 2, 1); $c=$c1.$c2.$c3; if ($qw) { $qw.=' or'; } $qw.=" b='$c'"; } if (!$qw) { return; } $dbi=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/words.db'); $word=$dbi->querySingle("select b from words where$qw order by n limit 1"); $dbi=null; if (!$word) { return; } $s1=substr($word, 0, 1); $s2=substr($word, 1, 1); $s3=substr($word, 2, 1); $where=" where$whered search like '% ".str_replace(" ", "%' and search like '% ", $f)."%'"; $where=preg_replace("/ (\d)/s", "\\1", $where); if (mb_strlen($word, 'utf-8')<3) { $where=""; } $db=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/'.$s1.'/'.$s2.'/'.$s3.'.db'); $firms=$db->querySingle("select count(*) from companies$where"); $db=null; if ($firms<1) { return; } return ', '.$firms.' '.podpis($firms).' ('.strtoupper($lg).')'; } # **************************************************************** # Результаты поиска на испанском языке # **************************************************************** function spanish() { global $whered, $do, $fo; $lang=$lg; $f=$fo; $d=$do; $lg="es"; if ($lang==$lg) { return; } $f=str_replace('ё', 'е', mb_strtolower($f, 'UTF-8')); $f=preg_replace("/[\"'\/\_\+=,\\\.\#\$\!\?\*\^\&\[\]\|;\(\)[:space:]]+/s", " ", " $f "); $f=preg_replace("/ (http|www) /su", " ", $f); $f=trim($f); if (preg_match("/^[a-z0-9]+ [a-z0-9]+ [a-z0-9]+ [a-z0-9]+ [a-z0-9]+ .*$/sDu", $f)) { $f=preg_replace("/^([a-z0-9]+ [a-z0-9]+ [a-z0-9]+ [a-z0-9]+ [a-z0-9]+) .*$/sDu", "\\1", $f); } $f=trim(preg_replace("/\b([^[:space:]]{1,3})\b/su", "(\\1)", $f)); $f=trim(preg_replace("/[s]{1,2} /su", " ", $f)); $f=trim(preg_replace("/[\(\)]/su", "", $f)); $f=str_replace("'", "", preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", preg_replace("/[[:space:]]+/s", " ", trim($f)))); $f=preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", $f); if (!$f) { return; } $slov=explode(" ", $f); $nslov=count($slov); $qw=''; for ($j=0; $j<$nslov; $j++) { $word=trim($slov[$j]); @ $b=mb_substr($word, 0, 3, 'utf-8'); $c=md5($b); $c1=substr($c, 0, 1); $c2=substr($c, 1, 1); $c3=substr($c, 2, 1); $c=$c1.$c2.$c3; if ($qw) { $qw.=' or'; } $qw.=" b='$c'"; } if (!$qw) { return; } $dbi=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/words.db'); $word=$dbi->querySingle("select b from words where$qw order by n limit 1"); $dbi=null; if (!$word) { return; } $s1=substr($word, 0, 1); $s2=substr($word, 1, 1); $s3=substr($word, 2, 1); $where=" where$whered search like '% ".str_replace(" ", "%' and search like '% ", $f)."%'"; $where=preg_replace("/ (\d)/s", "\\1", $where); if (mb_strlen($word, 'utf-8')<3) { $where=""; } $db=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/'.$s1.'/'.$s2.'/'.$s3.'.db'); $firms=$db->querySingle("select count(*) from companies$where"); $db=null; if ($firms<1) { return; } return ', '.$firms.' '.podpis($firms).' ('.strtoupper($lg).')'; } # **************************************************************** # Результаты поиска на французском языке # **************************************************************** function french() { global $whered, $do, $fo; $lang=$lg; $f=$fo; $d=$do; $lg="fr"; if ($lang==$lg) { return; } $f=mb_strtolower($f, 'UTF-8'); $f=preg_replace("/[\"'\/\_\+=,\\\.\#\$\!\?\*\^\&\[\]\|;\(\)[:space:]]+/s", " ", " $f "); $f=preg_replace("/ (http|www|à|après|avant|avec|chez|contre|dans|de|dedans|depuis|derrière|dès|dessous|dessus|devant|durant|en|entre|envers|environ|excepté|hors|hormis|jusque|malgré|outre|par|par-delà|parmi|pendant|pour|sans|sauf|selon|sous|sur|tandis|vers|vers|us|via|vu|un|une|des|le|la|les|du|d) /su", " ", $f); $f=trim($f); if (preg_match("/^[a-z0-9]+ [a-z0-9]+ [a-z0-9]+ [a-z0-9]+ [a-z0-9]+ .*$/sDu", $f)) { $f=preg_replace("/^([a-z0-9]+ [a-z0-9]+ [a-z0-9]+ [a-z0-9]+ [a-z0-9]+) .*$/sDu", "\\1", $f); } $f=trim(preg_replace("/\b([^[:space:]]{1,3})\b/su", "(\\1)", $f)); $f=trim(preg_replace("/[seau]{1,2} /su", " ", $f)); $f=trim(preg_replace("/[\(\)]/su", "", $f)); $f=str_replace("'", "", preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", preg_replace("/[[:space:]]+/s", " ", trim($f)))); $f=preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", $f); if (!$f) { return; } $slov=explode(" ", $f); $nslov=count($slov); $qw=''; for ($j=0; $j<$nslov; $j++) { $word=trim($slov[$j]); @ $b=mb_substr($word, 0, 3, 'utf-8'); $c=md5($b); $c1=substr($c, 0, 1); $c2=substr($c, 1, 1); $c3=substr($c, 2, 1); $c=$c1.$c2.$c3; if ($qw) { $qw.=' or'; } $qw.=" b='$c'"; } if (!$qw) { return; } $dbi=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/words.db'); $word=$dbi->querySingle("select b from words where$qw order by n limit 1"); $dbi=null; if (!$word) { return; } $s1=substr($word, 0, 1); $s2=substr($word, 1, 1); $s3=substr($word, 2, 1); $where=" where$whered search like '% ".str_replace(" ", "%' and search like '% ", $f)."%'"; $where=preg_replace("/ (\d)/s", "\\1", $where); if (mb_strlen($word, 'utf-8')<3) { $where=""; } $db=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/'.$s1.'/'.$s2.'/'.$s3.'.db'); $firms=$db->querySingle("select count(*) from companies$where"); $db=null; if ($firms<1) { return; } return ', '.$firms.' '.podpis($firms).' ('.strtoupper($lg).')'; } # **************************************************************** # Результаты поиска на немецком языке # **************************************************************** function german() { global $whered, $do, $fo; $lang=$lg; $f=$fo; $d=$do; $lg="de"; if ($lang==$lg) { return; } $f=mb_strtolower($f, 'UTF-8'); $f=preg_replace("/[\"'\/\_\+=,\\\.\#\$\!\?\*\^\&\[\]\|;\(\)[:space:]]+/s", " ", " $f "); $f=preg_replace("/ (http|www|at|in|on|from|to|since|till|into|onto|before|after|about|for|during|of|with|by|between|among|except|besides|over|below|out|behind|it|is|are|the|a) /su", " ", $f); $f=trim($f); if (preg_match("/^[^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ .*$/sDu", $f)) { $f=preg_replace("/^([^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+) .*$/sDu", "\\1", $f); } $f=trim(preg_replace("/s /su", " ", $f)); $f=str_replace("'", "", preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", preg_replace("/[[:space:]]+/s", " ", trim($f)))); $f=preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", $f); if (!$f) { return; } $slov=explode(" ", $f); $nslov=count($slov); $qw=''; for ($j=0; $j<$nslov; $j++) { $word=trim($slov[$j]); @ $b=mb_substr($word, 0, 3, 'utf-8'); $c=md5($b); $c1=substr($c, 0, 1); $c2=substr($c, 1, 1); $c3=substr($c, 2, 1); $c=$c1.$c2.$c3; if ($qw) { $qw.=' or'; } $qw.=" b='$c'"; } if (!$qw) { return; } $dbi=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/words.db'); $word=$dbi->querySingle("select b from words where$qw order by n limit 1"); $dbi=null; if (!$word) { return; } $s1=substr($word, 0, 1); $s2=substr($word, 1, 1); $s3=substr($word, 2, 1); $where=" where$whered search like '% ".str_replace(" ", "%' and search like '% ", $f)."%'"; $where=preg_replace("/ (\d)/s", "\\1", $where); if (mb_strlen($word, 'utf-8')<3) { $where=""; } $db=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/'.$s1.'/'.$s2.'/'.$s3.'.db'); $firms=$db->querySingle("select count(*) from companies$where"); $db=null; if ($firms<1) { return; } return ', '.$firms.' '.podpis($firms).' ('.strtoupper($lg).')'; } # **************************************************************** # Результаты поиска на чешском языке # **************************************************************** function czech() { global $whered, $do, $fo; $lang=$lg; $f=$fo; $d=$do; $lg="cz"; if ($lang==$lg) { return; } $f=mb_strtolower($f, 'UTF-8'); $f=preg_replace("/[\"'\/\_\+=,\\\.\#\$\!\?\*\^\&\[\]\|;\(\)[:space:]]+/s", " ", " $f "); $f=preg_replace("/ (в|без|до|из|к|на|по|о|от|перед|при|через|с|у|за|над|для|об|под|про|около|после|несмотря|спустя|г|ул|пр|и|или) /su", " ", $f); $f=trim($f); if (preg_match("/^[^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ .*$/sDu", $f)) { $f=preg_replace("/^([^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+) .*$/sDu", "\\1", $f); } $f=trim(preg_replace("/\b([^[:space:]]{1,3})\b/su", "(\\1)", $f)); $f=trim(preg_replace("/[аяиюыойуеьъ]{1,2} /su", " ", $f)); $f=trim(preg_replace("/[\(\)]/su", "", $f)); $f=str_replace("'", "", preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", preg_replace("/[[:space:]]+/s", " ", trim($f)))); $f=preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", $f); if (!$f) { return; } $slov=explode(" ", $f); $nslov=count($slov); $qw=''; for ($j=0; $j<$nslov; $j++) { $word=trim($slov[$j]); @ $b=mb_substr($word, 0, 3, 'utf-8'); $c=md5($b); $c1=substr($c, 0, 1); $c2=substr($c, 1, 1); $c3=substr($c, 2, 1); $c=$c1.$c2.$c3; if ($qw) { $qw.=' or'; } $qw.=" b='$c'"; } if (!$qw) { return; } $dbi=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/words.db'); $word=$dbi->querySingle("select b from words where$qw order by n limit 1"); $dbi=null; if (!$word) { return; } $s1=substr($word, 0, 1); $s2=substr($word, 1, 1); $s3=substr($word, 2, 1); $where=" where$whered search like '% ".str_replace(" ", "%' and search like '% ", $f)."%'"; $where=preg_replace("/ (\d)/s", "\\1", $where); if (mb_strlen($word, 'utf-8')<3) { $where=""; } $db=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/'.$s1.'/'.$s2.'/'.$s3.'.db'); $firms=$db->querySingle("select count(*) from companies$where"); $db=null; if ($firms<1) { return; } return ', '.$firms.' '.podpis($firms).' ('.strtoupper($lg).')'; } # **************************************************************** # Результаты поиска на латышском языке # **************************************************************** function latvian() { global $whered, $do, $fo; $lang=$lg; $f=$fo; $d=$do; $lg="lv"; if ($lang==$lg) { return; } $f=mb_strtolower($f, 'UTF-8'); $f=preg_replace("/[\"'\/\_\+=,\\\.\#\$\!\?\*\^\&\[\]\|;\(\)[:space:]]+/s", " ", " $f "); $f=preg_replace("/ (uz|pie|no|aiz|virs|zem|pirms|vai|pēc|bez|dēļ|ar|par|pār|gar|pret|starp|ра|ap|ko|līdz|līdzi|caur) /su", " ", $f); $f=trim($f); if (preg_match("/^[^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ .*$/sDu", $f)) { $f=preg_replace("/^([^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+) .*$/sDu", "\\1", $f); } $f=trim(preg_replace("/\b([^[:space:]]{1,3})\b/su", "(\\1)", $f)); $f=trim(preg_replace("/[aāeēiījouūs]{1,2} /su", " ", $f)); $f=trim(preg_replace("/[\(\)]/su", "", $f)); $f=str_replace("'", "", preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", preg_replace("/[[:space:]]+/s", " ", trim($f)))); $f=preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", $f); if (!$f) { return; } $slov=explode(" ", $f); $nslov=count($slov); $qw=''; for ($j=0; $j<$nslov; $j++) { $word=trim($slov[$j]); @ $b=mb_substr($word, 0, 3, 'utf-8'); $c=md5($b); $c1=substr($c, 0, 1); $c2=substr($c, 1, 1); $c3=substr($c, 2, 1); $c=$c1.$c2.$c3; if ($qw) { $qw.=' or'; } $qw.=" b='$c'"; } if (!$qw) { return; } $dbi=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/words.db'); $word=$dbi->querySingle("select b from words where$qw order by n limit 1"); $dbi=null; if (!$word) { return; } $s1=substr($word, 0, 1); $s2=substr($word, 1, 1); $s3=substr($word, 2, 1); $where=" where$whered search like '% ".str_replace(" ", "%' and search like '% ", $f)."%'"; $where=preg_replace("/ (\d)/s", "\\1", $where); if (mb_strlen($word, 'utf-8')<3) { $where=""; } $db=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/'.$s1.'/'.$s2.'/'.$s3.'.db'); $firms=$db->querySingle("select count(*) from companies$where"); $db=null; if ($firms<1) { return; } return ', '.$firms.' '.podpis($firms).' ('.strtoupper($lg).')'; } # **************************************************************** # Результаты поиска на узбекском языке # **************************************************************** function uzbek() { global $whered, $do, $fo; $lang=$lg; $f=$fo; $d=$do; $lg="uz"; if ($lang==$lg) { return; } $f=mb_strtolower($f, 'UTF-8'); $f=str_replace("'", "`", $f); $f=preg_replace("/[\"'\/\_\+=,\\\.\#\$\!\?\*\^\&\[\]\|;\(\)[:space:]]+/s", " ", " $f "); $f=preg_replace("/ (http|www|at|in|on|from|to|since|till|into|onto|before|after|about|for|during|of|with|by|between|among|except|besides|over|below|out|behind|it|is|are|the|a) /su", " ", $f); $f=trim($f); if (preg_match("/^[^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ .*$/sDu", $f)) { $f=preg_replace("/^([^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+ [^ ]+) .*$/sDu", "\\1", $f); } $f=trim(preg_replace("/s /su", " ", $f)); $f=str_replace("'", "", preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", preg_replace("/[[:space:]]+/s", " ", trim($f)))); $f=preg_replace("/(\d)[\(\)[:space:]\-](\d)/s", "\\1\\2", $f); if (!$f) { return; } $slov=explode(" ", $f); $nslov=count($slov); $qw=''; for ($j=0; $j<$nslov; $j++) { $word=trim($slov[$j]); @ $b=mb_substr($word, 0, 3, 'utf-8'); $c=md5($b); $c1=substr($c, 0, 1); $c2=substr($c, 1, 1); $c3=substr($c, 2, 1); $c=$c1.$c2.$c3; if ($qw) { $qw.=' or'; } $qw.=" b='$c'"; } if (!$qw) { return; } $dbi=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/words.db'); $word=$dbi->querySingle("select b from words where$qw order by n limit 1"); $dbi=null; if (!$word) { return; } $s1=substr($word, 0, 1); $s2=substr($word, 1, 1); $s3=substr($word, 2, 1); $where=" where$whered search like '% ".str_replace(" ", "%' and search like '% ", $f)."%'"; $where=preg_replace("/ (\d)/s", "\\1", $where); if (mb_strlen($word, 'utf-8')<3) { $where=""; } $db=new SQLite3('/usr/home/pmm/firmscan/search/'.$lg.'/'.$s1.'/'.$s2.'/'.$s3.'.db'); $firms=$db->querySingle("select count(*) from companies$where"); $db=null; if ($firms<1) { return; } return ', '.$firms.' '.podpis($firms).' ('.strtoupper($lg).')'; } ?>