version 1.16, 2011/11/18 10:54:21
|
version 1.17, 2011/11/19 17:53:46
|
Line 599 longueur_chaine(struct_processus *s_etat
|
Line 599 longueur_chaine(struct_processus *s_etat
|
================================================================================ |
================================================================================ |
Routine retournant un pointeur sur le i-ème caractère d'une chaîne |
Routine retournant un pointeur sur le i-ème caractère d'une chaîne |
================================================================================ |
================================================================================ |
Entrées : structure sur l'état du processus et chaîne |
Entrées : structure sur l'état du processus, chaîne et position du caractère |
-------------------------------------------------------------------------------- |
-------------------------------------------------------------------------------- |
Sorties : longueur de la chaîne |
Sorties : pointeur sur le caractère |
-------------------------------------------------------------------------------- |
-------------------------------------------------------------------------------- |
Effets de bord : néant |
Effets de bord : néant |
================================================================================ |
================================================================================ |
Line 633 pointeur_ieme_caractere(struct_processus
|
Line 633 pointeur_ieme_caractere(struct_processus
|
return(pointeur); |
return(pointeur); |
} |
} |
|
|
|
|
|
/* |
|
================================================================================ |
|
Routine retournant la position du caractère en fonction du pointeur |
|
dans la chaîne |
|
================================================================================ |
|
Entrées : structure sur l'état du processus, chaîne et position |
|
-------------------------------------------------------------------------------- |
|
Sorties : quantième dans la chaîne |
|
-------------------------------------------------------------------------------- |
|
Effets de bord : néant |
|
================================================================================ |
|
*/ |
|
|
|
integer8 |
|
position_caractere_de_chaine(struct_processus *s_etat_processus, |
|
unsigned char *chaine, unsigned char *position) |
|
{ |
|
integer8 i; |
|
|
|
i = 1; |
|
|
|
while(chaine != position) |
|
{ |
|
chaine = prochain_caractere(s_etat_processus, chaine); |
|
i++; |
|
|
|
if ((*chaine) == d_code_fin_chaine) |
|
{ |
|
return(0); |
|
} |
|
} |
|
|
|
return(i); |
|
} |
|
|
|
|
|
/* |
|
================================================================================ |
|
Conversion d'une chaîne en majuscule ou en minuscule |
|
================================================================================ |
|
Entrées : chaîne et indicateur ('M' pour majuscules, 'm' pour minuscules) |
|
-------------------------------------------------------------------------------- |
|
Sorties : néant |
|
-------------------------------------------------------------------------------- |
|
Effets de bord : néant |
|
================================================================================ |
|
*/ |
|
|
|
void |
|
conversion_chaine(struct_processus *s_etat_processus, |
|
unsigned char *chaine, unsigned char type) |
|
{ |
|
int (*fonction_1)(int); |
|
int (*fonction_2)(int); |
|
|
|
unsigned char *ptr; |
|
unsigned char *ptr2; |
|
unsigned char registre; |
|
|
|
if (type == 'M') |
|
{ |
|
fonction_1 = toupper; |
|
fonction_2 = tolower; |
|
} |
|
else |
|
{ |
|
fonction_1 = tolower; |
|
fonction_2 = toupper; |
|
} |
|
|
|
ptr = chaine; |
|
|
|
while((*ptr) != d_code_fin_chaine) |
|
{ |
|
ptr2 = prochain_caractere(s_etat_processus, ptr); |
|
|
|
if ((ptr2 - ptr) == 1) |
|
{ |
|
registre = fonction_1((*ptr)); |
|
|
|
if (fonction_2(registre) == (*ptr)) |
|
{ |
|
(*ptr) = registre; |
|
} |
|
} |
|
|
|
ptr = ptr2; |
|
} |
|
|
|
return; |
|
} |
|
|
// vim: ts=4 |
// vim: ts=4 |