forked from extern/egroupware
1230 lines
36 KiB
PHP
1230 lines
36 KiB
PHP
<?php
|
|
/**************************************************************************\
|
|
* eGroupWare - EditableTemplates - Storage Objects *
|
|
* http://www.egroupware.org *
|
|
* Written by Ralf Becker <RalfBecker@outdoor-training.de> *
|
|
* -------------------------------------------- *
|
|
* This program is free software; you can redistribute it and/or modify it *
|
|
* under the terms of the GNU General Public License as published by the *
|
|
* Free Software Foundation; either version 2 of the License, or (at your *
|
|
* option) any later version. *
|
|
\**************************************************************************/
|
|
|
|
/* $Id$ */
|
|
|
|
/**
|
|
* Storage Objects: Everything to store and retrive and eTemplate.
|
|
*
|
|
* eTemplates are stored in the db in table 'phpgw_etemplate' and gets distributed
|
|
* through the file 'etemplates.inc.php' in the setup dir of each app. That file gets
|
|
* automatically imported in the db, whenever you show a eTemplate of the app. For
|
|
* performace reasons the timestamp of the file is stored in the db, so 'new'
|
|
* eTemplates need to have a newer file. The distribution-file is generated with the
|
|
* function dump, usually by pressing a button in the editor.
|
|
* writeLangFile writes an lang-file with all Labels, incorporating an existing one.
|
|
* Beside a name eTemplates use the following keys to find the most suitable template
|
|
* for an user (in order of precedence):
|
|
* 1) User-/Group-Id (not yet implemented)
|
|
* 2) preferd languages of the user (templates for all langs have $lang='')
|
|
* 3) selected template: verdilak, ... (the default is called '' in the db, not default)
|
|
* 4) a version-number of the form, eg: '0.9.13.001' (filled up with 0 same size)
|
|
*
|
|
* @package etemplate
|
|
* @author RalfBecker-AT-outdoor-training.de
|
|
* @license GPL
|
|
*/
|
|
class soetemplate
|
|
{
|
|
var $debug; // =1 show some debug-messages, = 'app.name' show messages only for eTemplate 'app.name'
|
|
var $name; // name of the template, e.g. 'infolog.edit'
|
|
var $template; // '' = default (not 'default')
|
|
var $lang; // '' if general template else language short, e.g. 'de'
|
|
var $group; // 0 = not specific else groupId or if < 0 userId
|
|
var $version; // like 0.9.13.001
|
|
var $style; // embeded CSS style-sheet
|
|
var $children; // array with children
|
|
var $data; // depricated: first grid of the children
|
|
var $size; // depricated: witdh,height,border of first grid
|
|
var $db,$db_name = 'phpgw_etemplate'; // DB name
|
|
var $db_key_cols = array(
|
|
'et_name' => 'name',
|
|
'et_template' => 'template',
|
|
'et_lang' => 'lang',
|
|
'et_group' => 'group',
|
|
'et_version' => 'version'
|
|
);
|
|
var $db_data_cols = array(
|
|
'et_data' => 'data',
|
|
'et_size' => 'size',
|
|
'et_style' => 'style',
|
|
'et_modified' => 'modified'
|
|
);
|
|
var $db_cols;
|
|
var $widgets_with_children = array( // widgets that contain other widgets, for tree_walk method
|
|
'box' => true,
|
|
'vbox' => true,
|
|
'hbox' => true,
|
|
'groupbox' => true,
|
|
'deck' => true,
|
|
'grid' => true,
|
|
'template' => true,
|
|
);
|
|
|
|
/**
|
|
* constructor of the class
|
|
*
|
|
* calls init or read depending on a name for the template is given
|
|
*
|
|
* @param string $name name of the eTemplate or array with the values for all keys
|
|
* @param string $template template-set, '' loads the prefered template of the user, 'default' loads the default one '' in the db
|
|
* @param string $lang language, '' loads the pref. lang of the user, 'default' loads the default one '' in the db
|
|
* @param int $group id of the (primary) group of the user or 0 for none, not used at the moment !!!
|
|
* @param string $version version of the eTemplate
|
|
* @param int $rows initial size of the template, default 1, only used if no name given !!!
|
|
* @param int $cols initial size of the template, default 1, only used if no name given !!!
|
|
*/
|
|
function soetemplate($name='',$template='',$lang='',$group=0,$version='',$rows=1,$cols=1)
|
|
{
|
|
$this->db = clone($GLOBALS['phpgw']->db);
|
|
$this->db_cols = $this->db_key_cols + $this->db_data_cols;
|
|
|
|
if (empty($name))
|
|
{
|
|
$this->init($name,$template,$lang,$group,$version,$rows,$cols);
|
|
}
|
|
else
|
|
{
|
|
$this->read($name,$template,$lang,$group,$version);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* generates column-names from index: 'A', 'B', ..., 'AA', 'AB', ..., 'ZZ' (not more!)
|
|
*
|
|
* @static
|
|
* @param int $num numerical index to generate name from 1 => 'A'
|
|
* @return string the name
|
|
*/
|
|
function num2chrs($num)
|
|
{
|
|
$min = ord('A');
|
|
$max = ord('Z') - $min + 1;
|
|
if ($num >= $max)
|
|
{
|
|
$chrs = chr(($num / $max) + $min - 1);
|
|
}
|
|
$chrs .= chr(($num % $max) + $min);
|
|
|
|
return $chrs;
|
|
}
|
|
|
|
/**
|
|
* constructor for a new / empty cell/widget
|
|
*
|
|
* nothing fancy so far
|
|
*
|
|
* @static
|
|
* @param string $type type of the widget
|
|
* @param string $name name of widget
|
|
* @return array the cell
|
|
*/
|
|
function empty_cell($type='label',$name='')
|
|
{
|
|
return array(
|
|
'type' => $type,
|
|
'name' => $name,
|
|
);
|
|
}
|
|
|
|
/**
|
|
* constructs a new cell in a give row or the last row, not existing rows will be created
|
|
*
|
|
* @deprecated as it uses this->data
|
|
* @param int $row row-number starting with 1 (!)
|
|
* @param string $type type of the cell
|
|
* @param string $label label for the cell
|
|
* @param string $name name of the cell (index in the content-array)
|
|
* @param array $attributes other attributes for the cell
|
|
* @return array a reference to the new cell, use $new_cell = &$tpl->new_cell(); (!)
|
|
*/
|
|
function &new_cell($row=False,$type='label',$label='',$name='',$attributes=False)
|
|
{
|
|
$row = $row >= 0 ? intval($row) : 0;
|
|
if ($row && !isset($this->data[$row]) || !isset($this->data[1])) // new row ?
|
|
{
|
|
if (!$row) $row = 1;
|
|
|
|
$this->data[$row] = array();
|
|
}
|
|
if (!$row) // use last row
|
|
{
|
|
$row = count($this->data);
|
|
while (!isset($this->data[$row]))
|
|
{
|
|
--$row;
|
|
}
|
|
}
|
|
$row = &$this->data[$row];
|
|
$col = $this->num2chrs(count($row));
|
|
$cell = &$row[$col];
|
|
$cell = $this->empty_cell($type,$name);
|
|
if ($label !== '')
|
|
{
|
|
$attributes['label'] = $label;
|
|
}
|
|
if (is_array($attributes))
|
|
{
|
|
foreach($attributes as $name => $value)
|
|
{
|
|
$cell[$name] = $value;
|
|
}
|
|
}
|
|
return $cell;
|
|
}
|
|
|
|
/**
|
|
* adds $cell to it's parent at the parent-type spezific location for childs
|
|
*
|
|
* @static
|
|
* @param array &$parent referenc to the parent
|
|
* @param array &$cell cell to add (need to be unset after the call to add_child, as it's a referenc !)
|
|
*/
|
|
function add_child(&$parent,&$cell)
|
|
{
|
|
switch($parent['type'])
|
|
{
|
|
case 'vbox':
|
|
case 'hbox':
|
|
case 'groupbox':
|
|
case 'box':
|
|
case 'deck':
|
|
list($n,$options) = explode(',',$parent['size'],2);
|
|
$parent[++$n] = &$cell;
|
|
$parent['size'] = $n . ($options ? ','.$options : '');
|
|
break;
|
|
|
|
case 'grid':
|
|
$data = &$parent['data'];
|
|
$cols = &$parent['cols'];
|
|
$rows = &$parent['rows'];
|
|
$row = &$data[$rows];
|
|
$col = count($row);
|
|
if (is_array($cell)) // real cell to add
|
|
{
|
|
$row[soetemplate::num2chrs($col++)] = &$cell;
|
|
list($spanned) = explode(',',$cell['span']);
|
|
$spanned = $spanned == 'all' ? 1 + $cols - $col : $spanned;
|
|
while (--$spanned > 0)
|
|
{
|
|
$row[soetemplate::num2chrs($col++)] = soetemplate::empty_cell();
|
|
}
|
|
if ($col > $cols) $cols = $col;
|
|
}
|
|
else // create a new row
|
|
{
|
|
$data[++$rows] = array();
|
|
}
|
|
break;
|
|
|
|
default: // parent is the template itself
|
|
$parent[] = &$cell;
|
|
break;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* initialises internal vars rows & cols from the data of a grid
|
|
*
|
|
* @static
|
|
* @param array &$grid to calc rows and cols
|
|
*/
|
|
function set_grid_rows_cols(&$grid)
|
|
{
|
|
$grid['rows'] = count($grid['data']) - 1;
|
|
$grid['cols'] = 0;
|
|
for($r = 1; $r <= $grid['rows']; ++$r)
|
|
{
|
|
$cols = count($grid['data'][$r]);
|
|
if ($grid['cols'] < $cols)
|
|
{
|
|
$grid['cols'] = $cols;
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* initialises internal vars rows & cols from the data of the first (!) grid
|
|
*
|
|
* @deprecated as it uses this->data
|
|
*/
|
|
function set_rows_cols()
|
|
{
|
|
if (is_null($this->data)) // tmpl contains no grid
|
|
{
|
|
$this->rows = $this->cols = 0;
|
|
}
|
|
else
|
|
{
|
|
$grid['data'] = &$this->data;
|
|
$grid['rows'] = &$this->rows;
|
|
$grid['cols'] = &$this->cols;
|
|
$this->set_grid_rows_cols($grid);
|
|
unset($grid);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* initialises all internal data-structures of the eTemplate and sets the keys
|
|
*
|
|
* @param string $name name of the eTemplate or array with the values for all keys and possibly data
|
|
* @param string $template template-set or '' for the default one
|
|
* @param string $lang language or '' for the default one
|
|
* @param int $group id of the (primary) group of the user or 0 for none, not used at the moment !!!
|
|
* @param string $version version of the eTemplate
|
|
* @param int $rows initial size of the template, default 1
|
|
* @param int $cols initial size of the template, default 1
|
|
*/
|
|
function init($name='',$template='',$lang='',$group=0,$version='',$rows=1,$cols=1)
|
|
{
|
|
// unset children and data as they are referenzes to each other
|
|
unset($this->children); unset($this->data);
|
|
|
|
foreach($this->db_cols as $db_col => $col)
|
|
{
|
|
if ($col != 'data') $this->$col = is_array($name) ? $name[$col] : $$col;
|
|
}
|
|
if ($this->template == 'default')
|
|
{
|
|
$this->template = '';
|
|
}
|
|
if ($this->lang == 'default')
|
|
{
|
|
$this->lang = '';
|
|
}
|
|
$this->tpls_in_file = is_array($name) ? $name['tpls_in_file'] : 0;
|
|
|
|
if (is_array($name) && isset($name['data']))
|
|
{
|
|
// data/children are in $name['data']
|
|
$this->children = is_array($name['data']) ? $name['data'] : unserialize(stripslashes($name['data']));
|
|
|
|
$this->fix_old_template_format();
|
|
}
|
|
else
|
|
{
|
|
$this->size = $this->style = '';
|
|
$this->data = array(0 => array());
|
|
$this->rows = $rows < 0 ? 1 : $rows;
|
|
$this->cols = $cols < 0 ? 1 : $cols;
|
|
for ($row = 1; $row <= $rows; ++$row)
|
|
{
|
|
for ($col = 0; $col < $cols; ++$col)
|
|
{
|
|
$this->data[$row][$this->num2chrs($col)] = $this->empty_cell();
|
|
}
|
|
}
|
|
$this->children[0]['type'] = 'grid';
|
|
$this->children[0]['data'] = &$this->data;
|
|
$this->children[0]['rows'] = &$this->rows;
|
|
$this->children[0]['cols'] = &$this->cols;
|
|
$this->children[0]['size'] = &$this->size;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* reads an eTemplate from the database
|
|
*
|
|
* @param string $name name of the eTemplate or array with the values for all keys
|
|
* @param string $template template-set, '' loads the prefered template of the user, 'default' loads the default one '' in the db
|
|
* @param string $lang language, '' loads the pref. lang of the user, 'default' loads the default one '' in the db
|
|
* @param int $group id of the (primary) group of the user or 0 for none, not used at the moment !!!
|
|
* @param string $version version of the eTemplate
|
|
* @return boolean True if a fitting template is found, else False
|
|
*/
|
|
function read($name,$template='default',$lang='default',$group=0,$version='')
|
|
{
|
|
$this->init($name,$template,$lang,$group,$version);
|
|
if ($this->debug == 1 || $this->debug == $this->name)
|
|
{
|
|
echo "<p>soetemplate::read('$this->name','$this->template','$this->lang',$this->group,'$this->version')</p>\n";
|
|
}
|
|
if (($GLOBALS['phpgw_info']['server']['eTemplate-source'] == 'files' ||
|
|
$GLOBALS['phpgw_info']['server']['eTemplate-source'] == 'xslt') && $this->readfile())
|
|
{
|
|
return True;
|
|
}
|
|
if ($this->name)
|
|
{
|
|
$this->test_import($this->name); // import updates in setup-dir
|
|
}
|
|
$pref_lang = $GLOBALS['phpgw_info']['user']['preferences']['common']['lang'];
|
|
$pref_templ = $GLOBALS['phpgw_info']['server']['template_set'];
|
|
|
|
$sql = "SELECT * FROM $this->db_name WHERE et_name='".$this->db->db_addslashes($this->name)."' AND ";
|
|
if (is_array($name))
|
|
{
|
|
$template = $name['template'];
|
|
}
|
|
if ($template == 'default')
|
|
{
|
|
$sql .= "(et_template='".$this->db->db_addslashes($pref_templ)."' OR et_template='')";
|
|
}
|
|
else
|
|
{
|
|
$sql .= "et_template='".$this->db->db_addslashes($this->template)."'";
|
|
}
|
|
$sql .= ' AND ';
|
|
if (is_array($name))
|
|
{
|
|
$lang = $name['lang'];
|
|
}
|
|
if ($lang == 'default' || $name['lang'] == 'default')
|
|
{
|
|
$sql .= "(et_lang='".$this->db->db_addslashes($pref_lang)."' OR et_lang='')";
|
|
}
|
|
else
|
|
{
|
|
$sql .= "et_lang='".$this->db->db_addslashes($this->lang)."'";
|
|
}
|
|
if ($this->version != '')
|
|
{
|
|
$sql .= "AND et_version='".$this->db->db_addslashes($this->version)."'";
|
|
}
|
|
$sql .= " ORDER BY et_lang DESC,et_template DESC,et_version DESC";
|
|
|
|
if ($this->debug == $this->name)
|
|
{
|
|
echo "<p>soetemplate::read: sql='$sql'</p>\n";
|
|
}
|
|
$this->db->query($sql,__LINE__,__FILE__);
|
|
if (!$this->db->next_record())
|
|
{
|
|
$version = $this->version;
|
|
return $this->readfile() && (empty($version) || $version == $this->version);
|
|
}
|
|
$this->db2obj();
|
|
|
|
return True;
|
|
}
|
|
|
|
/**
|
|
* Reads an eTemplate from the filesystem, the keys are already set by init in read
|
|
*
|
|
* @return boolean True if a template was found, else False
|
|
*/
|
|
function readfile()
|
|
{
|
|
list($app,$name) = explode('.',$this->name,2);
|
|
$template = $this->template == '' ? 'default' : $this->template;
|
|
|
|
if ($this->lang)
|
|
{
|
|
$lang = '.' . $this->lang;
|
|
}
|
|
$first_try = $ext = $GLOBALS['phpgw_info']['server']['eTemplate-source'] == 'xslt' ? '.xsl' : '.xet';
|
|
|
|
while ((!$lang || !@file_exists($file = PHPGW_SERVER_ROOT . "/$app/templates/$template/$name$lang$ext") &&
|
|
!@file_exists($file = PHPGW_SERVER_ROOT . "/$app/templates/default/$name$lang$ext")) &&
|
|
!@file_exists($file = PHPGW_SERVER_ROOT . "/$app/templates/$template/$name$ext") &&
|
|
!@file_exists($file = PHPGW_SERVER_ROOT . "/$app/templates/default/$name$ext"))
|
|
{
|
|
if ($ext == $first_try)
|
|
{
|
|
$ext = $ext == '.xet' ? '.xsl' : '.xet';
|
|
|
|
if ($this->debug == 1 || $this->name != '' && $this->debug == $this->name)
|
|
{
|
|
echo "<p>tried '$file' now trying it with extension '$ext' !!!</p>\n";
|
|
}
|
|
}
|
|
else
|
|
{
|
|
break;
|
|
}
|
|
}
|
|
if ($this->name == '' || $app == '' || $name == '' || !@file_exists($file) || !($f = @fopen($file,'r')))
|
|
{
|
|
if ($this->debug == 1 || $this->name != '' && $this->debug == $this->name)
|
|
{
|
|
echo "<p>Can't open template '$this->name' / '$file' !!!</p>\n";
|
|
}
|
|
return False;
|
|
}
|
|
$xml = fread ($f, filesize ($file));
|
|
fclose($f);
|
|
|
|
if ($ext == '.xsl')
|
|
{
|
|
$cell = $this->empty_cell();
|
|
$cell['type'] = 'xslt';
|
|
$cell['size'] = $this->name;
|
|
//$cell['xslt'] = &$xml; xslttemplate class cant use it direct at the moment
|
|
$cell['name'] = '';
|
|
$this->data = array(0 => array(),1 => array('A' => &$cell));
|
|
$this->rows = $this->cols = 1;
|
|
}
|
|
else
|
|
{
|
|
if (!is_object($this->xul_io))
|
|
{
|
|
$this->xul_io = CreateObject('etemplate.xul_io');
|
|
}
|
|
$loaded = $this->xul_io->import($this,$xml);
|
|
|
|
if (!is_array($loaded))
|
|
{
|
|
return False;
|
|
}
|
|
$this->name = $app . '.' . $name; // if template was copied or app was renamed
|
|
|
|
$this->tpls_in_file = count($loaded);
|
|
}
|
|
return True;
|
|
}
|
|
|
|
/**
|
|
* Lists the eTemplates matching the given criteria, sql wildcards % and _ possible
|
|
*
|
|
* @param string $name name of the eTemplate or array with the values for all keys
|
|
* @param string $template template-set, '' loads the prefered template of the user, 'default' loads the default one '' in the db
|
|
* @param string $lang language, '' loads the pref. lang of the user, 'default' loads the default one '' in the db
|
|
* @param int $group id of the (primary) group of the user or 0 for none, not used at the moment !!!
|
|
* @param string $version version of the eTemplate
|
|
* @return array of arrays with the template-params
|
|
*/
|
|
function search($name,$template='default',$lang='default',$group=0,$version='')
|
|
{
|
|
if ($this->name)
|
|
{
|
|
$this->test_import($this->name); // import updates in setup-dir
|
|
}
|
|
$pref_lang = $GLOBALS['phpgw_info']['user']['preferences']['common']['lang'];
|
|
$pref_templ = $GLOBALS['phpgw_info']['server']['template_set'];
|
|
|
|
if (is_array($name))
|
|
{
|
|
$template = $name['template'];
|
|
$lang = $name['lang'];
|
|
$group = $name['group'];
|
|
$version = $name['version'];
|
|
$name = $name['name'];
|
|
}
|
|
$sql = "SELECT et_name,et_template,et_lang,et_group,et_version FROM $this->db_name WHERE et_name LIKE '".$this->db->db_addslashes($name)."%'";
|
|
|
|
if ($template != '' && $template != 'default')
|
|
{
|
|
$sql .= " AND et_template LIKE '".$this->db->db_addslashes($template)."%'";
|
|
}
|
|
if ($lang != '' && $lang != 'default')
|
|
{
|
|
$sql .= " AND et_lang LIKE '".$this->db->db_addslashes($lang)."%'";
|
|
}
|
|
if ($this->version != '')
|
|
{
|
|
$sql .= " AND et_version LIKE '".$this->db->db_addslashes($version)."%'";
|
|
}
|
|
$sql .= " ORDER BY et_name DESC,et_lang DESC,et_template DESC,et_version DESC";
|
|
|
|
$tpl = new soetemplate;
|
|
$tpl->db->query($sql,__LINE__,__FILE__);
|
|
$result = array();
|
|
while ($tpl->db->next_record())
|
|
{
|
|
if ($tpl->db->f('et_lang') != '##') // exclude or import-time-stamps
|
|
{
|
|
$tpl->db2obj();
|
|
|
|
$result[] = $tpl->as_array();
|
|
}
|
|
}
|
|
if ($this->debug)
|
|
{
|
|
echo "<p>soetemplate::search('$name') sql='$sql'</p>\n<pre>\n";
|
|
print_r($result);
|
|
echo "</pre>\n";
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* copies all cols into the obj and unserializes the data-array
|
|
*/
|
|
function db2obj()
|
|
{
|
|
// unset children and data as they are referenzes to each other
|
|
unset($this->children); unset($this->data);
|
|
|
|
foreach ($this->db_cols as $db_col => $name)
|
|
{
|
|
if ($name != 'data')
|
|
{
|
|
$this->$name = $this->db->f($db_col);
|
|
}
|
|
else
|
|
{
|
|
$this->children = unserialize(stripslashes($this->db->f($db_col)));
|
|
}
|
|
}
|
|
$this->fix_old_template_format();
|
|
}
|
|
|
|
/**
|
|
* test if we have an old/original template-format and fixes it to the new format
|
|
*/
|
|
function fix_old_template_format()
|
|
{
|
|
if (!is_array($this->children)) $this->children = array();
|
|
|
|
if (!isset($this->children[0]['type']))
|
|
{
|
|
// old templates are treated as having one children of type grid (the original template)
|
|
$this->data = &$this->children;
|
|
unset($this->children);
|
|
|
|
$this->children[0]['type'] = 'grid';
|
|
$this->children[0]['data'] = &$this->data;
|
|
$this->children[0]['rows'] = &$this->rows;
|
|
$this->children[0]['cols'] = &$this->cols;
|
|
$this->children[0]['size'] = &$this->size;
|
|
|
|
// that code fixes a bug in very old templates, not sure if it's still needed
|
|
if ($this->name[0] != '.' && is_array($this->data))
|
|
{
|
|
reset($this->data); each($this->data);
|
|
while (list($row,$cols) = each($this->data))
|
|
{
|
|
while (list($col,$cell) = each($cols))
|
|
{
|
|
if (is_array($cell['type']))
|
|
{
|
|
$this->data[$row][$col]['type'] = $cell['type'][0];
|
|
//echo "corrected in $this->name cell $col$row attribute type<br>\n";
|
|
}
|
|
if (is_array($cell['align']))
|
|
{
|
|
$this->data[$row][$col]['align'] = $cell['align'][0];
|
|
//echo "corrected in $this->name cell $col$row attribute align<br>\n";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
unset($this->data);
|
|
// for the moment we make $this->data as a referenz to the first grid
|
|
foreach($this->children as $key => $child)
|
|
{
|
|
if ($child['type'] == 'grid')
|
|
{
|
|
$this->data = &$this->children[$key]['data'];
|
|
$this->rows = &$this->children[$key]['rows'];
|
|
$this->cols = &$this->children[$key]['cols'];
|
|
if (!isset($this->children[$key]['size']) && !empty($this->size))
|
|
{
|
|
$this->children[$key]['size'] = &$this->size;
|
|
}
|
|
else
|
|
{
|
|
$this->size = &$this->children[$key]['size'];
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
$this->set_rows_cols();
|
|
}
|
|
|
|
/**
|
|
* to save space in the db all empty values in the array got unset
|
|
*
|
|
* The never empty type field ensures a cell does not disapear completely.
|
|
* Calls it self recursivly for arrays / the rows
|
|
*
|
|
* @param array $arr the array to compress
|
|
* @return array
|
|
*/
|
|
function compress_array($arr)
|
|
{
|
|
if (!is_array($arr))
|
|
{
|
|
return $arr;
|
|
}
|
|
foreach($arr as $key => $val)
|
|
{
|
|
if (is_array($val))
|
|
{
|
|
$arr[$key] = $this->compress_array($val);
|
|
}
|
|
elseif ($val == '')
|
|
{
|
|
unset($arr[$key]);
|
|
}
|
|
}
|
|
return $arr;
|
|
}
|
|
|
|
/**
|
|
* returns obj-data/-vars as array
|
|
*
|
|
* the returned array ($data_too > 0) can be used with init to recreate the template
|
|
*
|
|
* @param int $data_too 0 = no data array, 1 = data array too, 2 = serialize data array
|
|
* @return array with template-data
|
|
*/
|
|
function as_array($data_too=0)
|
|
{
|
|
$arr = array();
|
|
foreach($this->db_cols as $db_col => $col)
|
|
{
|
|
if ($col == 'data' && $data_too)
|
|
{
|
|
$arr['data'] = $data_too == 2 ? serialize($this->children) : $this->children;
|
|
}
|
|
else
|
|
{
|
|
$arr[$col] = $this->$col;
|
|
}
|
|
}
|
|
if ($this->tpls_in_file)
|
|
{
|
|
$arr['tpls_in_file'] = $this->tpls_in_file;
|
|
}
|
|
return $arr;
|
|
}
|
|
|
|
/**
|
|
* saves eTemplate-object to db, can be used as saveAs by giving keys as params
|
|
*
|
|
* @param string $name name of the eTemplate or array with the values for all keys
|
|
* @param string $template template-set
|
|
* @param string $lang language or ''
|
|
* @param int $group id of the (primary) group, not used at the moment !!!
|
|
* @param string $version version of the eTemplate
|
|
* @return int number of affected rows, 1 should be ok, 0 somethings wrong
|
|
*/
|
|
function save($name='',$template='.',$lang='.',$group='',$version='.')
|
|
{
|
|
if (is_array($name))
|
|
{
|
|
$template = $name['template'];
|
|
$lang = $name['lang'];
|
|
$group = $name['group'];
|
|
$version = $name['version'];
|
|
$name = $name['name'];
|
|
}
|
|
if ($name != '')
|
|
{
|
|
$this->name = $name;
|
|
}
|
|
if ($lang != '.')
|
|
{
|
|
$this->lang = $lang;
|
|
}
|
|
if ($template != '.')
|
|
{
|
|
$this->template = $template;
|
|
}
|
|
if ($group != '')
|
|
{
|
|
$this->group = $group;
|
|
}
|
|
if ($version != '.')
|
|
{
|
|
$this->version = $version;
|
|
}
|
|
if ($this->name == '') // name need to be set !!!
|
|
{
|
|
return False;
|
|
}
|
|
if ($this->debug > 0 || $this->debug == $this->name)
|
|
{
|
|
echo "<p>soetemplate::save('$this->name','$this->template','$this->lang',$this->group,'$this->version')</p>\n";
|
|
}
|
|
$this->delete(); // so we have always a new insert
|
|
|
|
if ($this->name[0] != '.' && is_array($data)) // correct old messed up templates
|
|
{
|
|
reset($this->data); each($this->data);
|
|
while (list($row,$cols) = each($this->data))
|
|
{
|
|
while (list($col,$cell) = each($cols))
|
|
{
|
|
if (is_array($cell['type'])) {
|
|
$this->data[$row][$col]['type'] = $cell['type'][0];
|
|
//echo "corrected in $this->name cell $col$row attribute type<br>\n";
|
|
}
|
|
if (is_array($cell['align'])) {
|
|
$this->data[$row][$col]['align'] = $cell['align'][0];
|
|
//echo "corrected in $this->name cell $col$row attribute align<br>\n";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
if (!$this->modified)
|
|
{
|
|
$this->modified = time();
|
|
}
|
|
$data = $this->as_array(1);
|
|
$data['data'] = serialize($this->compress_array($data['data']));
|
|
|
|
$sql = "INSERT INTO $this->db_name (";
|
|
foreach ($this->db_cols as $db_col => $col)
|
|
{
|
|
$sql .= $db_col . ',';
|
|
$vals .= $db_col == 'et_group' ? intval($data[$col]).',' : "'" . $this->db->db_addslashes($data[$col]) . "',";
|
|
}
|
|
$sql[strlen($sql)-1] = ')';
|
|
$sql .= " VALUES ($vals";
|
|
$sql[strlen($sql)-1] = ')';
|
|
|
|
$this->db->query($sql,__LINE__,__FILE__);
|
|
|
|
return $this->db->affected_rows();
|
|
}
|
|
|
|
/**
|
|
* Deletes the eTemplate from the db, object itself is unchanged
|
|
*
|
|
* @return int number of affected rows, 1 should be ok, 0 somethings wrong
|
|
*/
|
|
function delete()
|
|
{
|
|
foreach ($this->db_key_cols as $db_col => $col)
|
|
{
|
|
$vals .= ($vals ? ' AND ' : '') . $db_col . '=' . ($db_col == 'et_group' ? intval($this->$col) : "'".$this->$col."'");
|
|
}
|
|
$this->db->query("DELETE FROM $this->db_name WHERE $vals",__LINE__,__FILE__);
|
|
|
|
return $this->db->affected_rows();
|
|
}
|
|
|
|
/**
|
|
* dumps all eTemplates to <app>/setup/etemplates.inc.php for distribution
|
|
*
|
|
* @param string $app app- or template-name contain app
|
|
* @return string translated message with number of dumped templates or error-message (webserver has no write access)
|
|
*/
|
|
function dump2setup($app)
|
|
{
|
|
list($app) = explode('.',$app);
|
|
|
|
$this->db->query("SELECT * FROM $this->db_name WHERE et_name LIKE '$app%'");
|
|
|
|
$dir = PHPGW_SERVER_ROOT . "/$app/setup";
|
|
if (!is_writeable($dir))
|
|
{
|
|
return lang("Error: webserver is not allowed to write into '%1' !!!",$dir);
|
|
}
|
|
$file = "$dir/etemplates.inc.php";
|
|
if (file_exists($file))
|
|
{
|
|
$old_file = "$dir/etemplates.old.inc.php";
|
|
if (file_exists($old_file))
|
|
{
|
|
unlink($old_file);
|
|
}
|
|
rename($file,$old_file);
|
|
}
|
|
|
|
if (!($f = fopen($file,'w')))
|
|
{
|
|
return 0;
|
|
}
|
|
fwrite($f,"<?php\n// eTemplates for Application '$app', generated by etemplate.dump() ".date('Y-m-d H:i')."\n\n".
|
|
'/* $'.'Id$ */'."\n\n");
|
|
|
|
for ($n = 0; $this->db->next_record(); ++$n)
|
|
{
|
|
$str = '$templ_data[] = array(';
|
|
foreach ($this->db_cols as $db_col => $name)
|
|
{
|
|
$str .= "'$name' => '".addslashes($this->db->f($db_col))."',";
|
|
}
|
|
$str .= ");\n\n";
|
|
fwrite($f,$str);
|
|
}
|
|
fclose($f);
|
|
|
|
return lang("%1 eTemplates for Application '%2' dumped to '%3'",$n,$app,$file);
|
|
}
|
|
|
|
/**
|
|
* extracts all texts: labels and helptexts from the cells of an eTemplate-object
|
|
*
|
|
* some extensions use a '|' to squezze multiple texts in a label or help field
|
|
*
|
|
* @return array with messages as key AND value
|
|
*/
|
|
function getToTranslate()
|
|
{
|
|
$to_trans = array();
|
|
|
|
$this->widget_tree_walk('getToTranslateCell',$to_trans);
|
|
|
|
//echo '<b>'.$this->name.'</b>'; _debug_array($to_trans);
|
|
return $to_trans;
|
|
}
|
|
|
|
/**
|
|
* Read all eTemplates of an app an extracts the texts to an array
|
|
*
|
|
* @param string $app name of the app
|
|
* @return array with texts
|
|
*/
|
|
function getToTranslateApp($app)
|
|
{
|
|
$to_trans = array();
|
|
|
|
$tpls = $this->search($app);
|
|
|
|
$tpl = new soetemplate; // to not alter our own data
|
|
|
|
while (list(,$keys) = each($tpls))
|
|
{
|
|
if (($keys['name'] != $last['name'] || // write only newest version
|
|
$keys['template'] != $last['template']) &&
|
|
!strstr($keys['name'],'test'))
|
|
{
|
|
$tpl->read($keys);
|
|
$to_trans += $tpl->getToTranslate();
|
|
$last = $keys;
|
|
}
|
|
}
|
|
return $to_trans;
|
|
}
|
|
|
|
/**
|
|
* Write new lang-file using the existing one and all text from the eTemplates
|
|
*
|
|
* @param string $app app- or template-name
|
|
* @param string $lang language the messages in the template are, defaults to 'en'
|
|
* @param array $additional extra texts to translate, if you pass here an array with all messages and
|
|
* select-options they get writen too (form is <unique key> => <message>)
|
|
* @return string translated message with number of messages written (total and new), or error-message
|
|
*/
|
|
function writeLangFile($app,$lang='en',$additional='')
|
|
{
|
|
if (!$additional)
|
|
{
|
|
$additional = array();
|
|
}
|
|
list($app) = explode('.',$app);
|
|
|
|
if (!file_exists(PHPGW_SERVER_ROOT.'/developer_tools/inc/class.solangfile.inc.php'))
|
|
{
|
|
$solangfile = CreateObject('etemplate.solangfile');
|
|
}
|
|
else
|
|
{
|
|
$solangfile = CreateObject('developer_tools.solangfile');
|
|
}
|
|
$langarr = $solangfile->load_app($app,$lang);
|
|
if (!is_array($langarr))
|
|
{
|
|
$langarr = array();
|
|
}
|
|
$commonarr = $solangfile->load_app('phpgwapi',$lang) + $solangfile->load_app('etemplate',$lang);
|
|
|
|
$to_trans = $this->getToTranslateApp($app);
|
|
if (is_array($additional))
|
|
{
|
|
//echo "writeLangFile: additional ="; _debug_array($additional);
|
|
foreach($additional as $msg)
|
|
{
|
|
if (!is_array($msg)) $to_trans[trim(strtolower($msg))] = $msg;
|
|
}
|
|
}
|
|
unset($to_trans['']);
|
|
|
|
for ($new = $n = 0; list($message_id,$content) = each($to_trans); ++$n)
|
|
{
|
|
if (!isset($langarr[$message_id]) && !isset($commonarr[$message_id]))
|
|
{
|
|
if (@isset($langarr[$content])) // caused by not lowercased-message_id's
|
|
{
|
|
unset($langarr[$content]);
|
|
}
|
|
$langarr[$message_id] = array(
|
|
'message_id' => $message_id,
|
|
'app_name' => $app,
|
|
'content' => $content
|
|
);
|
|
++$new;
|
|
}
|
|
}
|
|
ksort($langarr);
|
|
|
|
$dir = PHPGW_SERVER_ROOT . "/$app/setup";
|
|
if (!is_writeable($dir))
|
|
{
|
|
return lang("Error: webserver is not allowed to write into '%1' !!!",$dir);
|
|
}
|
|
$file = "$dir/phpgw_$lang.lang";
|
|
if (file_exists($file))
|
|
{
|
|
$old_file = "$dir/phpgw_$lang.old.lang";
|
|
if (file_exists($old_file))
|
|
{
|
|
unlink($old_file);
|
|
}
|
|
rename($file,$old_file);
|
|
}
|
|
$solangfile->write_file($app,$langarr,$lang);
|
|
$solangfile->loaddb($app,$lang);
|
|
|
|
return lang("%1 (%2 new) Messages writen for Application '%3' and Languages '%4'",$n,$new,$app,$lang);
|
|
}
|
|
|
|
/**
|
|
* Imports the dump-file /$app/setup/etempplates.inc.php unconditional (!)
|
|
*
|
|
* @param string $app app name
|
|
* @return string translated message with number of templates imported
|
|
*/
|
|
function import_dump($app)
|
|
{
|
|
include($path = PHPGW_SERVER_ROOT."/$app/setup/etemplates.inc.php");
|
|
$templ = new etemplate($app);
|
|
|
|
foreach($templ_data as $data)
|
|
{
|
|
$templ->init($data);
|
|
|
|
if (!$templ->modified)
|
|
{
|
|
$templ->modified = filemtime($path);
|
|
}
|
|
$templ->save();
|
|
}
|
|
return lang("%1 new eTemplates imported for Application '%2'",$n,$app);
|
|
}
|
|
|
|
/**
|
|
* test if new template-import necessary for app and does the import
|
|
*
|
|
* Get called on every read of a eTemplate, caches the result in phpgw_info.
|
|
* The timestamp of the last import for app gets written into the db.
|
|
*
|
|
* @param string $app app- or template-name
|
|
* @return string translated message with number of templates imported
|
|
*/
|
|
function test_import($app) // should be done from the setup-App
|
|
{
|
|
list($app) = explode('.',$app);
|
|
|
|
if (!$app || $GLOBALS['phpgw_info']['etemplate']['import_tested'][$app])
|
|
{
|
|
return ''; // ensure test is done only once per call and app
|
|
}
|
|
$GLOBALS['phpgw_info']['etemplate']['import_tested'][$app] = True; // need to be done before new ...
|
|
|
|
$path = PHPGW_SERVER_ROOT."/$app/setup/etemplates.inc.php";
|
|
|
|
if ($time = @filemtime($path))
|
|
{
|
|
$templ = new soetemplate(".$app",'','##');
|
|
if ($templ->lang != '##' || $templ->modified < $time) // need to import
|
|
{
|
|
$ret = $this->import_dump($app);
|
|
$templ->modified = $time;
|
|
$templ->save(".$app",'','##');
|
|
}
|
|
}
|
|
return $ret;
|
|
}
|
|
|
|
/**
|
|
* prints/echos the template's content, eg. for debuging
|
|
*
|
|
* @param boolean $backtrace = true give a function backtrace
|
|
* @param boolean $no_other_objs = true dump other objs (db, html, ...) too
|
|
*/
|
|
function echo_tmpl($backtrace=true,$no_other_objs=true)
|
|
{
|
|
static $objs = array('db','html','xul_io');
|
|
|
|
if ($backtrace) echo "<p>".function_backtrace(1)."</p>\n";
|
|
|
|
if ($no_other_objs)
|
|
{
|
|
foreach($objs as $obj)
|
|
{
|
|
$$obj = &$this->$obj;
|
|
unset($this->$obj);
|
|
}
|
|
}
|
|
_debug_array($this);
|
|
|
|
if ($no_other_objs)
|
|
{
|
|
foreach($objs as $obj)
|
|
{
|
|
$this->$obj = &$$obj;
|
|
unset($$obj);
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* applys a function to each widget in the children tree of the template
|
|
*
|
|
* The function should be defined as [&]func([&]$widget,[&]$extra)
|
|
* If the function returns anything but null or sets $extra['__RETURN__NOW__'] (func has to reference $extra !!!),
|
|
* the walk stops imediatly and returns that result
|
|
*
|
|
* Only some widgets have a sub-tree of children: *box, grid, template, ...
|
|
* For them we call tree_walk($widget,$func,$extra) instead of func direct
|
|
*
|
|
* @param string/array $func function to use or array($obj,'method')
|
|
* @param mixed &$extra extra parameter passed to function
|
|
* @return mixed return-value of func or null if nothing returned at all
|
|
*/
|
|
function &widget_tree_walk($func,&$extra)
|
|
{
|
|
if (!is_callable($func))
|
|
{
|
|
echo "<p><b>boetemplate($this->name)::widget_tree_walk</b>(".print_r($func,true).", ".print_r($extra,true).", ".print_r($opts,true).") func is not callable !!!<br>".function_backtrace()."</p>";
|
|
return false;
|
|
}
|
|
foreach($this->children as $c => $nul)
|
|
{
|
|
$child = &$this->children[$c];
|
|
if (isset($this->widgets_with_children[$child['type']]))
|
|
{
|
|
$result =& $this->tree_walk($child,$func,$extra);
|
|
}
|
|
else
|
|
{
|
|
$result =& $func($child,$extra);
|
|
}
|
|
if (!is_null($result) || isset($extra['__RETURN_NOW__'])) break;
|
|
}
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* applys a function to each child in the tree of a widget (incl. the widget itself)
|
|
*
|
|
* The function should be defined as [&]func([&]$widget,[&]$extra) [] = optional
|
|
* If the function returns anything but null or sets $extra['__RETURN__NOW__'] (func has to reference $extra !!!),
|
|
* the walk stops imediatly and returns that result
|
|
*
|
|
* Only some widgets have a sub-tree of children: *box, grid, template, ...
|
|
* For performance reasons the function use recursion only if a widget with children contains
|
|
* a further widget with children.
|
|
*
|
|
* @param array $widget the widget(-tree) the function should be applied too
|
|
* @param string/array $func function to use or array($obj,'method')
|
|
* @param mixed &$extra extra parameter passed to function
|
|
* @return mixed return-value of func or null if nothing returned at all
|
|
*/
|
|
function &tree_walk(&$widget,$func,&$extra)
|
|
{
|
|
if (!is_callable($func))
|
|
{
|
|
echo "<p><b>boetemplate::tree_walk</b>(, ".print_r($func,true).", ".print_r($extra,true).", ".print_r($opts,true).") func is not callable !!!<br>".function_backtrace()."</p>";
|
|
return false;
|
|
}
|
|
$result =& $func($widget,$extra);
|
|
if (!is_null($result) || isset($extra['__RETURN__NOW__']) || !isset($this->widgets_with_children[$widget['type']]))
|
|
{
|
|
return $result;
|
|
}
|
|
switch($widget['type'])
|
|
{
|
|
case 'box':
|
|
case 'vbox':
|
|
case 'hbox':
|
|
case 'groupbox':
|
|
case 'deck':
|
|
for($n = 1; is_array($widget[$n]); ++$n)
|
|
{
|
|
$child = &$widget[$n];
|
|
if (isset($this->widgets_with_children[$child['type']]))
|
|
{
|
|
$result =& $this->tree_walk($child,$func,$extra);
|
|
}
|
|
else
|
|
{
|
|
$result =& $func($child,$extra);
|
|
}
|
|
if (!is_null($result) || isset($extra['__RETURN__NOW__'])) return $result;
|
|
}
|
|
break;
|
|
|
|
case 'grid':
|
|
$data = &$widget['data'];
|
|
if (!is_array($data)) break; // no children
|
|
|
|
foreach($data as $r => $row)
|
|
{
|
|
if (!$r || !is_array($row)) continue;
|
|
|
|
foreach($row as $c => $col)
|
|
{
|
|
$child = &$data[$r][$c];
|
|
if (isset($this->widgets_with_children[$child['type']]))
|
|
{
|
|
$result =& $this->tree_walk($child,$func,$extra);
|
|
}
|
|
else
|
|
{
|
|
$result =& $func($child,$extra);
|
|
}
|
|
if (!is_null($result) || isset($extra['__RETURN__NOW__'])) return $result;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 'template':
|
|
if (!isset($widget['obj']) && $widget['name'][0] != '@')
|
|
{
|
|
$widget['obj'] = new etemplate;
|
|
if (!$widget['obj']->read($widget['name'])) $widget['obj'] = false;
|
|
}
|
|
if (!is_object($widget['obj'])) break; // cant descent into template
|
|
|
|
$result =& $widget['obj']->widget_tree_walk($func,$extra);
|
|
break;
|
|
}
|
|
return $result;
|
|
}
|
|
}
|
|
|
|
if (!function_exists('getToTranslateCell'))
|
|
{
|
|
/**
|
|
* extracts all translatable labels from a widget
|
|
*
|
|
* @param array $cell the widget
|
|
* @param array &$to_trans array with (lowercased) label => translation pairs
|
|
*/
|
|
function getToTranslateCell($cell,&$to_trans)
|
|
{
|
|
//echo $cell['name']; _debug_array($cell);
|
|
$strings = explode('|',$cell['help']);
|
|
|
|
if ($cell['type'] != 'image')
|
|
{
|
|
$strings = array_merge($strings,explode('|',$cell['label']));
|
|
}
|
|
list($extra_row) = explode(',',$cell['size']);
|
|
if (substr($cell['type'],0,6) == 'select' && !empty($extra_row) && !intval($extra_row))
|
|
{
|
|
$strings[] = $extra_row;
|
|
}
|
|
if (!empty($cell['blur']))
|
|
{
|
|
$strings[] = $cell['blur'];
|
|
}
|
|
foreach($strings as $str)
|
|
{
|
|
if (strlen($str) > 1 && $str[0] != '@')
|
|
{
|
|
$to_trans[trim(strtolower($str))] = $str;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|