lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Qual: Mutualize code

Browse Source
This commit is contained in:
Laurent Destailleur 2008-12-07 20:10:59 +00:00
parent 8b263e4b16
commit 7e0fbd02a1
5 changed files with 103 additions and 267 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

48
dev/skeletons/modMyModule.class.php
View File

@ -194,57 +194,13 @@ class modMyModule extends DolibarrModules
/**
* \brief Create tables and keys required by module
* Files mymodule.sql and mymodule.key.sql with create table and create keys
* commands must be stored in directory /mysql/tables/mymodule/.
* commands must be stored in directory /mymodule/sql/
* This function is called by this->init.
* \return int <=0 if KO, >0 if OK
*/
function load_tables()
{
include_once(DOL_DOCUMENT_ROOT ."/lib/admin.lib.php");
global $db;
$ok = 1;
if ($ok)
{
$dir = DOL_DOCUMENT_ROOT.'/mymodule/sql/';
$ok = 0;
// Run llx_mytable.sql files
$handle=opendir($dir);
if ($hanlde)
{
while (($file = readdir($handle))!==false)
{
if (eregi('\.sql$',$file) && substr($file,0,4) == 'llx_' && substr($file, -8) <> '.key.sql')
{
$result=run_sql($dir.$file,1);
}
}
closedir($handle);
}
// Run llx_mytable.key.sql files
if ($hanlde)
{
$handle=opendir($dir);
while (($file = readdir($handle))!==false)
{
if (eregi('\.sql$',$file) && substr($file,0,4) == 'llx_' && substr($file, -8) == '.key.sql')
{
$result=run_sql($dir.$file,1);
}
}
closedir($handle);
}
if ($error == 0)
{
$ok = 1;
}
}
return $ok;
return $this->_load_tables('/mymodule/sql/');
}
}

2
htdocs/admin/modules.php
View File

@ -131,7 +131,7 @@ function Activate($value,$withdeps=1)
*/
function UnActivate($value,$requiredby=1)
{
global $db, $modules;
global $db, $modules, $conf;
$modName = $value;

117
htdocs/includes/modules/DolibarrModules.class.php
View File

@ -107,11 +107,12 @@ class DolibarrModules
{
$sql=$array_sql[$i];
dolibarr_syslog("DolibarrModules::_init sql=".$sql, LOG_DEBUG);
$result=$this->db->query($sql);
if (! $result)
{
$this->error=$this->db->error();
dolibarr_syslog("DolibarrModules::_init Error sql=".$sql." - ".$this->error, LOG_ERR);
dolibarr_syslog("DolibarrModules::_init Error ".$this->error, LOG_ERR);
$err++;
}
}
@ -216,10 +217,10 @@ class DolibarrModules
/**
\brief Retourne le nom traduit du module si la traduction existe dans admin.lang,
sinon le nom defini par defaut dans le module.
\return string Nom du module traduit
*/
* \brief Retourne le nom traduit du module si la traduction existe dans admin.lang,
* sinon le nom defini par defaut dans le module.
* \return string Nom du module traduit
*/
function getName()
{
global $langs;
@ -239,10 +240,10 @@ class DolibarrModules
/**
\brief Retourne la description traduite du module si la traduction existe dans admin.lang,
sinon la description definie par defaut dans le module.
\return string Nom du module traduit
*/
* \brief Retourne la description traduite du module si la traduction existe dans admin.lang,
* sinon la description definie par defaut dans le module.
* \return string Nom du module traduit
*/
function getDesc()
{
global $langs;
@ -262,12 +263,12 @@ class DolibarrModules
/**
\brief Retourne la version du module.
Pour les modules a l'etat 'experimental', retourne la traduction de 'experimental'
Pour les modules 'dolibarr', retourne la version de Dolibarr
Pour les autres modules, retourne la version du module
\return string Version du module
*/
* \brief Retourne la version du module.
* Pour les modules a l'etat 'experimental', retourne la traduction de 'experimental'
* Pour les modules 'dolibarr', retourne la version de Dolibarr
* Pour les autres modules, retourne la version du module
* \return string Version du module
*/
function getVersion()
{
global $langs;
@ -282,8 +283,8 @@ class DolibarrModules
/**
\brief Retourne la version en base du module.
\return string Version du module
* \brief Retourne la version en base du module.
* \return string Version du module
*/
function getDbVersion()
{
@ -318,8 +319,8 @@ class DolibarrModules
/**
\brief Retourne la liste des fichiers lang en rapport avec le module
\return array Tableau des fichier lang
* \brief Retourne la liste des fichiers lang en rapport avec le module
* \return array Tableau des fichier lang
*/
function getLangFilesArray()
{
@ -327,8 +328,8 @@ class DolibarrModules
}
/**
\brief Retourne le libelle d'un lot de donnees exportable
\return string Libelle du lot de donnees
* \brief Retourne le libelle d'un lot de donnees exportable
* \return string Libelle du lot de donnees
*/
function getDatasetLabel($r)
{
@ -424,8 +425,68 @@ class DolibarrModules
/**
\brief Insere les boites associees au module dans llx_boxes_def
\return int Nombre d'erreurs (0 si ok)
* \brief Create tables and keys required by module
* Files module.sql and module.key.sql with create table and create keys
* commands must be stored in directory reldir='/module/sql/'
* This function is called by this->init.
* \return int <=0 if KO, >0 if OK
*/
function _load_tables($reldir)
{
global $db,$conf;
include_once(DOL_DOCUMENT_ROOT ."/lib/admin.lib.php");
$ok = 1;
foreach($conf->dol_document_root as $dirroot)
{
if ($ok)
{
$dir = $dirroot.$reldir;
$ok = 0;
// Run llx_mytable.sql files
$handle=opendir($dir);
if ($handle)
{
while (($file = readdir($handle))!==false)
{
if (eregi('\.sql$',$file) && substr($file,0,4) == 'llx_' && substr($file, -8) <> '.key.sql')
{
$result=run_sql($dir.$file,1);
}
}
closedir($handle);
}
// Run llx_mytable.key.sql files
$handle=opendir($dir);
if ($handle)
{
while (($file = readdir($handle))!==false)
{
if (eregi('\.sql$',$file) && substr($file,0,4) == 'llx_' && substr($file, -8) == '.key.sql')
{
$result=run_sql($dir.$file,1);
}
}
closedir($handle);
}
if ($error == 0)
{
$ok = 1;
}
}
}
return $ok;
}
/**
* \brief Insere les boites associees au module dans llx_boxes_def
* \return int Nombre d'erreurs (0 si ok)
*/
function insert_boxes()
{
@ -473,8 +534,8 @@ class DolibarrModules
/**
\brief Supprime les documents
\return int Nombre d'erreurs (0 si ok)
* \brief Supprime les documents
* \return int Nombre d'erreurs (0 si ok)
*/
function delete_docs()
{
@ -503,9 +564,9 @@ class DolibarrModules
/**
\brief Supprime les boites
\return int Nombre d'erreurs (0 si ok)
*/
* \brief Supprime les boites
* \return int Nombre d'erreurs (0 si ok)
*/
function delete_boxes()
{
$err=0;

42
htdocs/includes/modules/modCashDesk.class.php
View File

@ -153,51 +153,13 @@ class modCashDesk extends DolibarrModules
/**
* \brief Create tables and keys required by module
* Files mymodule.sql and mymodule.key.sql with create table and create keys
* commands must be stored in directory /mysql/tables/mymodule/.
* commands must be stored in directory /mymodule/sql/
* This function is called by this->init.
* \return int <=0 if KO, >0 if OK
*/
function load_tables()
{
include_once(DOL_DOCUMENT_ROOT ."/lib/admin.lib.php");
global $db;
$ok = 1;
if ($ok)
{
$dir = DOL_DOCUMENT_ROOT.'/cashdesk/sql/';
$ok = 0;
// Run llx_mytable.sql files
$handle=opendir($dir);
while (($file = readdir($handle))!==false)
{
if (eregi('\.sql$',$file) && substr($file,0,4) == 'llx_' && substr($file, -8) <> '.key.sql')
{
$result=run_sql($dir.$file,1);
}
}
closedir($handle);
// Run llx_mytable.key.sql files
$handle=opendir($dir);
while (($file = readdir($handle))!==false)
{
if (eregi('\.sql$',$file) && substr($file,0,4) == 'llx_' && substr($file, -8) == '.key.sql')
{
$result=run_sql($dir.$file,1);
}
}
closedir($handle);
if ($error == 0)
{
$ok = 1;
}
}
return $ok;
return $this->_load_tables('/cashdesk/sql/');
}
}

161
htdocs/includes/modules/modTelephonie.class.php
View File

@ -302,160 +302,17 @@ class modTelephonie extends DolibarrModules
return $this->_remove($sql);
}
/*
*
*
*/
/**
* \brief Create tables and keys required by module
* Files mymodule.sql and mymodule.key.sql with create table and create keys
* commands must be stored in directory /mymodule/sql/.
* This function is called by this->init.
* \return int <=0 if KO, >0 if OK
*/
function load_tables()
{
/**************************************************************************************
*
* Chargement fichiers tables/*.sql (non *.key.sql)
* A faire avant les fichiers *.key.sql
*
***************************************************************************************/
$ok = 1;
if ($ok)
{
$dir = DOL_DOCUMENT_ROOT.'/telephonie/sql/';
$ok = 0;
$handle=opendir($dir);
$table_exists = 0;
while (($file = readdir($handle))!==false)
{
if (substr($file, strlen($file) - 4) == '.sql' && substr($file,0,4) == 'llx_' && substr($file, -8) <> '.key.sql')
{
$name = substr($file, 0, strlen($file) - 4);
$buffer = '';
$fp = fopen($dir.$file,"r");
if ($fp)
{
while (!feof ($fp))
{
$buf = fgets($fp, 4096);
if (substr($buf, 0, 2) <> '--')
{
$buffer .= $buf;
}
}
fclose($fp);
}
//print "<tr><td>Creation de la table $name/td>";
$requestnb++;
if (@$this->db->query($buffer))
{
//print "<td>OK requete ==== $buffer</td></tr>";
}
else
{
if ($this->db->errno() == 'DB_ERROR_TABLE_ALREADY_EXISTS')
{
//print "<td>Deje existante</td></tr>";
$table_exists = 1;
}
else
{
$error++;
}
}
}
}
closedir($handle);
if ($error == 0)
{
$ok = 1;
}
}
/***************************************************************************************
*
* Chargement fichiers tables/*.key.sql
* A faire apres les fichiers *.sql
*
***************************************************************************************/
if ($ok)
{
$okkeys = 0;
$handle=opendir($dir);
$table_exists = 0;
while (($file = readdir($handle))!==false)
{
if (substr($file, strlen($file) - 4) == '.sql' && substr($file,0,4) == 'llx_' && substr($file, -8) == '.key.sql')
{
$name = substr($file, 0, strlen($file) - 4);
$buffer = '';
$fp = fopen($dir.$file,"r");
if ($fp)
{
while (!feof ($fp))
{
$buf = fgets($fp, 4096);
// Cas special de lignes autorisees pour certaines versions uniquement
if (eregi('^-- V([0-9\.]+)',$buf,$reg))
{
$versioncommande=split('\.',$reg[1]);
//print var_dump($versioncommande);
//print var_dump($versionarray);
if (sizeof($versioncommande) && sizeof($versionarray)
&& versioncompare($versioncommande,$versionarray) <= 0)
{
// Version qualified, delete SQL comments
$buf=eregi_replace('^-- V([0-9\.]+)','',$buf);
//print "Ligne $i qualifiee par version: ".$buf.'<br>';
}
}
// Ajout ligne si non commentaire
if (! eregi('^--',$buf)) $buffer .= $buf;
}
fclose($fp);
}
// Si plusieurs requetes, on boucle sur chaque
$listesql=split(';',$buffer);
foreach ($listesql as $buffer)
{
if (trim($buffer))
{
$requestnb++;
if (@$this->db->query(trim($buffer)))
{
//print "<td>OK requete ==== $buffer</td></tr>";
}
else
{
if ($this->db->errno() == 'DB_ERROR_KEY_NAME_ALREADY_EXISTS' ||
$this->db->errno() == 'DB_ERROR_CANNOT_CREATE' ||
$this->db->errno() == 'DB_ERROR_PRIMARY_KEY_ALREADY_EXISTS' ||
eregi('duplicate key name',$this->db->error()))
{
$key_exists = 1;
}
else
{
$error++;
}
}
}
}
}
}
closedir($handle);
if ($error == 0)
{
$okkeys = 1;
}
}
return $this->_load_tables('/telephonie/sql/');
}
}
?>