[ Index ]

PHP Cross Reference of Unnamed Project

title

Body

[close]

/se3master/var/www/se3/tests/ -> test_internet.php (source)

   1  <?php
   2  
   3  
   4     /**
   5     
   6     * Test la connexion au serveur web wawadeb
   7     * @Version $Id: test_internet.php 6166 2011-02-26 13:33:55Z keyser $ 
   8     * @Projet LCS / SambaEdu 
   9     * @auteurs Philippe Chadefaux  MrT
  10     * @Licence Distribue selon les termes de la licence GPL
  11     * @note
  12     * Modifications proposées par Sébastien Tack (MrT)
  13     * Optimisation du lancement des scripts bash par la technologie asynchrone Ajax.
  14   
  15     
  16     */
  17  
  18     /**
  19  
  20     * @Repertoire: /tests/
  21     * file: test_internet.php
  22     */
  23  
  24  
  25  
  26  require_once ('entete_ajax.inc.php');
  27  /********** Test de la conf du serveur **********************/
  28  $phpv2=preg_replace("/[^0-9\.]+/","",phpversion());
  29  $phpv=$phpv2-0;
  30  
  31  /*******************************************************/
  32  
  33  $PING_INTERNET="195.221.20.10";
  34  if ($phpv>=4.2) {
  35      $PING="ping -c 1 -w 1 $PING_INTERNET | awk '/packet/ {print $6}'";
  36  } else {
  37      $PING="ping -c 1 $PING_INTERNET | awk '/packet/ {print $7}'";
  38  }
  39  
  40  $ligne_internet=exec("$PING",$test,$testretour);
  41  if ($ligne_internet != "0%") { // on teste sur un autre serveur
  42     $PING_INTERNET="www.free.fr";
  43     if ($phpv>=4.2) {
  44      $PING="ping -c 1 -w 1 $PING_INTERNET | awk '/packet/ {print $6}'";
  45     } else {
  46      $PING="ping -c 1 $PING_INTERNET | awk '/packet/ {print $7}'";
  47     }
  48      
  49     $ligne_internet=exec("$PING",$test,$testretour);
  50  }
  51  // leb 30sept2007
  52  if ($ligne_internet != "0%") { // test acces http
  53     $http=exec("cd /tmp; wget -q ---tries=1 --timeout=2 http://wawadeb.crdp.ac-caen.fr && echo \$? | rm -f /tmp/index.html.1*",$out,$retour);
  54     if ($retour=="0") {
  55         $ligne_internet = "0%";
  56     }
  57  }
  58  // fin-leb 30sept2007
  59  // Verifie si proxy defini
  60  $proxy=exec("cat /etc/profile | grep http_proxy= | cut -d= -f2");
  61  if ($proxy != "") {
  62      preg_match("/http:\/\/(.*)\"/i",$proxy,$rest);
  63      putenv("http_proxy=$rest[1]");
  64  }
  65  
  66  //$ligne_internet="1%";
  67  
  68  
  69  echo "$ligne_internet";
  70  ?>


Generated: Tue Mar 17 22:47:18 2015 Cross-referenced by PHPXref 0.7.1