[BACK]Return to interface_gnuplot.c CVS log [TXT] [DIR] Up to [local] / rpl / src

Diff for /rpl/src/interface_gnuplot.c between versions 1.13 and 1.42

version 1.13, 2010/08/06 15:26:50 version 1.42, 2012/12/19 09:58:27
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.0.18    RPL/2 (R) version 4.1.12
   Copyright (C) 1989-2010 Dr. BERTRAND Joël    Copyright (C) 1989-2012 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 36 Line 36
 ================================================================================  ================================================================================
 */  */
   
   #ifdef OS2
   static unsigned char *
   ajout_shell(unsigned char *commande)
   {
       unsigned char       *tampon;
   
       if ((tampon = malloc((strlen(BOURNE_SHELL) + 5 + strlen(commande) + 2) *
               sizeof(unsigned char))) == NULL)
       {
           return(NULL);
       }
   
       sprintf(tampon, "%s -c \"%s\"", BOURNE_SHELL, commande);
       free(commande);
       return(tampon);
   }
   #endif
   
 void  void
 appel_gnuplot(struct_processus *s_etat_processus, unsigned char persistance)  appel_gnuplot(struct_processus *s_etat_processus, unsigned char persistance)
 {  {
Line 307  appel_gnuplot(struct_processus *s_etat_p Line 325  appel_gnuplot(struct_processus *s_etat_p
             sprintf(commande_gnuplot, "%s", ds_gnuplot_commande);              sprintf(commande_gnuplot, "%s", ds_gnuplot_commande);
 #endif  #endif
   
   #ifdef OS2
               if ((commande_gnuplot = ajout_shell(commande_gnuplot)) == NULL)
               {
                   (*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
                   return;
               }
   #endif
   
             if (((*s_etat_processus).entree_standard =              if (((*s_etat_processus).entree_standard =
                     popen(commande_gnuplot, "w")) == NULL)                      popen(commande_gnuplot, "w")) == NULL)
             {              {
Line 378  appel_gnuplot(struct_processus *s_etat_p Line 404  appel_gnuplot(struct_processus *s_etat_p
         sprintf(commande_gnuplot, "%s", ds_gnuplot_commande_persistante);          sprintf(commande_gnuplot, "%s", ds_gnuplot_commande_persistante);
 #endif  #endif
   
   #ifdef OS2
           if ((commande_gnuplot = ajout_shell(commande_gnuplot)) == NULL)
           {
               (*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
               return;
           }
   #endif
   
         if (((*s_etat_processus).entree_standard =          if (((*s_etat_processus).entree_standard =
                 popen(commande_gnuplot, "w")) == NULL)                  popen(commande_gnuplot, "w")) == NULL)
         {          {
Line 447  appel_gnuplot(struct_processus *s_etat_p Line 481  appel_gnuplot(struct_processus *s_etat_p
         sprintf(commande_gnuplot, "%s", ds_gnuplot_commande);          sprintf(commande_gnuplot, "%s", ds_gnuplot_commande);
 #endif  #endif
   
   #ifdef OS2
           if ((commande_gnuplot = ajout_shell(commande_gnuplot)) == NULL)
           {
               (*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
               return;
           }
   #endif
   
         if (((*s_etat_processus).entree_standard =          if (((*s_etat_processus).entree_standard =
                 popen(commande_gnuplot, "w")) == NULL)                  popen(commande_gnuplot, "w")) == NULL)
         {          {
Line 527  appel_gnuplot(struct_processus *s_etat_p Line 569  appel_gnuplot(struct_processus *s_etat_p
         sprintf(commande_gnuplot, "%s", ds_gnuplot_commande);          sprintf(commande_gnuplot, "%s", ds_gnuplot_commande);
 #endif  #endif
   
   #ifdef OS2
           if ((commande_gnuplot = ajout_shell(commande_gnuplot)) == NULL)
           {
               (*s_etat_processus).erreur_systeme = d_es_allocation_memoire;
               return;
           }
   #endif
   
         if (((*s_etat_processus).entree_standard =          if (((*s_etat_processus).entree_standard =
                 popen(commande_gnuplot, "w")) == NULL)                  popen(commande_gnuplot, "w")) == NULL)
         {          {
Removed from v.1.13  
changed lines
  Added in v.1.42

CVSweb interface <joel.bertrand@systella.fr>