source: extensions/PHP_Optimisateur/include/functions.php @ 14511

<?php

// Affiche les textes localisés
function l10n($code) {
  global $lang;
  if (isset($lang[$code])) {
    $args = func_get_args();
    if (count($args) > 1) {
      array_shift($args);
      return vsprintf($lang[$code], $args);
    } else {
      return $lang[$code];
    }
  } else {
    return $code;
  }
}

// Retourne la langue de l'utilisateur et les langues installées
function GetLanguage() {
  // tableau avec les langues installées
  $dh = opendir('language');
  while ($file = readdir($dh)) {
    if ($file !== '.' && $file !== '..' && is_dir('language/'.$file)) {
      $name = (file_exists('language/'.$file.'/iso.txt')) ? file_get_contents('language/'.$file.'/iso.txt') : $file;
      $languages[$file] = $name;
    }
  }
  closedir($dh);
  
  // recherche du paramètre get ou session, ou langue du navigateur
  if (isset($_GET['Lang'])) {
    $user_lang = $_GET['Lang'];
  } else if (isset($_SESSION['Lang']) AND $_SESSION['Lang'] != NULL) {
    $user_lang = $_SESSION['Lang'];
  } else {
    $user_lang = substr($_SERVER['HTTP_ACCEPT_LANGUAGE'],0,2);
  }
  
  // si langue navigateur cherche une correspondance dans la tableau
  if (strlen($user_lang) == 2) {
    foreach (array_keys($languages) as $lang) {
      if ($user_lang == substr($lang,0,2)) {
        $user_lang = $lang;
        break;
      }
    }
  }
  
  // si pas de correspondance OU get faux, langue par défaut
  if (!in_array($user_lang, array_keys($languages))) {
    $user_lang = 'en_UK';
  }
  
  $_SESSION['Lang'] = $user_lang;
  return array('user_lang' => $_SESSION['Lang'], 'languages' => $languages);
}

// Supprime tous les caractères speciaux
function delete_special_car($string) {
  global $CONF;
  
  $search = array ('#[éèêë]#','#[ÊËÈÉ]#','#[àâäã]#','#[ÂÄÁÀ]#','#[îïíì]#','#[ÎÏÍÌ]#','#[ûùüúµ]#','#[ÛÙÚÜ]#','#[ôóòõö]#','#[ÓÒÖÔÕ]#','#[ç]#','#[Ç]#','#[ñ]#','#[Ñ]#','#[ýÿ]#','#[Ý]#','#[ \&\!\?\#\"\(\)\{\}\[\]\=\+\~\%]#','#[^a-zA-Z0-9_\.\-]#');
  $replace = array ('e','E','a','A','i','I','u','U','o','O','c','C',',n','N','y','Y','_','');
  
  if ($CONF['renameORNOT']) {
    return preg_replace($search, $replace, $string);
  } else {
    return str_replace(array('%','$',' '), '_', $string);
  }
}

// Teste si un dossier est vide
function is_dir_empty($dir) {
  $array = scandir($dir);
  if (count($array) > 2) {
    return false;
  } else {
    return true;
  }
}

// Supprime un repertoire non-vide
function rrmdir($dir) {
  $dir = rtrim($dir, '/');
  $objects = scandir($dir);
  
  foreach ($objects as $object) {
    if ($object !== '.' && $object !== '..') {
      $path = $dir.'/'.$object;
      if (filetype($path) == 'dir') rrmdir($path); 
      else unlink($path);
    }
  }

  rmdir($dir);
} 

// Parcours récursivement un dossier
function recursive_readdir($dir, $array, $dirs=false) {
  # si $dirs=true liste les dossiers plutot que les fichiers
  global ${$array}; // Charge la tableau pour la sortie, déclaré à l'exterieur à cause de l'appel recursif de la fonction
  $dir = rtrim($dir, '/');
  $dh = opendir($dir);
  
  while (($file = readdir($dh)) !== false ) {
    if ($file !== '.' && $file !== '..') {
      $path = $dir.'/'.$file;
      if (is_dir($path)) {
        if($dirs) ${$array}[] = $path;
        recursive_readdir($path, $array, $dirs);
      } else {
        if(!$dirs) ${$array}[] = $path;
      }
    }
  }
  closedir($dh);
}

// Parse le fichier de configuration
function XMLParse($xml) {
  $content = array();
  foreach ($xml as $nom => $elem) { 
    if (trim($elem) == '' AND $elem != '') { 
      $content[$nom] = XMLParse($elem->children()); 
    } else { 
      $content[$nom] = utf8_encode(utf8_decode($elem));
    }
  }
  return $content;
}

// Crée le fichier de configuration
function XMLCreate($array, $level=0) {
  $content = null;
  foreach ($array as $nom => $elem) {
    if (is_array($elem)) {
      for($i=0;$i<=$level;$i++) $content .= "  ";
      $content .= '<'.$nom.'>'."\n";
      $content .= XMLCreate($elem, $level+1);
      for($i=0;$i<=$level;$i++) $content .= "  ";
      $content .= '</'.$nom.'>'."\n";
    } else {
      for($i=0;$i<=$level;$i++) $content .= "  ";
      $content .= '<'.$nom.'>'.$elem.'</'.$nom.'>'."\n";
    }
  }
  return $content;
}

// Charge la configuration
function load_config($file) {
  $config = simplexml_load_file($file);
  $config = XMLParse($config);
  $config = array_settype($config);
  return $config;
}

// Convertit les booléens, entiers et flotants d'un tableau de 'string'
function array_settype($array) {
  foreach ($array as $key => $value) {
    if (is_array($value)) {
      $array[$key] = array_settype($value);
    } else {
      if ($value === 'true') {
        $array[$key] = true;
      } else if ($value === 'false') {
        $array[$key] = false;
      } else if ($value == null) {
        // rien à faire ^^
      } else if (preg_match('#^([0-9]*)$#', $value)) {
        settype($array[$key], 'int');
      } else if (preg_match('#^([0-9]*)(\.)([0-9]*)$#', $value)) {
        settype($array[$key], 'float');
      }
    }
  }
    
  return $array;
}

// Booléen vers français ou texte
function bool_to_string($string, $just_echo=0) {
  global $lang;
  # $just_echo pour pouvoir afficher un booléen tel quel (echo true; n'affiche rien)
  if (is_bool($string)) {
    if ($string) {
      if ($just_echo) return 'true';
      else return l10n('yes');
    } else {
      if ($just_echo) return 'false';
      else return l10n('no');
    }
  } else {
    return $string;
  }
}

// Converti une chaine de config (param:value;param:value[;]) en tableau associatif
function ExplodeString($string, $sep1=';', $sep2=':') {
  $string = preg_replace('#[;]$#', '', $string);
  $result = array();
  $a = explode($sep1, $string);
  
  foreach ($a as $s) {
     $v = explode($sep2, $s);
     $result[$v[0]] = $v[1];
  }
  return $result;
}

// Converti un tableau associatif en chaine de config (param:value;param:value;)
function ImplodeArray($array, $sep1=';', $sep2=':') {
  $result = null;
  foreach ($array as $key => $value) {
    $result .= $key.$sep2.$value.$sep1;
  }
  return $result;
}

// Convertit les couleurs 'numériques' et gère les 0 manquants
function nice_hex_color($hex) {
  $hex = strval($hex);
  for ($i=strlen($hex); $i<6; $i++) {
    $hex = '0'.$hex;
  }
  return $hex;
}

// Converti une couleur HEX et RGB
function hex2RGB($hexStr, $returnAsString = false, $seperator = ',') {
  $hexStr = preg_replace("/[^0-9A-Fa-f]/", '', $hexStr); // Gets a proper hex string
  
  if (strlen($hexStr) == 6) { //If a proper hex code, convert using bitwise operation. No overhead... faster
    $colorVal = hexdec($hexStr);
    $rgbArray['r'] = 0xFF & ($colorVal >> 0x10);
    $rgbArray['g'] = 0xFF & ($colorVal >> 0x8);
    $rgbArray['b'] = 0xFF & $colorVal;
  } elseif (strlen($hexStr) == 3) { //if shorthand notation, need some string manipulations
    $rgbArray['r'] = hexdec(str_repeat(substr($hexStr, 0, 1), 2));
    $rgbArray['g'] = hexdec(str_repeat(substr($hexStr, 1, 1), 2));
    $rgbArray['b'] = hexdec(str_repeat(substr($hexStr, 2, 1), 2));
  } else {
    return false; //Invalid hex color code
  }
  
  return $returnAsString ? implode($seperator, $rgbArray) : $rgbArray; // returns the rgb string or the associative array
}

// Verifie si une chaine est un nombre décimal (plus strict que is_numeric qui fonctionne avec les hexadecimaux)
function is_decimal($num) {
  if((is_numeric($num) === true AND (float)$num == $num) OR $num === '0') {
    return true;
  } else {
    return false;
  }
}

// Charge le fichier de langue d'un plugin
function load_plugin_lang($plugin_id) {
  global $CONF, $lang;
  if (file_exists('plugins/'.$plugin_id.'/language/'.$CONF['user_lang'].'.php')) {
    include('plugins/'.$plugin_id.'/language/'.$CONF['user_lang'].'.php');
  } else {
    include('plugins/'.$plugin_id.'/language/en_UK.php');
  }
}

// fonction nconvert avec gestion du log
function nconvert($param, $log=true) {
  global $LOG;

  exec('include\nconvert.exe '. $param .' 2>&1', $out);
  
  if ($log) {
    for ($i=0; $i<=3; $i++)
      unset($out[$i]);
    if (count($out)) $LOG[] = array_values($out);
    //$LOG[] = "  " . $param;
  } else {
    return $out;
  }
}

// fonction mkdir avec gestion du log
function mkdir_log($dir) {
  global $LOG;
  mkdir($dir, 0777, true);
  $LOG[] = 'Dir '.$dir.' created';
}

// fonction copy avec gestion du log
function copy_log($src, $dest) {
  global $LOG;
  copy($src, $dest);
  $LOG[] = 'Copy '.$src.' to '.$dest;
}

// fonction rename avec gestion du log
function rename_log($path, $new_path, $move=false) {
  global $LOG;
  rename($path, $new_path);
  if ($move)
    $LOG[] = 'Move '.$path.' to '.$new_path;
  else
    $LOG[] = 'Rename '.$path.' into '.$new_path;
}

// enregistre le log dans un fichier
function print_log($nb, $s) {
  global $APPversion, $LOG;
  
  $config = file_get_contents('config.xml');
  
  $string = 
    "PHP Optimisateur " . $APPversion . "\r\n".
    date('r') . "\r\n".
    $nb . " files in " . $s . " seconds" . "\r\n\r\n".
    
    $config . "\r\n\r\n";
  
  foreach ($LOG as $event) {
    if (is_array($event)) {
      $string .= implode("\r\n", $event) . "\r\n";
    } else {
      $string .= $event . "\r\n";
    }
  }
  
  if (!file_exists('logs')) {
    mkdir('logs', 0777, true);
  }
  
  $filename = 'log_' . date('Y-m-d_H-i-s') . '.txt';
  file_put_contents('logs/'.$filename, $string);
  return $filename;
}

// case insentive version of in_array
function in_arrayi($needle, $haystack) {
  $needle = strtolower($needle);
  $haystack = array_map('strtolower', $haystack);
  return in_array($needle, $haystack);
}

?>