'.
n.n.startTable('list').
n.n.tr(
tdcs(
hed(gTxt('site_prefs'), 1)
, 3)
).
n.n.tr(
tdcs(
sLink('prefs', 'prefs_list', gTxt('site_prefs'), 'navlink-active').sp.
sLink('prefs', 'advanced_prefs', gTxt('advanced_preferences'), 'navlink').sp.
sLink('prefs', 'list_languages', gTxt('manage_languages'), 'navlink')
, '3')
);
$evt_list = safe_column('event', 'txp_prefs', "type = 0 and prefs_id = 1 group by event order by event desc");
foreach ($evt_list as $event)
{
$rs = safe_rows_start('*', 'txp_prefs', "type = 0 and prefs_id = 1 and event = '".doSlash($event)."' order by position");
$cur_evt = '';
while ($a = nextRow($rs))
{
if ($a['event'] != $cur_evt)
{
$cur_evt = $a['event'];
if ($cur_evt == 'comments' && !$use_comments)
{
continue;
}
echo n.n.tr(
tdcs(
hed(gTxt($a['event']), 2, ' class="pref-heading"')
, 3)
);
}
if ($cur_evt == 'comments' && !$use_comments)
{
continue;
}
// Skip old settings that don't have an input type
if (!is_callable($a['html']))
{
continue;
}
$label = ($a['html'] != 'yesnoradio') ?
'' :
gTxt($a['name']);
$out = tda($label, ' style="text-align: right; vertical-align: middle;"');
if ($a['html'] == 'text_input')
{
$out.= td(
pref_func('text_input', $a['name'], $a['val'], 20)
);
}
else
{
$out.= td(pref_func($a['html'], $a['name'], $a['val']));
}
$out.= tda(popHelp($a['name']), ' style="vertical-align: middle;"');
echo tr($out);
}
}
echo n.n.tr(
tda(
fInput('submit', 'Submit', gTxt('save_button'), 'publish').
n.sInput('prefs_save').
n.eInput('prefs').
n.hInput('prefs_id', '1')
, ' colspan="3" class="noline"')
).
n.n.endTable().
n.n.'';
$check_updates = gps('check_updates');
if ($check_updates)
{
$updates = checkUpdates();
if (is_array($updates))
{
$out = join(br, $updates);
}
else{
$out = $updates;
}
echo n.n.startTable('edit').
n.n.tr(
tda($out)
).
n.n.endTable();
}
else
{
echo form(
graf(
''.gTxt('check_for_txp_updates').''.sp.
n.''.
n.eInput('prefs').
n.sInput('prefs_list')
)
, 'text-align: center;');
}
}
//-------------------------------------------------------------
function pref_func($func, $name, $val, $size = '')
{
$func = (is_callable('pref_'.$func) ? 'pref_'.$func : $func);
return call_user_func($func, $name, $val, $size);
}
//-------------------------------------------------------------
function text_input($name, $val, $size = '')
{
return fInput('text', $name, $val, 'edit', '', '', $size, '', $name);
}
//-------------------------------------------------------------
function gmtoffset_select($name, $val)
{
// Standard time zones as compiled by H.M. Nautical Almanac Office, June 2004
// http://aa.usno.navy.mil/faq/docs/world_tzones.html
$tz = array(
-12, -11, -10, -9.5, -9, -8.5, -8, -7, -6, -5, -4, -3.5, -3, -2, -1,
0,
+1, +2, +3, +3.5, +4, +4.5, +5, +5.5, +6, +6.5, +7, +8, +9, +9.5, +10, +10.5, +11, +11.5, +12, +13, +14,
);
$vals = array();
foreach ($tz as $z)
{
$sign = ($z >= 0 ? '+' : '');
$label = sprintf("GMT %s%02d:%02d", $sign, $z, abs($z - (int)$z) * 60);
$vals[sprintf("%s%d", $sign, $z * 3600)] = $label;
}
return selectInput($name, $vals, $val, '', '', $name);
}
//-------------------------------------------------------------
function logging($name, $val)
{
$vals = array(
'all' => gTxt('all_hits'),
'refer' => gTxt('referrers_only'),
'none' => gTxt('none')
);
return selectInput($name, $vals, $val, '', '', $name);
}
//-------------------------------------------------------------
function permlinkmodes($name, $val)
{
$vals = array(
'messy' => gTxt('messy'),
'id_title' => gTxt('id_title'),
'section_id_title' => gTxt('section_id_title'),
'year_month_day_title' => gTxt('year_month_day_title'),
'section_title' => gTxt('section_title'),
'title_only' => gTxt('title_only'),
// 'category_subcategory' => gTxt('category_subcategory')
);
return selectInput($name, $vals, $val, '', '', $name);
}
//-------------------------------------------------------------
// Deprecated; permlinkmodes is used instead now
function urlmodes($name, $val)
{
$vals = array(
'0' => gTxt('messy'),
'1' => gTxt('clean')
);
return selectInput($name, $vals, $val, '', '', $name);
}
//-------------------------------------------------------------
function commentmode($name, $val)
{
$vals = array(
'0' => gTxt('nopopup'),
'1' => gTxt('popup')
);
return selectInput($name, $vals, $val, '', '', $name);
}
//-------------------------------------------------------------
function weeks($name, $val)
{
$weeks = gTxt('weeks');
$vals = array(
'0' => gTxt('never'),
7 => '1 '.gTxt('week'),
14 => '2 '.$weeks,
21 => '3 '.$weeks,
28 => '4 '.$weeks,
35 => '5 '.$weeks,
42 => '6 '.$weeks
);
return selectInput($name, $vals, $val, '', '', $name);
}
//-------------------------------------------------------------
function languages($name, $val)
{
$installed_langs = safe_column('lang', 'txp_lang', "1 = 1 group by lang");
$vals = array();
foreach ($installed_langs as $lang)
{
$vals[$lang] = safe_field('data', 'txp_lang', "name = '".doSlash($lang)."' AND lang = '".doSlash($lang)."'");
if (trim($vals[$lang]) == '')
{
$vals[$lang] = $lang;
}
}
asort($vals);
reset($vals);
$out = n.'';
return $out;
}
// -------------------------------------------------------------
function dateformats($name, $val)
{
$dayname = '%A';
$dayshort = '%a';
$daynum = is_numeric(strftime('%e')) ? '%e' : '%d';
$daynumlead = '%d';
$daynumord = is_numeric(substr(trim(strftime('%Oe')), 0, 1)) ? '%Oe' : $daynum;
$monthname = '%B';
$monthshort = '%b';
$monthnum = '%m';
$year = '%Y';
$yearshort = '%y';
$time24 = '%H:%M';
$time12 = strftime('%p') ? '%I:%M %p' : $time24;
$date = strftime('%x') ? '%x' : '%Y-%m-%d';
$formats = array(
"$monthshort $daynumord, $time12",
"$daynum.$monthnum.$yearshort",
"$daynumord $monthname, $time12",
"$yearshort.$monthnum.$daynumlead, $time12",
"$dayshort $monthshort $daynumord, $time12",
"$dayname $monthname $daynumord, $year",
"$monthshort $daynumord",
"$daynumord $monthname $yearshort",
"$daynumord $monthnum $year - $time24",
"$daynumord $monthname $year",
"$daynumord $monthname $year, $time24",
"$daynumord. $monthname $year",
"$daynumord. $monthname $year, $time24",
"$year-$monthnum-$daynumlead",
"$year-$daynumlead-$monthnum",
"$date $time12",
"$date",
"$time24",
"$time12",
"$year-$monthnum-$daynumlead $time24",
);
$ts = time();
$vals = array();
foreach ($formats as $f)
{
if ($d = safe_strftime($f, $ts))
{
$vals[$f] = $d;
}
}
$vals['since'] = gTxt('hours_days_ago');
return selectInput($name, array_unique($vals), $val, '', '', $name);
}
//-------------------------------------------------------------
function prod_levels($name, $val)
{
$vals = array(
'debug' => gTxt('production_debug'),
'testing' => gTxt('production_test'),
'live' => gTxt('production_live'),
);
return selectInput($name, $vals, $val, '', '', $name);
}
//-------------------------------------------------------------
function advanced_prefs($message = '')
{
global $textarray;
// this means new language strings and new help entries
echo pagetop(gTxt('advanced_preferences'), $message).
n.n.'';
}
//-------------------------------------------------------------
function real_max_upload_size($user_max)
{
// The minimum of the candidates, is the real max. possible size
$candidates = array($user_max,
ini_get('post_max_size'),
ini_get('upload_max_filesize'));
$real_max = null;
foreach ($candidates as $item)
{
$val = trim($item);
$modifier = strtolower( substr($val, -1) );
switch($modifier) {
// The 'G' modifier is available since PHP 5.1.0
case 'g': $val *= 1024;
case 'm': $val *= 1024;
case 'k': $val *= 1024;
}
if ($val > 1) {
if (is_null($real_max))
$real_max = $val;
elseif ($val < $real_max)
$real_max = $val;
}
}
return $real_max;
}
//-------------------------------------------------------------
function advanced_prefs_save()
{
$prefnames = safe_column("name", "txp_prefs", "prefs_id = 1 AND type = 1");
$post = doSlash(stripPost());
if (empty($post['tempdir']))
$post['tempdir'] = doSlash(find_temp_dir());
if (!empty($post['file_max_upload_size']))
$post['file_max_upload_size'] = real_max_upload_size($post['file_max_upload_size']);
foreach($prefnames as $prefname) {
if (isset($post[$prefname])) {
safe_update(
"txp_prefs",
"val = '".$post[$prefname]."'",
"name = '".doSlash($prefname)."' and prefs_id = 1"
);
}
}
update_lastmod();
advanced_prefs(gTxt('preferences_saved'));
}
//-------------------------------------------------------------
# RPC install/update languages
function list_languages($message='')
{
global $prefs, $locale, $txpcfg, $textarray;
require_once txpath.'/lib/IXRClass.php';
// Select and save active language
if (!$message && ps('step')=='list_languages' && ps('language'))
{
$locale = doSlash(getlocale(ps('language')));
safe_update("txp_prefs","val='".doSlash(ps('language'))."'", "name='language'");
safe_update("txp_prefs","val='". $locale ."'", "name='locale'");
$textarray = load_lang(doSlash(ps('language')));
$locale = setlocale(LC_ALL, $locale);
$message = gTxt('preferences_saved');
}
$active_lang = safe_field('val','txp_prefs',"name='language'");
$lang_form = tda( form(gTxt('active_language').' '.
languages('language',$active_lang).' '.
fInput('submit','Submit',gTxt('save_button'),'').
eInput('prefs').sInput('list_languages')
,'display:inline;')
,' style="text-align:center" colspan="3"');
$client = new IXR_Client(RPC_SERVER);
#$client->debug = true;
$available_lang = array();
$rpc_connect = false;$show_files = false;
# Get items from RPC
@set_time_limit(90);
if (gps('force')!='file' && $client->query('tups.listLanguages',$prefs['blog_uid']))
{
$rpc_connect = true;
$response = $client->getResponse();
foreach ($response as $language)
$available_lang[$language['language']]['rpc_lastmod'] = gmmktime($language['lastmodified']->hour,$language['lastmodified']->minute,$language['lastmodified']->second,$language['lastmodified']->month,$language['lastmodified']->day,$language['lastmodified']->year);
} elseif (gps('force')!='file')
{
$msg = gTxt('rpc_connect_error')."";
}
# Get items from Filesystem
$files = get_lang_files();
if (gps('force')=='file' || !$rpc_connect)
$show_files = true;
if ( $show_files && is_array($files) && !empty($files) )
{
foreach ($files as $file)
{
if ($fp = @fopen(txpath.DS.'lang'.DS.$file,'r'))
{
$name = str_replace('.txt','',$file);
$firstline = fgets($fp, 4069);
fclose($fp);
if (strpos($firstline,'#@version') !== false)
@list($fversion,$ftime) = explode(';',trim(substr($firstline,strpos($firstline,' ',1))));
else
$fversion = $ftime = NULL;
$available_lang[$name]['file_note'] = (isset($fversion)) ? $fversion : 0;
$available_lang[$name]['file_lastmod'] = (isset($ftime)) ? $ftime : 0;
}
}
}
# Get installed items from the database
# I'm affraid we need a value here for the language itself, not for each one of the rows
$rows = safe_rows('lang, UNIX_TIMESTAMP(MAX(lastmod)) as lastmod','txp_lang',"1 GROUP BY lang ORDER BY lastmod DESC");
foreach ($rows as $language)
{
$available_lang[$language['lang']]['db_lastmod'] = $language['lastmod'];
}
$list = '';
# Show the language table
foreach ($available_lang as $langname => $langdat)
{
$file_updated = ( isset($langdat['db_lastmod']) && @$langdat['file_lastmod'] > $langdat['db_lastmod']);
$rpc_updated = ( @$langdat['rpc_lastmod'] > @$langdat['db_lastmod']);
$rpc_install = tda( strong(eLink('prefs','get_language','lang_code',$langname,(isset($langdat['db_lastmod']))
? gTxt('update') : gTxt('install'),'updating',isset($langdat['db_lastmod']) )).
br.safe_strftime('%d %b %Y %X',@$langdat['rpc_lastmod'])
,(isset($langdat['db_lastmod']))
? ' style="color:red;text-align:center;background-color:#FFFFCC;"'
: ' style="color:#667;vertical-align:middle;text-align:center"');
$list.= tr (
# Lang-Name & Date
tda(gTxt($langname).
tag( ( isset($langdat['db_lastmod']) )
? br.' '.safe_strftime('%d %b %Y %X',$langdat['db_lastmod'])
: ''
, 'span',' style="color:#aaa;font-style:italic"')
, (isset($langdat['db_lastmod']) && $rpc_updated) #tda attribute
? ' nowrap="nowrap" style="color:red;background-color:#FFFFCC;"'
: ' nowrap="nowrap" style="vertical-align:middle"' ).n.
# RPC - Info
( ($rpc_updated)
? $rpc_install
: tda( (isset($langdat['rpc_lastmod'])) ? gTxt('updated') : '-'
,' style="vertical-align:middle;text-align:center"')
).n.
# File - Info
( ($show_files)
? tda( tag( ( isset($langdat['file_lastmod']) )
? eLink('prefs','get_language','lang_code',$langname,($file_updated) ? gTxt('update') : gTxt('install'),'force','file').
br.' '.safe_strftime($prefs['archive_dateformat'],$langdat['file_lastmod'])
: ' ' # No File available
, 'span', ($file_updated) ? ' style="color:#667;"' : ' style="color:#aaa;font-style:italic"' )
, ' class="langfile" style="text-align:center;vertical-align:middle"').n
: '')
).n.n;
}
// Output Table + Content
pagetop(gTxt('update_languages'),$message);
if (isset($msg) && $msg)
echo tag ($msg,'p',' style="text-align:center;color:red;width:50%;margin: 2em auto"' );
echo startTable('list'),
tr(
tdcs(
hed(gTxt('manage_languages'), 1)
, 3)
),
tr(
tdcs(
sLink('prefs', 'prefs_list', gTxt('site_prefs'), 'navlink').sp.
sLink('prefs','advanced_prefs',gTxt('advanced_preferences'),'navlink').sp.
sLink('prefs', 'list_languages', gTxt('manage_languages'), 'navlink-active')
, '3')
),
tr(tda(' ',' colspan="3" style="font-size:0.25em"')),
tr( $lang_form ),
tr(tda(' ',' colspan="3" style="font-size:0.25em"')),
tr(tda(gTxt('language')).tda(gTxt('from_server')).( ($show_files) ? tda(gTxt('from_file')) : '' ), ' style="font-weight:bold"');
echo $list;
if (!$show_files)
{
$linktext = gTxt('from_file').' ('.gTxt('experts_only').')';
echo tr(tda(' ',' colspan="3" style="font-size:0.25em"')).
tr(tda(strong(eLink('prefs','list_languages','force','file',$linktext)),' colspan="3" style="text-align:center"') );
} elseif (gps('force')=='file') {
echo tr(tda(' ',' colspan="3" style="font-size:0.25em"')).
tr(tda(sLink('prefs','list_languages',strong(gTxt('from_server'))),' colspan="3" style="text-align:center"') );
}
echo endTable();
$install_langfile = gTxt('install_langfile', array(
'{url}' => strong(''.RPC_SERVER.'/lang/')
));
if ( $install_langfile == 'install_langfile')
$install_langfile = 'To install new languages from file you can download them from '.RPC_SERVER.'/lang/ and place them inside your ./textpattern/lang/ directory.';
echo tag( $install_langfile ,'p',' style="text-align:center;width:50%;margin: 2em auto"' );
}
//-------------------------------------------------------------
function get_language()
{
global $prefs, $txpcfg, $textarray;
require_once txpath.'/lib/IXRClass.php';
$lang_code = gps('lang_code');
$client = new IXR_Client(RPC_SERVER);
// $client->debug = true;
@set_time_limit(90);
if (gps('force')=='file' || !$client->query('tups.getLanguage',$prefs['blog_uid'],$lang_code))
{
if ( (gps('force')=='file' || gps('updating')!=='1') && install_language_from_file($lang_code) )
{
if (defined('LANG'))
$textarray = load_lang(LANG);
return list_languages(gTxt($lang_code).sp.gTxt('updated'));
}else{
$install_langfile = gTxt('install_langfile', array(
'{url}' => strong(''.RPC_SERVER.'/lang/')
));
if ( $install_langfile == 'install_langfile')
$install_langfile = 'To install new languages from file you can download them from '.RPC_SERVER.'/lang/ and place them inside your ./textpattern/lang/ directory.';
pagetop(gTxt('installing_language'));
echo tag( gTxt('rpc_connect_error').""
,'p',' style="text-align:center;color:red;width:50%;margin: 2em auto"' );
echo tag( $install_langfile ,'p',' style="text-align:center;width:50%;margin: 2em auto"' );
}
}else {
$response = $client->getResponse();
$lang_struct = unserialize($response);
function install_lang_key(&$value, $key)
{
extract(gpsa(array('lang_code','updating')));
$exists = safe_field('name','txp_lang',"name='".doSlash($value['name'])."' AND lang='".doSlash($lang_code)."'");
$q = "name='".doSlash($value['name'])."', event='".doSlash($value['event'])."', data='".doSlash($value['data'])."', lastmod='".doSlash(strftime('%Y%m%d%H%M%S',$value['uLastmod']))."'";
if ($exists)
{
$value['ok'] = safe_update('txp_lang',$q,"lang='".doSlash($lang_code)."' AND name='".doSlash($value['name'])."'");
}else{
$value['ok'] = safe_insert('txp_lang',$q.", lang='".doSlash($lang_code)."'");
}
}
array_walk($lang_struct,'install_lang_key');
$size = count($lang_struct);
$errors = 0;
for($i=0; $i < $size ; $i++)
{
$errors += ( !$lang_struct[$i]['ok'] );
}
if (defined('LANG'))
$textarray = load_lang(LANG);
$msg = gTxt($lang_code).sp.gTxt('updated');
if ($errors > 0)
$msg .= sprintf(" (%s errors, %s ok)",$errors, ($size-$errors));
return list_languages($msg);
}
}
// ----------------------------------------------------------------------
function get_lang_files()
{
global $txpcfg;
$dirlist = array();
$lang_dir = txpath.DS.'lang'.DS;
if (!is_dir($lang_dir))
{
trigger_error('Lang directory is not a directory: '.$lang_dir, E_USER_WARNING);
return $dirlist;
}
if (chdir($lang_dir)) {
if (function_exists('glob')){
$g_array = glob("*.txt");
}else {
# filter .txt only files here?
$dh = opendir($lang_dir);
$g_array = array();
while (false !== ($filename = readdir($dh))) {
if (strstr($filename, '.txt'))
$g_array[] = $filename;
}
closedir($dh);
}
# build an array of lang-codes => filemtimes
if ($g_array) {
foreach ($g_array as $lang_name) {
if (is_file($lang_name)) {
$dirlist[substr($lang_name,0,5)] = @filemtime($lang_name);
}
}
}
}
return $g_array;
}
?>