}
if ($getorig) {
infra_admin(true);
}
if (!is_null($ignoremark)) {
infra_admin(true);
}
if ($getorig) {
infra_admin(true);
}
$gray = isset($_GET['gray']);
$args = array($src, $ignoremark, $mark, $default, $getorig, $w, $h, $crop, $top, $gray);
$data = infra_cache(array($isrc), 'imager.php', function ($src, $ignoremark, $mark, $default, $getorig, $w, $h, $crop, $top, $gray, $re) use($isrc) {
$p1 = infra_srcinfo($isrc);
//Нужна папка со звёздочкой
$p = infra_srcinfo($src);
if (in_array($p['ext'], array('docx', 'mht'))) {
die("docx, mht TODO");
/*
TODO: Смотрим подключён ли плагин files для того чтобы достать картинку и файла
*/
if (!infra_theme('*files/files.inc.php')) {
$default = true;
$src = infra_theme('*imager/noimage.png');
} else {
infra_require('*files/files.inc.php');
if ($re) {
$re = '&re';
} else {
$re = '';
}
}
$result = $file;
}, scandir(infra_theme($folder)));
if (!$result) {
return false;
}
return infra_theme($folder . $result);
}, array($fdata['path']), isset($_GET['re']));
$ans = array('src' => $isrc);
if (!$src) {
if (!infra_isphp()) {
header('HTTP/1.0 404 Not Found');
}
return;
}
$fdata = infra_srcinfo($src);
if (in_array($fdata['ext'], array('docx'))) {
$txt = files\Docx::get($src);
return Ans::txt($txt);
}
if (in_array($fdata['ext'], array('mht'))) {
$txt = files\Mht::get($src);
return Ans::txt($txt);
}
if (in_array($fdata['ext'], array('xls', 'xlsx'))) {
$ans = files\Xlsx::get($src);
return Ans::ans($ans);
}
if (in_array($fdata['ext'], array('tpl', 'html', 'htm', 'php'))) {
$txt = infra_loadTEXT($src);
return Ans::txt($txt);
public static function parse($src)
{
$src = infra_theme($src);
if (!$src) {
return;
}
$args = array($src);
return infra_cache(array($src), 'mhtparse', function ($src) {
$conf = infra_config();
$imgmaxwidth = $conf['files']['imgmaxwidth'];
$previewlen = $conf['files']['previewlen'];
$filename = infra_theme($src);
$fdata = infra_srcinfo($src);
if ($fdata['ext'] == 'php') {
$data = infra_loadTEXT($filename);
} else {
$data = file_get_contents($filename);
}
$ans = array();
if ($fdata['ext'] == 'mht') {
$p = explode('/', $filename);
$fname = array_pop($p);
$fnameext = $fname;
//$fname=basename($filename);
preg_match("/^(\\d*)/", $fname, $match);
$date = $match[0];
$fname = infra_toutf(preg_replace('/^\\d*\\s+/', '', $fname));
$fname = preg_replace('/\\.\\w{0,4}$/', '', $fname);
$ar = preg_split('/------=_NextPart_.*/', $data);
if (sizeof($ar) > 1) {
//На первом месте идёт информация о ворде...
unset($ar[0]);
unset($ar[sizeof($ar) - 1]);
}
$ar = array_values($ar);
$dirs = infra_dirs();
$folder = $dirs['cache'] . 'mht/' . md5($src) . '/';
@mkdir($folder);
$html = '';
for ($i = 0, $l = sizeof($ar); $i < $l; ++$i) {
if (!$ar[$i]) {
continue;
}
$d = preg_split("/\n/", $ar[$i], 6);
$j = -1;
do {
++$j;
} while (@$d[$j][0] !== 'C' && $j <= 5);
if ($j >= 5) {
/*
не нашли
Content-Location: file:///C:/0FCF1655/file9909.files/header.htm
Content-Transfer-Encoding: quoted-printable
Content-Type: text/html; charset="us-ascii"
*/
continue;
}
$location = preg_replace('/Content-Location: /', '', $d[$j]);
$location = trim($location);
$encoding = preg_replace('/Content-Transfer-Encoding: /', '', $d[$j + 1]);
$type = preg_replace('/Content-Type: /', '', $d[$j + 2]);
$content = $d[5];
$name = basename($location);
if (preg_match("/text\\/html/", $type) || preg_match('/Subject:/', $type)) {
$html .= $content;
} else {
@file_put_contents($folder . $name, base64_decode($content));
//Сохраняем картинку или тп...
}
}
if (!$html) {
$html = '';
}
$html = preg_replace("/=\r\n/", '', $html);
$html = preg_replace("/\\s+/", ' ', $html);
$html = preg_replace("/^.*<body .*>\\s*/U", '', $html, 1);
$html = preg_replace("/\\s*<\\/body>.*/", '', $html, 1);
$images = array();
preg_match_all('/src=3D".*\\.files\\/(image.+)"/U', $html, $match, PREG_PATTERN_ORDER);
for ($i = 0, $l = sizeof($match[1]); $i < $l; $i = $i + 2) {
$min = $match[1][$i + 1];
if (!$min) {
$min = $match[1][$i];
}
$images[$min] = $match[1][$i];
//Каждая следующая картинка есть уменьшенная копия предыдущей оригинального размера
}
$html = preg_replace("/<\\!--.*-->/U", '', $html);
$html = preg_replace("/<!\\[if !vml\\]>/", '', $html);
$html = preg_replace("/<!\\[endif\\]>/", '', $html);
$html = preg_replace('/=3D/', '=', $html);
$html = preg_replace('/align="right"/', 'align="right" class="right"', $html);
$html = preg_replace('/align="left"/', 'align="left" class="left"', $html);
$html = preg_replace('/align=right/', 'align="right" class="right"', $html);
$html = preg_replace('/align=left/', 'align="left" class="left"', $html);
$html = infra_toutf($html);
//Виндовые файлы хранятся в cp1251
$folder = infra_toutf($folder);
$html = preg_replace('/ src=".*\\/(.*)"/U', ' src="' . $folder . '${1}"', $html);
$html = preg_replace('/<span class=SpellE>(.*)<\\/span>/U', '${1}', $html);
$html = preg_replace('/<span lang=.*>(.*)<\\/span>/U', '${1}', $html);
$html = preg_replace('/<span class=GramE>(.*)<\\/span>/U', '${1}', $html);
$html = preg_replace("/<span style='mso.*>(.*)<\\/span>/U", '${1}', $html);
$html = preg_replace("/<span style='mso.*>(.*)<\\/span>/U", '${1}', $html);
$html = preg_replace("/<span style='mso.*>(.*)<\\/span>/U", '${1}', $html);
$html = preg_replace("/<span style='mso.*>(.*)<\\/span>/U", '${1}', $html);
$html = preg_replace('/ class=MsoNormal/U', '', $html);
$html = preg_replace('/<a name="_.*>(.*)<\\/a>/U', '${1}', $html);
//Приводим к единому виду маркерные списки
$patern = '/<p class=MsoListParagraphCxSp(\\w+) .*>(.*)<\\/p>/U';
$count = 3;
do {
preg_match($patern, $html, $match);
if (sizeof($match) == $count) {
$pos = strtolower($match[1]);
$text = $match[2];
$text = preg_replace('/^.*(<\\/span>)+/U', '', $text, 1);
$text = '<li>' . $text . '</li>';
if ($pos == 'first') {
$text = '<ul>' . $text;
}
if ($pos == 'last') {
$text = $text . '</ul>';
}
$html = preg_replace($patern, $text, $html, 1);
} else {
break;
}
} while (sizeof($match) == $count);
$title = $fname;
$patern = '/<img(.*)>/U';
$count = 2;
do {
preg_match($patern, $html, $match);
if (sizeof($match) == $count) {
$sfind = $match[1];
//$sfind='<img src="/image.asdf">';
preg_match("/width=(\\d*)/", $sfind, $match2);
$w = trim($match2[1]);
preg_match("/height=(\\d*)/", $sfind, $match2);
$h = trim($match2[1]);
if (!$w || $w > $imgmaxwidth) {
$w = $imgmaxwidth;
}
preg_match('/src="(.*\\/)(image.*)"/U', $sfind, $match2);
$path = trim($match2[1]);
$small = $match2[2];
preg_match('/alt="(.*)".*/U', $sfind, $match2);
$alt = trim(@$match2[1]);
$alt = html_entity_decode($alt, ENT_QUOTES, 'utf-8');
preg_match('/align="(.*)".*/U', $sfind, $match2);
$align = trim($match2[1]);
$align = html_entity_decode($align, ENT_QUOTES, 'utf-8');
$big = $images[$small];
if (!$big) {
$big = $small;
}
$isbig = preg_match('/#/', $alt);
if ($isbig) {
$alt = preg_replace('/#/', '', $alt);
}
//$i="<IMG title='$alt' src='?*imager/imager.php?w=$w&h=$h&src=".($path.$big)."' align='$align' class='$align' alt='$alt'>";
$i = "<IMG src='?*imager/imager.php?w={$w}&h={$h}&src=" . ($path . $big) . "' align='{$align}' class='{$align}'>";
//urlencode решает проблему с ie7 когда иллюстрации с адресом содержащим пробел не показываются
if ($isbig) {
$i = "<a target='about:blank' href='?*imager/imager.php?src=" . urlencode($path . $big) . "'>{$i}</a>";
}
//$i.='<textarea style="width:500px; height:300px">'.$i.'</textarea>';
$html = preg_replace($patern, $i, $html, 1);
} else {
break;
}
} while (sizeof($match) == $count);
$patern = "/###\\{(.*)\\}###/U";
//js код
do {
preg_match($patern, $html, $match);
if (sizeof($match) > 0) {
$param = $match[1];
$param = strip_tags($param);
$param = html_entity_decode($param, ENT_QUOTES, 'utf-8');
$param = preg_replace('/(‘|’)/', "'", $param);
$param = preg_replace('/(“|«|»|”)/', '"', $param);
$html = preg_replace($patern, $param, $html, 1);
} else {
break;
}
} while (sizeof($match) > 1);
$patern = "/####.*<table.*>(.*)<\\/table>.*####/U";
do {
preg_match($patern, $html, $match);
if (sizeof($match) > 0) {
$param = $match[1];
$param = preg_replace('/style=".*"/U', '', $param);
$param = preg_replace("/style='.*'/U", '', $param);
$html = preg_replace($patern, '<table class="table table-striped">' . $param . '</table>', $html, 1);
} else {
break;
}
} while (sizeof($match) > 1);
$ans['images'] = array();
foreach ($images as $img) {
$ans['images'][] = array('src' => $folder . $img);
}
} else {
$html = $data;
$images = array();
preg_match_all('/<img.*src="(.*)".*>/U', $html, $match, PREG_PATTERN_ORDER);
for ($i = 0, $l = sizeof($match[1]); $i < $l; $i++) {
$images[] = array('src' => $match[1][$i]);
//Каждая следующая картинка есть уменьшенная копия предыдущей оригинального размера
}
$ans['images'] = $images;
}
$r = preg_match('/<h.*>(.*)<\\/h.>/U', $html, $match);
if ($r) {
$heading = strip_tags($match[1]);
} else {
$heading = false;
}
$ans['heading'] = $heading;
preg_match_all('/<a.*href="(.*)".*>(.*)<\\/a>/U', $html, $match);
$links = array();
foreach ($match[1] as $k => $v) {
$title = strip_tags($match[2][$k]);
if (!$title) {
continue;
}
$links[] = array('title' => $title, 'href' => $match[1][$k]);
}
$ans['links'] = $links;
$html = trim($html);
$html = html_entity_decode($html, ENT_COMPAT, 'UTF-8');
$html = preg_replace('/
/U', '', $html);
//bugfix списки в mht порождаются адский символ. в eval-е скрипта недопустим.
$ans['html'] = $html;
return $ans;
}, $args);
}
public static function addFiles(&$pos, $dir = false)
{
$conf = infra_config();
$props = array('producer', 'article');
if (!isset($pos['images'])) {
$pos['images'] = array();
}
if (!isset($pos['texts'])) {
$pos['texts'] = array();
}
if (!isset($pos['files'])) {
$pos['files'] = array();
}
if (!$dir) {
$dir = array();
$pth = $conf['catalog']['dir'];
if (infra_forr($props, function &($name) use(&$dir, &$pos) {
$rname = infra_seq_right($name);
$val = infra_seq_get($pos, $rname);
if (!$val) {
return true;
}
$dir[] = $val;
$r = null;
return $r;
})) {
return;
}
if ($dir) {
$dir = implode('/', $dir) . '/';
$dir = $pth . $dir;
} else {
$dir = $pth;
}
}
$dir = infra_theme($dir);
if (!$dir) {
return false;
}
if (is_dir($dir)) {
$paths = glob($dir . '*');
} elseif (is_file($dir)) {
$paths = array($dir);
$p = infra_srcinfo($dir);
$dir = $p['folder'];
}
infra_forr($paths, function &($p) use(&$pos, $dir) {
$d = explode('/', $p);
$name = array_pop($d);
$n = infra_strtolower($name);
$fd = infra_nameinfo($n);
$ext = $fd['ext'];
//if(!$ext)return;
if (!is_file($dir . $name)) {
return;
}
//$name=preg_replace('/\.\w{0,4}$/','',$name);
/*$p=pathinfo($p);
$name=$p['basename'];
$ext=strtolower($p['extension']);*/
$dirs = infra_dirs();
$dir = preg_replace('/^' . str_replace('/', '\\/', $dirs['data']) . '/', '*', $dir);
$name = infra_toutf($dir . $name);
if ($name[0] == '.') {
return;
}
$im = array('png', 'gif', 'jpg');
$te = array('html', 'tpl', 'mht', 'docx');
if (infra_forr($im, function ($e) use($ext) {
if ($ext == $e) {
return true;
}
})) {
$pos['images'][] = $name;
} elseif (infra_forr($te, function ($e) use($ext) {
if ($ext == $e) {
return true;
}
})) {
$pos['texts'][] = $name;
} else {
if ($ext != 'db') {
$pos['files'][] = $name;
}
}
$r = null;
return $r;
});
$pos['images'] = array_unique($pos['images']);
$pos['texts'] = array_unique($pos['texts']);
$pos['files'] = array_unique($pos['files']);
}
$src = preg_replace("/\\.tpl\$/", '', $src);
$src = preg_replace("/\\.html\$/", '', $src);
$dirs = infra_dirs();
$src = str_replace($dirs['data'], '*', $src);
$filename = infra_theme($src . '.mht');
$ftype = 'mht';
if (!$filename) {
$ftype = 'tpl';
$filename = infra_theme($src . '.tpl', true);
if (!$filename) {
$ftype = 'html';
$filename = infra_theme($src . '.html');
}
//if(!$filename)$filename=infra_theme($src);
if ($filename) {
$p = infra_srcinfo($filename);
$ftype = $p['ext'];
}
}
if ($filename) {
//@header("Content-Type: text/plain");
$reparse = isset($_GET['re']);
//$reparse=true;//debug
$conf = infra_config();
if ($conf['files'] && $conf['files']['imgmaxwidth']) {
$imgmaxwidth = $conf['files']['imgmaxwidth'];
}
if (!$imgmaxwidth) {
$imgmaxwidth = 1000;
}
$imgmaxwidth = (int) $imgmaxwidth;
public static function getPos(&$pos)
{
$args = array($pos['producer'], $pos['article']);
return Catalog::cache('getPos', function () use($pos) {
Xlsx::addFiles($pos);
$files = explode(',', @$pos['Файлы']);
foreach ($files as $f) {
if (!$f) {
continue;
}
$f = trim($f);
$conf = infra_config();
Xlsx::addFiles($pos, $conf['catalog']['dir'] . $f);
}
$files = array();
foreach ($pos['files'] as $f) {
if (is_string($f)) {
$f = infra_theme($f);
//убрали звездочку
$d = infra_srcinfo(infra_toutf($f));
} else {
$d = $f;
$f = $d['src'];
}
$d['size'] = round(filesize(infra_tofs($f)) / 1000000, 2);
if (!$d['size']) {
$d['size'] = '0.01';
}
$files[] = $d;
}
$pos['files'] = $files;
if ($pos['texts']) {
foreach ($pos['texts'] as $k => $t) {
$pos['texts'][$k] = infra_loadTEXT('*files/get.php?' . $t);
}
}
return $pos;
}, $args);
}
public static function preview($src)
{
$param = self::parse($src);
$data = infra_srcinfo($src);
$data = infra_nameinfo($data['file']);
$patern = '/###cut###/U';
$d = preg_split($patern, $param['html']);
if (sizeof($d) > 1) {
$param['html'] = preg_replace($patern, '', $param['html']);
$preview = $d[0];
} else {
$temphtml = strip_tags($param['html'], '<p>');
//preg_match('/^(<p.*>.{'.$previewlen.'}.*<\/p>)/U',$temphtml,$match);
preg_match('/(<p.*>.{1}.*<\\/p>)/U', $temphtml, $match);
if (sizeof($match) > 1) {
$preview = $match[1];
} else {
$preview = $param['html'];
}
}
$preview = preg_replace('/<h1.*<\\/h1>/U', '', $preview);
$preview = preg_replace('/<img.*>/U', '', $preview);
$preview = preg_replace('/<p.*>\\s*<\\/p>/iU', '', $preview);
$preview = preg_replace("/\\s+/", ' ', $preview);
$preview = trim($preview);
/*preg_match('/<img.*src=["\'](.*)["\'].*>/U', $param['html'], $match);
if ($match && $match[1]) {
$img = $match[1];
} else {
$img = false;
}*/
$filetime = filemtime(infra_theme($src));
$data['modified'] = $filetime;
if (!empty($param['links'])) {
$data['links'] = $param['links'];
}
if (!empty($param['heading'])) {
$data['heading'] = $param['heading'];
}
//title - depricated
if (!empty($data['name'])) {
$data['title'] = $data['name'];
}
/*if ($img) {
$data['img'] = $img;
}*/
if (!empty($param['images'])) {
$data['images'] = $param['images'];
}
$data['preview'] = $preview;
return $data;
}
