version 1.52, 2013/03/20 17:11:43
|
version 1.73, 2018/12/24 15:54:59
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.13 |
RPL/2 (R) version 4.1.30 |
Copyright (C) 1989-2013 Dr. BERTRAND Joël |
Copyright (C) 1989-2018 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 138 chainage(struct_processus *s_etat_proces
|
Line 138 chainage(struct_processus *s_etat_proces
|
d_exec_path, (*s_etat_processus).nom_fichier_source, |
d_exec_path, (*s_etat_processus).nom_fichier_source, |
d_exec_path, d_exec_path, d_locale, nom_fichier_temporaire); |
d_exec_path, d_exec_path, d_locale, nom_fichier_temporaire); |
|
|
if (alsprintf(&executable_candidat, "%s/bin/rpliconv", |
if (alsprintf(s_etat_processus, &executable_candidat, |
d_exec_path) < 0) |
"%s/bin/rpliconv", d_exec_path) < 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return(d_erreur); |
return(d_erreur); |
Line 154 chainage(struct_processus *s_etat_proces
|
Line 154 chainage(struct_processus *s_etat_proces
|
|
|
free(executable_candidat); |
free(executable_candidat); |
|
|
if (alsprintf(&executable_candidat, "%s/bin/rplfile", |
if (alsprintf(s_etat_processus, &executable_candidat, |
d_exec_path) < 0) |
"%s/bin/rplfile", d_exec_path) < 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return(d_erreur); |
return(d_erreur); |
Line 170 chainage(struct_processus *s_etat_proces
|
Line 170 chainage(struct_processus *s_etat_proces
|
|
|
free(executable_candidat); |
free(executable_candidat); |
|
|
if (alsprintf(&executable_candidat, "%s/bin/rplpp", |
if (alsprintf(s_etat_processus, &executable_candidat, |
d_exec_path) < 0) |
"%s/bin/rplpp", d_exec_path) < 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return(d_erreur); |
return(d_erreur); |
Line 186 chainage(struct_processus *s_etat_proces
|
Line 186 chainage(struct_processus *s_etat_proces
|
|
|
free(executable_candidat); |
free(executable_candidat); |
|
|
if (alsprintf(&executable_candidat, "%s/bin/rplawk", |
if (alsprintf(s_etat_processus, &executable_candidat, |
d_exec_path) < 0) |
"%s/bin/rplawk", d_exec_path) < 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return(d_erreur); |
return(d_erreur); |
Line 228 chainage(struct_processus *s_etat_proces
|
Line 228 chainage(struct_processus *s_etat_proces
|
(*s_etat_processus).rpl_home, |
(*s_etat_processus).rpl_home, |
d_locale, nom_fichier_temporaire); |
d_locale, nom_fichier_temporaire); |
|
|
if (alsprintf(&executable_candidat, "%s/bin/rpliconv", |
if (alsprintf(s_etat_processus, &executable_candidat, |
(*s_etat_processus).rpl_home) < 0) |
"%s/bin/rpliconv", (*s_etat_processus).rpl_home) < 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return(d_erreur); |
return(d_erreur); |
Line 244 chainage(struct_processus *s_etat_proces
|
Line 244 chainage(struct_processus *s_etat_proces
|
|
|
free(executable_candidat); |
free(executable_candidat); |
|
|
if (alsprintf(&executable_candidat, "%s/bin/rplfile", |
if (alsprintf(s_etat_processus, &executable_candidat, |
(*s_etat_processus).rpl_home) < 0) |
"%s/bin/rplfile", (*s_etat_processus).rpl_home) < 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return(d_erreur); |
return(d_erreur); |
Line 260 chainage(struct_processus *s_etat_proces
|
Line 260 chainage(struct_processus *s_etat_proces
|
|
|
free(executable_candidat); |
free(executable_candidat); |
|
|
if (alsprintf(&executable_candidat, "%s/bin/rplpp", |
if (alsprintf(s_etat_processus, &executable_candidat, |
(*s_etat_processus).rpl_home) < 0) |
"%s/bin/rplpp", (*s_etat_processus).rpl_home) < 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return(d_erreur); |
return(d_erreur); |
Line 276 chainage(struct_processus *s_etat_proces
|
Line 276 chainage(struct_processus *s_etat_proces
|
|
|
free(executable_candidat); |
free(executable_candidat); |
|
|
if (alsprintf(&executable_candidat, "%s/bin/rplawk", |
if (alsprintf(s_etat_processus, &executable_candidat, |
(*s_etat_processus).rpl_home) < 0) |
"%s/bin/rplawk", (*s_etat_processus).rpl_home) < 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return(d_erreur); |
return(d_erreur); |
Line 513 chainage(struct_processus *s_etat_proces
|
Line 513 chainage(struct_processus *s_etat_proces
|
*/ |
*/ |
|
|
unsigned char * |
unsigned char * |
compactage(unsigned char *chaine) |
compactage(struct_processus *s_etat_processus, unsigned char *chaine) |
{ |
{ |
logical1 drapeau_fin; |
logical1 drapeau_fin; |
logical1 presence_chaine; |
logical1 presence_chaine; |