Introduction par l'exemple à PHP 4

dos>mysql -u admimpots -p
Enter password: *********
Welcome to the MySQL monitor.  Commands end with ; or \g.
Your MySQL connection id is 18 to server version: 3.23.49-max-nt

Type 'help;' or '\h' for help. Type '\c' to clear the buffer.

mysql> use dbimpots;
Database changed

mysql> show tables;
+--------------------+
| Tables_in_dbimpots |
+--------------------+
| impots             |
+--------------------+
1 row in set (0.00 sec)

mysql> describe impots;
+---------+--------+------+-----+---------+-------+
| Field   | Type   | Null | Key | Default | Extra |
+---------+--------+------+-----+---------+-------+
| limites | double | YES  |     | NULL    |       |
| coeffR  | double | YES  |     | NULL    |       |
| coeffN  | double | YES  |     | NULL    |       |
+---------+--------+------+-----+---------+-------+
3 rows in set (0.02 sec)

mysql> select * from impots;
+---------+--------+---------+
| limites | coeffR | coeffN  |
+---------+--------+---------+
|   12620 |      0 |       0 |
|   13190 |   0.05 |     631 |
|   15640 |    0.1 |  1290.5 |
|   24740 |   0.15 |  2072.5 |
|   31810 |    0.2 |  3309.5 |
|   39970 |   0.25 |    4900 |
|   48360 |    0.3 |    6898 |
|   55790 |   0.35 |  9316.5 |
|   92970 |    0.4 |   12106 |
|  127860 |   0.45 |   16754 |
|  151250 |    0.5 | 23147.5 |
|  172040 |   0.55 |   30710 |
|  195000 |    0.6 |   39312 |
|       0 |   0.65 |   49062 |
+---------+--------+---------+
14 rows in set (0.00 sec)

mysql>quit

   // attributs
    var $limites;        // tableau des limites
    var $coeffR;        // tableau des coeffR
    var $coeffN;        // tableau des coeffN
    var $erreurs;        // tableau des erreurs

    // constructeur
    function ImpotsDSN($impots){...}

    // méthode
    function calculer($personne){...}

// dsn : nom DSN de la source ODBC de données contenant les valeurs des tableaux limites, coeffR, coeffN
// user : nom d'un utilisateur ayant un droit de lecture sur la source ODBC
// pwd : son mot de passe
// table : nom de la table contenant les valeurs (limites, coeffR, coeffN)
// limites : nom de la colonne contenant les valeurs limites
// coeffR : nom de la colonne contenant les valeurs coeffR       
// coeffN : nom de la colonne contenant les valeurs coeffN

      // $personne["marié"] : oui, non
      // $personne["enfants"] : nombre d'enfants
      // $personne["salaire"] : salaire annuel

<?php
  // définition d'une classe objImpots
  class ImpotsDSN{

    // attributs : les 3 tableaux de données
    var $limites;        // tableau des limites
    var $coeffR;        // tableau des coeffR
    var $coeffN;        // tableau des coeffN
    var $erreurs;        // tableau des erreurs

    // constructeur
    function ImpotsDSN($impots){
      // $impots : dictionnaire contenant les champs suivants
      // dsn : nom DSN de la source ODBC de données contenant les valeurs des tableaux limites, coeffR, coeffN
      // user : nom d'un utilistaeur ayant un droit de lecture sur la source ODBC
      // pwd : son mot de passe
      // table : nom de la table contenant les valeurs (limites, coeffR, coeffN)
      // limites : nom de la colonne contenant les valeurs limites
      // coeffR : nom de la colonne contenant les valeurs coeffR       
      // coeffN : nom de la colonne contenant les valeurs coeffN

      // au départ pas d'erreurs
      $this->erreurs=array();
      
            // vérification de l'appel
      if (! isset($impots[dsn]) || ! isset($impots[user]) ||! isset($impots[pwd]) ||! isset($impots[table]) ||
          ! isset($impots[limites]) ||! isset($impots[coeffR]) ||! isset($impots[coeffN])){
        // erreur
        $this->erreurs[]="Appel incorrect";
        // fin
        return;
      }//if
      
      // ouverture de la base DSN
      $connexion=odbc_connect($impots[dsn],$impots[user],$impots[pwd]);
      // erreur ?
      if(! $connexion){
        // erreur
        $this->erreurs[]="Impossible d'ouvrir la base DSN [$impots[dsn]] (".odbc_error().")";
        // fin
        return;
      }//if

            // émission d'une requête sur la base
      $requête=odbc_prepare($connexion,"select $impots[limites],$impots[coeffR],$impots[coeffN] from $impots[table]");
            if(! odbc_execute($requête)){
        // erreur
        $this->erreurs[]="Impossible d'expoiter la base DSN [$impots[dsn]] (".odbc_error().")";
        // fin
        odbc_close($connexion);
        return;
      }//if
      
      // exploitation des résultats de la requête
      $this->limites=array();
      $this->coeffR=array();
      $this->coeffN=array();
      while(odbc_fetch_row($requête)){     
          // une ligne de plus
        $this->limites[]=odbc_result($requête,$impots[limites]);
        $this->coeffR[]=odbc_result($requête,$impots[coeffR]);
        $this->coeffN[]=odbc_result($requête,$impots[coeffN]);
      }//while
      
      // fermeture base
      odbc_close($connexion);
    }//constructeur                
                      
    // --------------------------------------------------------------------------
    function calculer($personne){
      // $personne["marié"] : oui, non
      // $personne["enfants"] : nombre d'enfants
      // $personne["salaire"] : salaire annuel

      // l'objet est-il dans un état correct ?
      if (! is_array($this->erreurs) || count($this->erreurs)!=0) return -1;

            // vérification de l'appel
      if (! isset($personne[marié]) || ! isset($personne[enfants]) ||! isset($personne[salaire])){
        // erreur
        $this->erreurs[]="Appel incorrect";
        // fin
        return -1;
      }//if
      
      // les paramètres sont-ils corrects ?
      $personne[marié]=strtolower($personne[marié]);
      if($personne[marié]!=oui && $personne[marié]!=non){
          // erreur
        $this->erreurs[]="Statut marital [$personne[marié]] incorrect";
      }//if
      if(! preg_match("/^\s*\d{1,3}\s*$/",$personne[enfants])){
          // erreur
        $this->erreurs[]="Nombre d'enfants [$personne[enfants]] incorrect";
      }//if
      if(! preg_match("/^\s*\d+\s*$/",$personne[salaire])){
          // erreur
        $this->erreurs[]="salaire [$personne[salaire]] incorrect";
      }//if
      // des erreurs ?
      if(count($this->erreurs)!=0) return -1;
            
      // nombre de parts
      if($personne[marié]==oui) $nbParts=$personne[enfants]/2+2;
        else $nbParts=$personne[enfants]/2+1;
      // une 1/2 part de plus si au moins 3 enfants
      if($personne[enfants]>=3) $nbParts+=0.5;
      // revenu imposable
      $revenuImposable=0.72*$personne[salaire];
      // quotient familial
      $quotient=$revenuImposable/$nbParts;
      // est mis à la fin du tableau limites pour arrêter la boucle qui suit
      $this->limites[$this->nbLimites]=$quotient;
      // calcul de l'impôt
      $i=0;
      while($quotient>$this->limites[$i]) $i++;
      // du fait qu'on a placé $quotient à la fin du tableau $limites, la boucle précédente
      // ne peut déborder du tableau $limites
      // maintenant on peut calculer l'impôt
      return floor($revenuImposable*$this->coeffR[$i]-$nbParts*$this->coeffN[$i]);
    }//calculImpots
  }//classe impôts
?>

<?php
    // bibilothèques
  include "ImpotsDSN.php";
  
    // création d'un objet impots
  $conf=array(dsn=>"mysql-dbimpots",user=>admimpots,pwd=>mdpimpots,
      table=>impots,limites=>limites,coeffR=>coeffR,coeffN=>coeffN);
              
  $objImpots=new ImpotsDSN($conf);

  // des erreurs ?
  if(count($objImpots->erreurs)!=0){
      // msg
    echo "Les erreurs suivantes se sont produites :\n";
    $erreurs=$objImpots->erreurs;
    for($i=0;$i<count($erreurs);$i++){
        echo "$erreurs[$i]\n";
    }//for
    // fin
    exit(1);
  }//if

  // des essais
  calculerImpots($objImpots,oui,2,200000);
  calculerImpots($objImpots,non,2,200000);
  calculerImpots($objImpots,oui,3,200000);
  calculerImpots($objImpots,non,3,200000);
  calculerImpots($objImpots,array(),array(),array());
  
  // fin
  exit(0);
  
  // -----------------------------------------------------------
  function calculerImpots($objImpots,$marié,$enfants,$salaire){
      // echo
        echo "impots($marié,$enfants,$salaire)\n";    

      // calcul de l'impôt
    $personne=array(marié=>$marié,enfants=>$enfants,salaire=>$salaire);        
      $montant=$objImpots->calculer($personne);
    // des erreurs ?
    if(count($objImpots->erreurs)!=0){
        // msg
      echo "Les erreurs suivantes se sont produites :\n";
      $erreurs=$objImpots->erreurs;
      for($i=0;$i<count($erreurs);$i++){
          echo "$erreurs[$i]\n";
      }//for
    }else echo "montant=$montant\n";
  }//calculerImp

dos>e:\php43\php.exe test.php
impots(oui,2,200000)
montant=22504
impots(non,2,200000)
montant=33388
impots(oui,3,200000)
montant=16400
impots(non,3,200000)
montant=22504
impots(Array,Array,Array)
Les erreurs suivantes se sont produites :
Statut marital [array] incorrect
Nombre d'enfants [Array] incorrect
salaire [Array] incorrect

<?php //formulaire des impôts ?>
  
<html>
    <head>
      <title>impots</title>
    <script language="JavaScript" type="text/javascript">
        function effacer(){
          // raz du formulaire
        with(document.frmImpots){
            optMarie[0].checked=false;
          optMarie[1].checked=true;
          txtEnfants.value="";
          txtSalaire.value="";
          txtImpots.value="";
        }//with
      }//effacer      
        </script>
  </head>

  <body background="/poly/impots/images/standard.jpg">
      <center>
        Calcul d'impôts
        <hr>
      <form name="frmImpots" method="POST">
          <table>
            <tr>
              <td>Etes-vous marié(e)</td>
            <td>
                <input type="radio" name="optMarie" value="oui" <?php echo $requête->chkoui ?>>oui
              <input type="radio" name="optMarie" value="non" <?php echo $requête->chknon ?>>non
            </td>
          </tr>
          <tr>
              <td>Nombre d'enfants</td>
            <td><input type="text" size="5" name="txtEnfants" value="<?php echo $requête->enfants ?>"></td>
          </tr>
          <tr>
              <td>Salaire annuel</td>
            <td><input type="text" size="10" name="txtSalaire" value="<?php echo $requête->salaire ?>"></td>
          </tr>
          <tr>
              <td><font color="green">Impôt</font></td>
            <td><input type="text" size="10" name="txtImpots" value="<?php echo $requête->impots ?>" readonly></td>
          </tr>
          <tr></tr>
          <tr>
              <td><input type="submit" value="Calculer"></td>
            <td><input type="button" value="Effacer" onclick="effacer()"></td>
          </tr>
        </table>
      </form>
    </center>
    <?php
        // y-a-t-il des erreurs ?
      if(count($requête->erreurs)!=0){
          // affichage des erreurs
        echo "<hr>\n<font color=\"red\">\n";
        echo "Les erreurs suivantes se sont produites<br>";
        echo "<ul>";
        for($i=0;$i<count($requête->erreurs);$i++){
            echo "<li>".$requête->erreurs[$i]."</li>\n";
        }
        echo "</ul>\n</font>\n";
      }//if 
   ?>
 </body>
</html>

<?php
    // traite le formulaire des impôts

    // bibilothèques
  include "ImpotsDSN.php";
  
  // configuration de l'application
  ini_set("register_globals","off");
  ini_set("display_errors","off");
  $formulaireImpots="impots_form.php";
  $erreursImpots="impots_erreurs.php";
  $bdImpots=array(dsn=>"mysql-dbimpots",user=>admimpots,pwd=>mdpimpots,
      table=>impots,limites=>limites,coeffR=>coeffR,coeffN=>coeffN);
  
  // on récupère les paramètres
  $requête->marié=$_POST["optMarie"];
  $requête->enfants=$_POST["txtEnfants"];
  $requête->salaire=$_POST["txtSalaire"];
  
  // a-t-on tous les paramètres ?
  if(! isset($requête->marié) || ! isset($requête->enfants) || ! isset($requête->salaire)){
      // préparation formulaire vide
    $requête->chkoui="";
    $requête->chknon="checked";
    $requête->enfants="";
    $requête->salaire="";
    $requête->impots="";
    $requête->erreurs=array();
    // affichage formulaire
    include $formulaireImpots;
    // fin
    exit(0);
  }//if
  
  // vérification paramètres
  $requête=vérifier($requête);
  
  // des erreurs ?
  if(count($requête->erreurs)!=0){
      // affichage formulaire
    include "$formulaireImpots";
    // fin
    exit(0);
  }//if
  
  // calcul de la réponse
  $requête=calculerImpots($bdImpots,$requête);
  
  // des erreurs ?
  if(count($requête->erreurs)!=0){
      // affichage formulaire erreurs
    include "$erreursImpots";
    // fin
    exit(0);
  }//if

  // affichage formulaire
  include "$formulaireImpots";
  // fin
  exit(0);
  
  // --------------------------------------------------------
  function vérifier($requête){
      // vérifie la validité des paramètres de la requête

    // au départ pas d'erreurs
    $requête->erreurs=array();
        
    // statut valide ?
    $requête->marié=strtolower($requête->marié);
    if($requête->marié!="oui" && $requête->marié!="non"){
        // une erreur
      $requête->erreurs[]="Statut marital [$requête->marié] incorrect";
    }
    
    // nbre d'enfants valide ?
    if(! preg_match("/^\s*\d+\s*$/",$requête->enfants)){
        // une erreur
      $requête->erreurs[]="Nombre d'enfants [$requête->enfants] incorrect";
    }

    // salaire valide ?
    if(! preg_match("/^\s*\d+\s*$/",$requête->salaire)){
        // une erreur
      $requête->erreurs[]="Salaire [$requête->salaire] incorrect";
    }
    
    // état des boutons radio
    if($requête->marié=="oui"){
        $requête->chkoui="checked";
      $requête->chknon="";
    }else{
        $requête->chknon="checked";
      $requête->chkoui="";
    }
    
    // on rend la requête
    return $requête;
  }//vérifier
    
  // --------------------------------------------------------
  function calculerImpots($bdImpots,$requête){
      // calcule le montant de l'impôt
    
    // $bdImpots : dictionnaire contenant les informations nécessaires pour lire la source de données ODBC
    // $requête : la requête contenant les informations sur le contribuable

    // on construit un objet ImpotsDSN 
    $objImpots=new ImpotsDSN($bdImpots);

    // des erreurs ?
    if(count($objImpots->erreurs)!=0){
        // on met les erreurs dans la requête
      $requête->erreurs=$objImpots->erreurs;
      // fini
      return $requête;
    }//if
    
    // calcul de l'impôt
    $personne=array(marié=>"$requête->marié",enfants=>"$requête->enfants",salaire=>"$requête->salaire");
        $requête->impots=$objImpots->calculer($personne);
    
    // on rend le résultat
    return $requête;
  }//calculerImpots

<?php    // page d'erreur ?>
<html>
    <head>
      <title>Application impôts indisponible</title>
  </head>
  <body background="/poly/impots/images/standard.jpg">
      <h3>Calcul d'impôts</h3>
    <hr>
    Application indisponible. Recommencez ultérieurement.<br><br>
    <font color="red">
           Les erreurs suivantes se sont produites<br>
        <ul>
      <?php
          // affichage des erreurs
        for($i=0;$i<count($requête->erreurs);$i++){
            echo "<li>".$requête->erreurs[$i]."</li>\n";
        }
      ?>
        </ul>
    </font>
  </body>
</html>

<?php //formulaire des impôts ?>
  
<html>
    <head>
      <title>impots</title>
    <script language="JavaScript" type="text/javascript">
        function effacer(){
........
      }//effacer
      
      //------------------------------
      function calculer(){
          // vérification des paramètres avant de les envoyer au serveur
        with(document.frmImpots){
          //nbre d'enfants
          champs=/^\s*(\d+)\s*$/.exec(txtEnfants.value);
          if(champs==null){
            // le modéle n'est pas vérifié
            alert("Le nombre d'enfants n'a pas été donné ou est incorrect");
            nbEnfants.focus();
            return;
          }//if
          //salaire
          champs=/^\s*(\d+)\s*$/.exec(txtSalaire.value);
          if(champs==null){
            // le modéle n'est pas vérifié
            alert("Le salaire n'a pas été donné ou est incorrect");
            salaire.focus();
            return;
          }//if
          // c'est bon - on envoie le formulaire au serveur
          submit();
        }//with
      }//calculer            
        </script>
  </head>

  <body background="/poly/impots/images/standard.jpg">
............
              <td><input type="button" value="Calculer" onclick="calculer()"></td>
            <td><input type="button" value="Effacer" onclick="effacer()"></td>
........
 </body>
</html>

<?php //formulaire des impôts ?>
  
<html>
    <head>
      <title>impots</title>
    <script language="JavaScript" type="text/javascript">
        function effacer(){
...
      }//effacer
      
      //------------------------------
      function calculer(){
...
      }//calculer            
        </script>
  </head>

  <body background="/poly/impots/images/standard.jpg">
      <center>
        Calcul d'impôts
        <hr>
      <form name="frmImpots" method="POST">
          <table>
            <tr>
              <td>Etes-vous marié(e)</td>
            <td>
                <input type="radio" name="optMarie" value="oui" <?php echo $requête[chkoui] ?>>oui
              <input type="radio" name="optMarie" value="non" <?php echo $requête[chknon] ?>>non
            </td>
          </tr>
          <tr>
              <td>Nombre d'enfants</td>
            <td><input type="text" size="5" name="txtEnfants" value="<?php echo $requête[enfants] ?>"></td>
          </tr>
          <tr>
              <td>Salaire annuel</td>
            <td><input type="text" size="10" name="txtSalaire" value="<?php echo $requête[salaire] ?>"></td>
          </tr>
          <tr>
              <td><font color="green">Impôt</font></td>
            <td><input type="text" size="10" name="txtImpots" value="<?php echo $requête[impots] ?>" readonly></td>
          </tr>
          <tr></tr>
          <tr>
              <td><input type="button" value="Calculer" onclick="calculer()"></td>
            <td><input type="button" value="Effacer" onclick="effacer()"></td>
          </tr>
        </table>
      </form>
    </center>
    <?php
        // y-a-t-il des erreurs ?
      if(count($requête[erreurs])!=0){
          // affichage des erreurs
        echo "<hr>\n<font color=\"red\">\n";
        echo "Les erreurs suivantes se sont produites<br>";
        echo "<ul>";
        for($i=0;$i<count($requête[erreurs]);$i++){
            echo "<li>".$requête[erreurs][$i]."</li>\n";
        }
        echo "</ul>\n</font>\n";
      }//if 
        // y-a-t-il des simulations ?
      else if(count($requête[simulations])!=0){
          // affichage des simulations
        echo "<hr>\n<h2>Résultats des simulations</h2>\n";
        echo "<table border=\"1\">\n";
        echo "<tr><td>Marié</td><td>Enfants</td><td>Salaire annuel (F)</td><td>Impôts à payer (F)</td></tr>\n";
        for($i=0;$i<count($requête[simulations]);$i++){
            echo "<tr>".
              "<td>".$requête[simulations][$i][0]."</td>".
              "<td>".$requête[simulations][$i][1]."</td>".
              "<td>".$requête[simulations][$i][2]."</td>".
              "<td>".$requête[simulations][$i][3]."</td>".
            "</tr>\n";                                    
        }//for
        echo "</table>\n";
      }//if 
   ?>
 </body>
</html>

<?php
    // traite le formulaire des impôts

    // bibilothèques
  include "ImpotsDSN.php";

  // démarrage session
  session_start();
  
  // configuration de l'application
  ini_set("register_globals","off");
  ini_set("display_errors","off");
  $formulaireImpots="impots_form.php";
  $erreursImpots="impots_erreurs.php";
  $bdImpots=array(dsn=>"mysql-dbimpots",user=>admimpots,pwd=>mdpimpots,
      table=>impots,limites=>limites,coeffR=>coeffR,coeffN=>coeffN);

    // on récupère les paramètres de la session
  $session=$_SESSION["session"];
  // session valide ?
  if(! isset($session) || ! isset($session[objImpots]) || ! isset($session[simulations])){
      // on démarre une nouvelle session
    $session=array(objImpots=>new ImpotsDSN($bdImpots),simulations=>array());
    // des erreurs ?
    if(count($session[objImpots]->erreurs)!=0){
      $requête=array(erreurs=>$session[objImpots]->erreurs);
        // affichage page d'erreurs
        include $erreursImpots;
      // fin
      $session=array();
      terminerSession($session);
    }//if
  }//if
      
  // on récupère les paramètres de l'échange en cours
  $requête[marié]=$_POST["optMarie"];
  $requête[enfants]=$_POST["txtEnfants"];
  $requête[salaire]=$_POST["txtSalaire"];
  
  // a-t-on tous les paramètres ?
  if(! isset($requête[marié]) || ! isset($requête[enfants]) || ! isset($requête[salaire])){
      // affichage formulaire vide
    $requête=array(chkoui=>"",chknon=>"checked",enfants=>"",salaire=>"",impots=>"",
            erreurs=>array(),simulations=>array());    
    include $formulaireImpots;
    // fin
    terminerSession($session);
  }//if
  
  // vérification paramètres
  $requête=vérifier($requête);
  
  // des erreurs ?
  if(count($requête[erreurs])!=0){
      // affichage formulaire
    include "$formulaireImpots";
    // fin
    terminerSession($session);
  }//if
  
  // calcul de l'impôt à payer
  $requête[impots]=$session[objImpots]->calculer(array(marié=>$requête[marié],
        enfants=>$requête[enfants],salaire=>$requête[salaire]));
    
  // une simulation de plus
  $session[simulations][]=array($requête[marié],$requête[enfants],$requête[salaire],$requête[impots]);
  $requête[simulations]=$session[simulations];
  
  // affichage formulaire
  include "$formulaireImpots";

  // fin
  terminerSession($session);
  
  // --------------------------------------------------------
  function vérifier($requête){
      // vérifie la validité des paramètres de la requête

    // au départ pas d'erreurs
    $requête[erreurs]=array();
        
    // statut valide ?
    $requête[marié]=strtolower($requête[marié]);
    if($requête[marié]!="oui" && $requête[marié]!="non"){
        // une erreur
      $requête[erreurs][]="Statut marital [$requête[marié]] incorrect";
    }
    
    // nbre d'enfants valide ?
    if(! preg_match("/^\s*\d+\s*$/",$requête[enfants])){
        // une erreur
      $requête[erreurs][]="Nombre d'enfants [$requête[enfants]] incorrect";
    }

    // salaire valide ?
    if(! preg_match("/^\s*\d+\s*$/",$requête[salaire])){
        // une erreur
      $requête[erreurs][]="Salaire [$requête[salaire]] incorrect";
    }
    
    // état des boutons radio
    if($requête[marié]=="oui"){
        $requête[chkoui]="checked";
      $requête[chknon]="";
    }else{
        $requête[chknon]="checked";
      $requête[chkoui]="";
    }
    
    // on rend la requête
    return $requête;
  }//vérifier
    
  // --------------------------------------------------------
  function terminerSession($session){
      // on mémorise la session
    $_SESSION[session]=$session;
    // fin script
    exit(0);
  }//terminerSession

  session_start();

    // on récupère les paramètres de la session
  $session=$_SESSION["session"];
  // session valide ?
  if(! isset($session) || ! isset($session[objImpots]) || ! isset($session[simulations])){
      // on démarre une nouvelle session
    $session=array(objImpots=>new ImpotsDSN($bdImpots),simulations=>array());
    // des erreurs ?
    if(count($session[objImpots]->erreurs)!=0){
      $requête=array(erreurs=>$session[objImpots]->erreurs);
        // affichage page d'erreurs
        include $erreursImpots;
      // fin
      $session=array();
      terminerSession($session);
    }//if
  }//if

  // on récupère les paramètres de l'échange en cours
  $requête[marié]=$_POST["optMarie"];
  $requête[enfants]=$_POST["txtEnfants"];
  $requête[salaire]=$_POST["txtSalaire"];
  
  // a-t-on tous les paramètres ?
  if(! isset($requête[marié]) || ! isset($requête[enfants]) || ! isset($requête[salaire])){
      // affichage formulaire vide
    $requête=array(chkoui=>"",chknon=>"checked",enfants=>"",salaire=>"",impots=>"",
            erreurs=>array(),simulations=>array());    
    include $formulaireImpots;
    // fin
    terminerSession($session);
  }//if

  function terminerSession($session){
      // on mémorise la session
    $_SESSION[session]=$session;
    // fin script
    exit(0);
  }//terminerSession

<?php    // page d'erreur ?>
<html>
    <head>
      <title>Application impôts indisponible</title>
  </head>
  <body background="/poly/impots/images/standard.jpg">
      <h3>Calcul d'impôts</h3>
    <hr>
    Application indisponible. Recommencez ultérieurement.<br><br>
    <font color="red">
           Les erreurs suivantes se sont produites<br>
        <ul>
      <?php
          // affichage des erreurs
        for($i=0;$i<count($requête[erreurs]);$i++){
            echo "<li>".$requête[erreurs][$i]."</li>\n";
        }
      ?>
        </ul>
    </font>
  </body>
</html>

dos>e:\php43\php.exe cltImpots.php
Syntaxe cltImpots.php urlImpots marié enfants salaire [jeton]

    // syntaxe $0 urlImpots marié enfants salaire jeton
  // client d'un service d'impôts fonctionnant sur urlImpots
  // envoie à ce service les trois informations : marié, enfants, salaire
  // éventuellement avec le jeton de session si celui-ci a été passé
  // affiche le tableau des simulations de la session

dos>e:\php43\php.exe cltImpots.php http://localhost/poly/impots/6/impots.php oui 2 200000

Jeton de session=[a6297317667bc981c462120987b8dd18]

Simulations :
[Marié,Enfants,Salaire annuel (F),Impôts à payer (F)]
[oui,2,200000,22504]

dos>e:\php43\php.exe cltImpots.php http://localhost/poly/impots/6/impots.php oui 3 200000 a6297317667bc981c462120987b8dd18

Jeton de session=[a6297317667bc981c462120987b8dd18]

Simulations :
[Marié,Enfants,Salaire annuel (F),Impôts à payer (F)]
[oui,2,200000,22504]
[oui,3,200000,16400]

dos>e:\php43\php.exe cltImpots2.php http://localhost/poly/impots/6/impots.php oui 3 200000

Jeton de session=[8369014d5053212bc42f64bbdfb152ee]

Les erreurs suivantes se sont produites :
Impossible d'ouvrir la base DSN [mysql-dbimpots] (S1000)

<h2>Résultats des simulations</h2>
<table border="1">
<tr><td>Marié</td><td>Enfants</td><td>Salaire annuel (F)</td><td>Impôts à payer (F)</td></tr>
<tr><td>oui</td><td>2</td><td>200000</td><td>22504</td></tr>
<tr><td>oui</td><td>3</td><td>200000</td><td>16400</td></tr>
</table>

    Application indisponible. Recommencez ultérieurement.<br><br>
    <font color="red">
           Les erreurs suivantes se sont produites<br>
        <ul>
      <li>Impossible d'ouvrir la base DSN [mysql-dbimpots] (S1000)</li>
        </ul>
    </font>

<?php
    // syntaxe $0 urlImpots marié enfants salaire jeton
  // client d'un service d'impôts fonctionnant sur urlImpots
  // envoie à ce service les trois informations : marié, enfants, salaire
  // éventuellement avec le jeton de session si celui-ci a été passé
  // affiche le tableau des simulations de la session
  
  // vérification nbre d'arguments
  if(count($argv)!=5 && count($argv)!=6){
      // erreur
    fwrite(STDERR,"Syntaxe $argv[0] urlImpots marié enfants salaire [jeton]\n");
    // fin
    exit(1);
  }//if
  
  // on note l'URL
  $urlImpots=analyseURL($argv[1]);
  if(isset($urlImpots[erreur])){
      // erreur
    fwrite(STDERR,"$urlImpots[erreur]\n");
    // fin
    exit(1);
  }//if
  
  // analyse de la demande de l'utilisateur
  $demande=analyseDemande("$argv[2],$argv[3],$argv[4]");
  // erreurs ?
  if($demande[erreur]){
      // msg
    echo "$demande[erreur]\n";
    // c'est fini
    exit(1);
  }//if
  
  // on peut faire la demande - on utilise le jeton de session
  $impots=getImpots($urlImpots,$demande,$argv[5]);

  // on affiche le jeton de session
  echo "Jeton de session=[$impots[jeton]]\n";

  // des erreurs ?
  if(count($impots[erreurs])!=0){
      //msg d'erreurs
    echo "Les erreurs suivantes se sont produites :\n";
    for($i=0;$i<count($impots[erreurs]);$i++){
        echo $impots[erreurs][$i]."\n";
    }//for
  }else{
      // pas d'erreurs - affichage des simulations
    echo "Simulations :\n";
    for($i=0;$i<count($impots[simulations]);$i++){
        echo "[".implode(",",$impots[simulations][$i])."]\n";
      }//for
  }//if
  
  // fin du programme
  exit(0);

  // --------------------------------------------------------------
  function analyseURL($URL){  
      // analyse la validité de l'URL $URL
    $url=parse_url($URL);
    // le protocole    
    if(strtolower($url[scheme])!="http"){
        $url[erreur]="l'URL [$URL] n'est pas au format http://machine[:port][/chemin]";
      return $url;
    }//if
    // la machine
    if(! isset($url[host])){
        $url[erreur]="l'URL [$URL] n'est pas au format http://machine[:port][/chemin]";
      return $url;
    }//if
    // le port
    if(! isset($url[port])) $url[port]=80;
    // la requête
    if(isset($url["query"])){
        $url[erreur]="l'URL [$URL] n'est pas au format http://machine[:port][/chemin]";
      return $url;
    }//if
    // retour
    return $url;
  }//analyseURL
    
  // -----------------------------------------------------------
  function analyseDemande($demande){
      // $demande : chaîne à analyser
    // doit être de la forme marié, enfants, salaire
    // format valide
    if(! preg_match("/^\s*(oui|non)\s*,\s*(\d{1,3})\s*,\s*(\d+)\s*$/i",$demande,$champs)){
        // format invalide
      return(array(erreur=>"Format (marié, enfants, salaire) invalide."));
    }    
    // c'est bon
    $marié=strtolower($champs[1]);
    return array(marié=>$marié,enfants=>$champs[2],salaire=>$champs[3]);
  }//analyseDemande
    
  // --------------------------------------------------------------
  function getImpots($urlImpots,$demande,$jeton){
      // $urlImpots : URL à interroger
    // $demande : dictionnaire contenant les champs marie, enfants, salaire
    // $jeton : un éventuel jeton de session

    // ouverture d'une connexion sur le port $urlImpots[port] de $urlImpots[host]
    $connexion=fsockopen($urlImpots[host],$urlImpots[port],&$errno,&$erreur);
    // retour si erreur
    if(! $connexion){
      return array(erreurs=>array("Echec de la connexion au site ($urlImpots[host],$urlImpots[port]) : $erreur"));
    }//if

        // on envoie les entetes HTTP au serveur
    POST($connexion,$urlImpots,$jeton,
            array(optMarie=>$demande[marié],txtEnfants=>$demande[enfants],txtSalaire=>$demande[salaire]));

        // on lit la réponse du serveur - d'abord les entêtes HTTP
    // la première ligne
    $ligne=fgets($connexion,10000);
    
    // URL trouvée ?
    if(! preg_match("/^(.+?) 200 OK\s*$/",$ligne)){
        // URL inaccessible - retour avec erreur
      return array(erreurs=>array("L'URL $urlImpots[path] n'a pu être trouvée"));
    }//if
    
    // on lit les autres entêtes HTTP
    while(($ligne=fgets($connexion,10000)) && (($ligne=rtrim($ligne))!="")){
      // recherche du jeton si on ne l'a pas encore trouvé      
      if(! $jeton){
          // recherche de la ligne set-cookie
        if(preg_match("/^Set-Cookie: PHPSESSID=(.*?);/i",$ligne,$champs)){
            // on a trouvé le jeton - on le mémorise          
          $jeton=$champs[1];            
        }//if
      }//if
    }//ligne suivante
    
    // on lit le document qui suit
    $document="";
    while($ligne=fread($connexion,10000)){
        $document.=$ligne;
    }//while
    
    // on ferme la connexion
    fclose($connexion);
    
    // on analyse le document
    $impots=getInfos($document);
    
    // on rend le résultat
    return array(jeton=>$jeton,erreurs=>$impots[erreurs],simulations=>$impots[simulations]);
    }//getImpots

  // --------------------------------------------------------------
  function POST($connexion,$url,$jeton,$paramètres){
      // $connexion : la connexion a serveur web
    // $url : l'URL à interroger
    // $paramètres : dictionnaire des paramètres à poster
  
    // on prépare le POST
    $post="";
    while(list($paramètre,$valeur)=each($paramètres)){
        $post.=$paramètre."=".urlencode($valeur)."&";
    }//while
    // on enlève le dernier caractère
    $post=substr($post,0,-1);
    
    // on prépare la requête HTTP au format HTTP/1.0
    $HTTP="POST $url[path] HTTP/1.0\n";
    $HTTP.="Content-type: application/x-www-form-urlencoded\n";
    $HTTP.="Content-length: ".strlen($post)."\n";
    $HTTP.="Connection: close\n";
    if($jeton) $HTTP.="Cookie: PHPSESSID=$jeton\n";
    $HTTP.="\n";
    $HTTP.=$post;
    
    // on envoie la requête HTTP
    fwrite($connexion,$HTTP);
    }//POST
 
  // --------------------------------------------------------------
  function getInfos($document){
      // $document : document HTML
    // on cherche soit la liste d'erreurs
    // soit le tableau des simulations
    
    // préparation du résultat
    $impots[erreurs]=array();
    $impots[simulations]=array();
    
    // y-a-t-il une erreur ?
    // modèle de la ligne d'erreur
    $modErreur="|<li>(.+?)</li>|";
    // recherche dans le document
    if(preg_match_all($modErreur,$document,$champs,PREG_SET_ORDER)){
        // récupération des erreurs
      for($i=0;$i<count($champs);$i++){
          $impots[erreurs][]=$champs[$i][1];
      }//for
      // fini
      return $impots;
    }//if
      
    // modèle d'une ligne du tableau des simulations
    // <tr><td>oui</td><td>2</td><td>200000</td><td>22504</td></tr>
    $modSimulation="|<tr>\s*<td>(.+?)</td>\s*<td>(.+?)</td>\s*<td>(.+?)</td>\s*<td>(.+?)</td>\s*</tr>|";
    // recherche dans le document
    if(preg_match_all($modSimulation,$document,$champs,PREG_SET_ORDER)){    
        // récupération des simulations
      for($i=0;$i<count($champs);$i++){
          $impots[simulations][]=array($champs[$i][1],$champs[$i][2],$champs[$i][3],$champs[$i][4]);
      }//for
      // retour résultat
      return $impots;
    }//if
    
    // pas normal d'arriver là
    return $impots;
    }//getInfos
?>

  $impots=getImpots($urlImpots,$demande,$argv[5]);

  // --------------------------------------------------------------
  function getImpots($urlImpots,$demande,$jeton){
      // $urlImpots : URL à interroger
    // $demande : dictionnaire contenant les champs marie, enfants, salaire
    // $jeton : un éventuel jeton de session

  // on affiche le jeton de session
  echo "Jeton de session=[$impots[jeton]]\n";

  // des erreurs ?
  if(count($impots[erreurs])!=0){
      //msg d'erreurs
    echo "Les erreurs suivantes se sont produites :\n";
    for($i=0;$i<count($impots[erreurs]);$i++){
        echo $impots[erreurs][$i]."\n";
    }//for
  }else{
      // pas d'erreurs - affichage des simulations
    echo "Simulations :\n";
    for($i=0;$i<count($impots[simulations]);$i++){
        echo "[".implode(",",$impots[simulations][$i])."]\n";
      }//for
  }//if
  
  // fin du programme
  exit(0);

        // on envoie les entetes HTTP au serveur
    POST($connexion,$urlImpots,$jeton,
            array(optMarie=>$demande[marié],txtEnfants=>$demande[enfants],txtSalaire=>$demande[salaire]));

// URL trouvée ?
    if(! preg_match("/^(.+?) 200 OK\s*$/",$ligne)){
        // URL inaccessible - retour avec erreur
      return array(erreurs=>array("L'URL $urlImpots[path] n'a pu être trouvée"));
    }//if

    // on analyse le document
    $impots=getInfos($document);

    // on rend le résultat
    return array(jeton=>$jeton,erreurs=>$impots[erreurs],simulations=>$impots[simulations]);

  // --------------------------------------------------------------
  function POST($connexion,$url,$jeton,$paramètres){
      // $connexion : la connexion a serveur web
    // $url : l'URL à interroger
    // $paramètres : dictionnaire des paramètres à poster
  
    // on prépare le POST
    $post="";
    while(list($paramètre,$valeur)=each($paramètres)){
        $post.=$paramètre."=".urlencode($valeur)."&";
    }//while
    // on enlève le dernier caractère
    $post=substr($post,0,-1);
    
    // on prépare la requête HTTP au format HTTP/1.0
    $HTTP="POST $url[path] HTTP/1.0\n";
    $HTTP.="Content-type: application/x-www-form-urlencoded\n";
    $HTTP.="Content-length: ".strlen($post)."\n";
    $HTTP.="Connection: close\n";
    if($jeton) $HTTP.="Cookie: PHPSESSID=$jeton\n";
    $HTTP.="\n";
    $HTTP.=$post;
    
    // on envoie la requête HTTP
    fwrite($connexion,$HTTP);
    }//POST

POST chemin HTTP/1.X
Content-type: application/x-www-form-urlencoded
Content-length: N

    // y-a-t-il une erreur ?
    // modèle de la ligne d'erreur
    $modErreur="|<li>(.+?)</li>|";
    // recherche dans le document
    if(preg_match_all($modErreur,$document,$champs,PREG_SET_ORDER)){
        // récupération des erreurs
      for($i=0;$i<count($champs);$i++){
          $impots[erreurs][]=$champs[$i][1];
      }//for
      // fini
      return $impots;
    }//if

// modèle d'une ligne du tableau des simulations
    // <tr><td>oui</td><td>2</td><td>200000</td><td>22504</td></tr>
    $modSimulation="|<tr>\s*<td>(.+?)</td>\s*<td>(.+?)</td>\s*<td>(.+?)</td>\s*<td>(.+?)</td>\s*</tr>|";

Résultat des simulations
<ul>
    <li>oui,2,200000,22504
  <li>non,2,200000,33388
</ul>

<simulations>
    <entetes marie="marié" enfants="enfants" salaire="salaire" impot="impôt"/>
  <simulation marie="oui" enfants="2" salaire="200000" impot="22504" />
  <simulation marie="non" enfants="2" salaire="200000" impot="33388" />
</simulations>