Запись [f:_dev/util/translate.php] < dev.sky.1.001

<?php defined('START') or die;
 
@$g_id or $g_id = 1;
$def = @sql("+select lang from _lang where imemo=1", 0);
$insert = "insert into _lang (lang, imemo, tmemo, dt) values ('%s', %d, %s, now())";
 
function parse_data($in, &$t, &$err) {
    $a = [];
    $t = '';
    foreach (explode("\n", trim(unl($in))) as $str) {
        if (preg_match("/^(\w+)([:$@%!])\s*(.*)$/sm", $str, $m)) {
            $a[$m[1]] = $str;
        } elseif ("\t" == $str[0]) {
            $t .= "\n$str";
        } else {
            ++$err;
            $a["__ERROR$err"] = "__ERROR$err! $str";
        }
    }
    return $a;
}
 
function prepare_data($ary, $t, $tpl = false) {
    if ($tpl) {
        foreach ($tpl as $key => $val)
            if (!isset($ary[$key]) and @substr($key, 0, 7) != '__ERROR')
                $ary[$key] = $val;
        foreach ($ary as $key => $val)
            if (!isset($tpl[$key]) and @substr($key, 0, 7) != '__ERROR')
                unset($ary[$key]);
    }
    ksort($ary);
    reset($ary);
    return escape(join("\n", $ary) . $t);
}
 
 
if (isset($p_def)):
    sql($p_create);
    sqlf($insert, $p_def, 1, "''");
    file_exists('main') or mkdir('main');
    file_exists($dir = 'main/lang') or mkdir($dir);
    jump();
 
elseif (isset($p_lang)):
    jump('?utility=translate&id=' . sqlf($insert, $p_lang, 0, escape(sql("+select tmemo from _lang where lang='$def'"))));
 
elseif (isset($p_text)):
    $err = 0;
    $a1 = parse_data($_POST['text'], $t1, $err);
    foreach (sql("@select id, tmemo from _lang order by id") as $id => $tmemo) if ($id != $g_id) {
        $aX = parse_data($tmemo, $tX, $err);
        sqlf("update _lang set tmemo=%s where id=$id", prepare_data($aX, $tX, $a1));
    }
    $err and $mess = "found $err syntax error(s)";
    sqlf("update _lang set tmemo=%s, dt=now() where id=$g_id", prepare_data($a1, $t1)) and !$mess and $mess = 'saved';
    foreach (glob('main/lang/??.php') as $file) unlink($file) or $mess = 'Error unlink files';
 
elseif ($WVAL == 'make'):
    $all = sql("@select lang, tmemo from _lang order by field(lang,'$def') desc");
    $dar = [];
    foreach ($all as $lang => $tmemo) {
        $str = "<?php defined('START') or die;\n/*\n  This is auto-generated file. Do not edit!\n*/\n";
        $tmemo = trim($tmemo, "\r\n");
        $ary = [];
        foreach (preg_split("/\r?\n/s", $tmemo) as $row) if (preg_match("/^(\w+)([:$@%!])\s*(.*)$/sm", $row, $m)) {
            $m[1] = strtoupper($m[1]);
            switch ($m[2]) {
                case ':': $str .= "define('L_$m[1]', '" . strtr($m[3], ['\'' => '\\\'']) . "');\n"; break;
                case '$': $str .= "\$S_$m[1] = '" . strtr($m[3], ['\'' => '\\\'']) . "';\n"; break;
                case '@': $str .= "\$A_$m[1] = array('" . join("', '", explode('~', $m[3])) . "');\n"; break;
                case '%': $str .= "\$H_$m[1] = array(\n";
                    foreach (explode('~', $m[3]) as $elem) $str .= "  '" . strtr($elem, ['=>' => "' => '", '\'' => '\\\'']) . "',\n";
                    $str .= ");\n";
                break;
            }
        } elseif ("\t" == @$row[0]) {
            $row = explode("\t", $row);
            $lang == $def ? ($dar[] = unescape($row[5], true)) : ($ary[] = unescape($row[5], true));
        }
        if ($lang != $def) {
            $str .= "\n\$lgt = " . var_export(array_combine($dar, $ary), true) . ";\n\n";
        }
        $mess = file_put_contents("main/lang/$lang.php", $str) ? 'Lang cache has been created' : 'Cannot write lang file';
    }
 
endif;
 
 
if ($mess) $TOP = ' &gt;&nbsp;' . sprintf('<span style="background:yellow">%s</span>', $mess);
else $TOP = is_file("main/lang/$def.php")
    ? ' &gt;&nbsp;<span style="background:#0f0;"> Files synchronized with `_lang`</span>'
    : ' &gt;&nbsp;<span style="background:red;color:#fff"> Language files absent! </span>';
$TOP .= sprintf('&nbsp;&gt; Default `lang`: <b>%s</b>', $def ? $def : 'table `_lang` not exist');
?>
 
<?if($WVAL == 'new'): eval(cell(250))?>
<form method="post">
<select name="lang"><?=option('', $all_lang_list)?></select>
<input value="Add" type="submit" />
</form>
 
 
<?elseif($def): eval(sql("^select * from _lang where id=$g_id")) ?>
<form><input name="utility" value="translate" type="hidden" />
<input type="button" value="Add new language" onclick="document.location.href='?utility=translate&lang=new'" />
<?=pad()?>Page <select name="id" onchange="this.form.submit()"><?=option($g_id,'_lang')?></select>
<?=pad()?>Last updated at <b><?=$r_dt?></b>
<?=pad()?><input type="button" value="Generate lang files" onclick="document.location.href='?utility=translate&lang=make'" />
</form>
<form method="post">
<textarea name="text" rows="28" wrap="off" style="width:850px;overflow:auto"><?=html($r_tmemo)?></textarea><br>
<input type="submit" value="Save" />
<?=pad()?><input type="button" value="Translate with Google" onclick="alert('2do')" />
</form>
<div style="padding:10px; background:yellow; margin-top:10px">
<pre>const:      константа
   - делаем константу L_const, т.е. выполняется define('L_const', 'константа');
string$     это строка
   - делаем глоб. переменную $S_string равную 'это строка'
array@      элемен 1~ элемент 2
   - делаем масив $A_array равный ['элемен 1', ' элемент 2'];
hash%       это=>хеш~ test => OK
   - делаем хеш-массив $H_hash равный ['это' => 'хеш', ' test ' => ' OK'];
</pre></div>
 
 
<?else: eval(cell(250)) ?>
<script type="text/javascript">
mtop(
    'You can use function <b>t()</b> (see main/front.php) in your application to create multilaguage interface, for example:<br><br>' +
    '<span style="background:#ff0;color:#f00">&lt;' + "?=t('translate automatically')?" + '&gt;</span><br><br>' +
    'This function will place (in DEV mode only) this text in DEFAULT_LANG to table `_lang` for future automatically translation ' +
    'with Google (for example) in application <b>WORK.SKY.</b> Also you can correct and manage translations manualy in this utility. ' +
    'Table `_lang` required for development only and must not present on production installations.'
);
</script>
<form method="post" name="f1"><input name="create" type="hidden" />
<pre id="create">
CREATE TABLE `_lang` (
  `id` int(11) unsigned NOT NULL auto_increment,
  `lang` char(2) default NULL,
  `imemo` int(11) default 0,
  `tmemo` text,
  `dt` datetime default NULL,
  PRIMARY KEY  (`id`)
) ENGINE=MyISAM DEFAULT CHARSET=utf8
</pre>
<button onclick="f1.create.value=$('create').text();f1.submit()">Create `_lang` table</button>
with defualt language of <select name="def"><?=option('', $all_lang_list)?></select>
</form>
<?php endif;