Diff for /rpl/src/chainage.c between versions 1.18 and 1.19

version 1.18, 2010/08/26 19:07:34 version 1.19, 2010/09/07 08:58:04
Line 49  chainage(struct_processus *s_etat_proces Line 49  chainage(struct_processus *s_etat_proces
   
     logical1                drapeau_fin;      logical1                drapeau_fin;
     logical1                existence;      logical1                existence;
       logical1                initialisation;
     logical1                ouverture;      logical1                ouverture;
     logical1                presence_chaine;      logical1                presence_chaine;
   
Line 59  chainage(struct_processus *s_etat_proces Line 60  chainage(struct_processus *s_etat_proces
     unsigned char           *executable_candidat;      unsigned char           *executable_candidat;
   
 #   ifndef OS2  #   ifndef OS2
     unsigned char           *instructions = "sed -e '1,1s/^#!/\\/\\//g' %s | "      unsigned char           *instructions = "%s/bin/%s %s | "
                                     "%s/bin/%s | "  
                                     "%s/bin/rpliconv `%s/bin/rplfile "                                      "%s/bin/rpliconv `%s/bin/rplfile "
                                     "-m %s/share/rplfiles -i %s | awk "                                      "-m %s/share/rplfiles -i %s | awk "
                                     "'{ print $3; }' | awk -F= "                                      "'{ print $3; }' | awk -F= "
Line 68  chainage(struct_processus *s_etat_proces Line 68  chainage(struct_processus *s_etat_proces
                                     "$2); }'` -t %s//IGNORE > %s";                                      "$2); }'` -t %s//IGNORE > %s";
 #   else  #   else
     unsigned char           *instructions = "sh -c \""      unsigned char           *instructions = "sh -c \""
                                     "sed -e '1,1s/^#!/\\/\\//g' %s | "                                      "%s/bin/%s %s | "
                                     "%s/bin/%s | "  
                                     "%s/bin/rpliconv `%s/bin/rplfile "                                      "%s/bin/rpliconv `%s/bin/rplfile "
                                     "-m %s/share/rplfiles -i %s | awk "                                      "-m %s/share/rplfiles -i %s | awk "
                                     "'{ print $3; }' | awk -F= "                                      "'{ print $3; }' | awk -F= "
Line 131  chainage(struct_processus *s_etat_proces Line 130  chainage(struct_processus *s_etat_proces
             }              }
   
             sprintf(commande, instructions,              sprintf(commande, instructions,
                       d_exec_path, ds_preprocesseur,
                     (*s_etat_processus).nom_fichier_source,                      (*s_etat_processus).nom_fichier_source,
                     d_exec_path, ds_preprocesseur, d_exec_path, d_exec_path,                      d_exec_path, d_exec_path,
                     d_exec_path, (*s_etat_processus).nom_fichier_source,                      d_exec_path, (*s_etat_processus).nom_fichier_source,
                     d_locale, nom_fichier_temporaire);                      d_locale, nom_fichier_temporaire);
   
Line 358  chainage(struct_processus *s_etat_proces Line 358  chainage(struct_processus *s_etat_proces
   
             i = 0;              i = 0;
             drapeau_fin = d_faux;              drapeau_fin = d_faux;
               initialisation = d_vrai;
   
               /*
                * Élimination du sharp-bang si nécessaire et des caractères
                * inutiles. Conversion de caractères.
                */
   
             while(drapeau_fin == d_faux)              while(drapeau_fin == d_faux)
             {              {
                 if ((caractere = getc(f_source)) != EOF)                  if ((caractere = getc(f_source)) != EOF)
                 {                  {
                       if (initialisation == d_vrai)
                       {
                           if (caractere == '#')
                           {
                               if ((caractere = getc(f_source)) != EOF)
                               {
                                   if (caractere == '!')
                                   {
                                       do
                                       {
                                           caractere = getc(f_source);
                                       } while((caractere != EOF) &&
                                               (caractere !=
                                               d_code_retour_chariot));
                                   }
                                   else
                                   {
                                       rewind(f_source);
                                       caractere = getc(f_source);
                                   }
                               }
                           }
   
                           initialisation = d_faux;
                       }
   
                     if ((caractere == d_code_retour_chariot) ||                      if ((caractere == d_code_retour_chariot) ||
                             (caractere == d_code_tabulation) ||                              (caractere == d_code_tabulation) ||
                             ((caractere == d_code_espace) &&                              ((caractere == d_code_espace) &&

Removed from v.1.18  
changed lines
  Added in v.1.19


CVSweb interface <joel.bertrand@systella.fr>