+global\Translate::loadFromDatabase()

Complexity

Conditions	25
Paths	652

Size

Total Lines	128
Code Lines	56

Duplication

Lines	0
Ratio	0 %

Importance

Changes

0

<?php
	function loadFromDatabase($db)
	{
		global $conf;

		$domain='database';

		// Check parameters
		if (empty($db)) return 0;    // Database handler can't be used

		//dol_syslog("Translate::Load Start domain=".$domain." alt=".$alt." forcelangdir=".$forcelangdir." this->defaultlang=".$this->defaultlang);

		$newdomain = $domain;
		$modulename = '';

        // Check cache
		if (! empty($this->_tab_loaded[$newdomain]))	// File already loaded for this domain
		{
			//dol_syslog("Translate::Load already loaded for newdomain=".$newdomain);
			return 0;
		}

		$this->_tab_loaded[$newdomain] = 1;   // We want to be sure this function is called once only.

        $fileread=0;
		$langofdir=(empty($forcelangdir)?$this->defaultlang:$forcelangdir);

The variable $forcelangdir seems to never exist, and therefore empty should always return true. Did you maybe rename this variable?

		// Redefine alt
		$alt=2;

		if (empty($langofdir))	// This may occurs when load is called without setting the language and without providing a value for forcelangdir
		{
			dol_syslog("Error: ".get_class($this)."::Load was called but language was not set yet with langs->setDefaultLang(). Nothing will be loaded.", LOG_WARNING);
			return -1;
		}

		// TODO Move cache read out of loop on dirs or at least filelangexists
	    $found=false;

		// Enable caching of lang file in memory (not by default)
		$usecachekey='';
		// Using a memcached server
		if (! empty($conf->memcached->enabled) && ! empty($conf->global->MEMCACHED_SERVER))
		{
			$usecachekey=$newdomain.'_'.$langofdir.'_'.md5($file_lang);    // Should not contains special chars

The variable $file_lang does not exist. Did you forget to declare it?

		}
		// Using cache with shmop. Speed gain: 40ms - Memory overusage: 200ko (Size of session cache file)
		else if (isset($conf->global->MAIN_OPTIMIZE_SPEED) && ($conf->global->MAIN_OPTIMIZE_SPEED & 0x02))
		{
			$usecachekey=$newdomain;
		}

		if ($usecachekey)
		{
	        //dol_syslog('Translate::Load we will cache result into usecachekey '.$usecachekey);
            //global $aaa; $aaa+=1;
            //print $aaa." ".$usecachekey."\n";
		    require_once DOL_DOCUMENT_ROOT .'/core/lib/memory.lib.php';
			$tmparray=dol_getcache($usecachekey);
			if (is_array($tmparray) && count($tmparray))
			{
				$this->tab_translate+=$tmparray;	// Faster than array_merge($tmparray,$this->tab_translate). Note: If a valuer already exists into tab_translate, value into tmparaay is not added.
				//print $newdomain."\n";
				//var_dump($this->tab_translate);
				$fileread=1;
				$found=true;						// Found in dolibarr PHP cache
			}
		}

		if (! $found && ! empty($conf->global->MAIN_ENABLE_OVERWRITE_TRANSLATION))
		{
    		// Overwrite translation with database read
            $sql="SELECT transkey, transvalue FROM ".MAIN_DB_PREFIX."overwrite_trans where lang='".$db->escape($this->defaultlang)."'";
		    $resql=$db->query($sql);

		    if ($resql)
		    {
    		    $num = $db->num_rows($resql);
    		    if ($num)
    		    {
    				if ($usecachekey) $tabtranslatedomain=array();	// To save lang content in cache

    				$i = 0;
    				while ($i < $num)	// Ex: Need 225ms for all fgets on all lang file for Third party page. Same speed than file_get_contents
    				{
    				    $obj=$db->fetch_object($resql);

    				    $key=$obj->transkey;
    					$value=$obj->transvalue;

						//print "Domain=$domain, found a string for $tab[0] with value $tab[1]<br>";
						if (empty($this->tab_translate[$key]))    // If translation was already found, we must not continue, even if MAIN_FORCELANGDIR is set (MAIN_FORCELANGDIR is to replace lang dir, not to overwrite entries)
						{
							$value=trim(preg_replace('/\\n/',"\n",$value));

							$this->tab_translate[$key]=$value;
							if ($usecachekey) $tabtranslatedomain[$key]=$value;	// To save lang content in cache

The variable $tabtranslatedomain does not seem to be defined for all execution paths leading up to this point.

						}

    					$i++;
    				}

    				$fileread=1;

    				// TODO Move cache write out of loop on dirs
    				// To save lang content for usecachekey into cache
    				if ($usecachekey && count($tabtranslatedomain))
    				{
    					$ressetcache=dol_setcache($usecachekey,$tabtranslatedomain);
    					if ($ressetcache < 0)
    					{
    					    $error='Failed to set cache for usecachekey='.$usecachekey.' result='.$ressetcache;
    					    dol_syslog($error, LOG_ERR);
    					}
    				}
    			}
		    }
		    else
		    {
		        dol_print_error($db);
		    }
		}

		if ($fileread) $this->_tab_loaded[$newdomain]=1;	// Set domain file as loaded

		if (empty($this->_tab_loaded[$newdomain])) $this->_tab_loaded[$newdomain]=2;           // Marque ce cas comme non trouve (no lines found for language)

		return 1;
	}