[sed] je dois substituer des expressions

Bonjour !
Moi aussi j’essaie de faire des modifications à l’aide de la commande sed !

Dans environs une centaine de fichiers je dois substituer des expressions de ce type :

Code:

---

1 2 3

CALL MICHU(ZERO, XUSE , NCL*15 ) [oubien] CALL MICHU( -ONE, DAXDR , MMS )

---

[…]

En gros, des éléments ayant la forme suivante :

Code:

---

CALL MICHU(BLOC_1,BLOC_2,BLOC_3)

---

En l’expression suivante :

Code:

---

BLOC_2(1:BLOC_3) = BLOC_1

---

CALL MICHU(BLOC_1,BLOC_2,BLOC_3) -> BLOC_2(1:BLOC_3) = BLOC_1


Je sais que c’est réalisable avec sed, mais je n’ai pas réussi à trouver la syntaxe pour organiser à ma guise les différents blocs.

J’ai plusieurs centaines d’occurrence à traiter et je sais que je devrais probablement terminer certaines expressions sans la commande sed … mais peut-être que si j’arrive à la comprendre suffisamment …
En faite, 90% de mes expressions ont cette forme :

Code:

---

1 2 3 4

CALL MICHU(BLOC_1,BLOC_2,BLOC_3) | V BLOC_2(1:BLOC_3) = BLOC_1

---

Et … ensuite j’anticipe deux types d’occurrences difficiles :
J’ai des :

Code:

---

IF( IBBK==2 ) CALL MICHU(0.0D0,T,IJF*KKFD )

---

C’est à dire :

Code:

---

IF( IBBK==2 ) CALL MICHU(BLOC_1,BLOC_2,BLOC_3)

---

Qu’il me faudra transformer en :

Code:

---

IF( IBBK==2 ) T(1,IJF*KKFD) = 0.0D0

---

C’est à dire :

Code:

---

IF( IBBK==2 ) BLOC_2(1:BLOC_3) = BLOC_1

---

Bon après j’ai quelques expressions vraiment hardcore du type :

Code:

---

CALL MICHU ( 0.0D0, QS(1,1,1), (IT+2)*(JT+2)*(KT+2) )

---

Que je devrais transformer en …

Code:

---

QS(1: (IT+2)*(JT+2)*(KT+2),1,1) = 0.0D0

---

mais … ça c’est une autre histoire … et je crois qu’il ne vaut mieux pas en parler …. (Surtout que … ce sont des expressions FORTRAN … je pense que au final la forme pourrait être encore autre chose ... )

Merci :-*

Merci les amis ! Je savais que vous aviez confiance en moi et que vous saviez que je pouvais y arriver tout seul.
Donc voici une commande que je viens d'utiliser et qui fonctionne pour faire ce dont j'ai besoin :

La commande suivante :

Code:

---

sed -e 's/CALL MICHU(\(.*\),\(.*\),\(.*\))/\2(1:\3)=\1/'

---

m'a permis de remplacer :

Code:

---

CALL MICHU( 0.0D0,FLUX,IJKT )

---

par :

Code:

---

FLUX(1:IJKT )= 1.0D0

---

Je vais expliquer la syntaxe par ce que sinon elle fait vraiment mal aux yeux :

la commande générale de sed est la suivante :

Code:

---

sed -e 's/EXPRESSION_RECHERCHE/EXPRESSION_DE_REMPLACEMENT/' fichier_entre.txt

---

Dans l'expression_recherche, il est possible de définir des regroupements de motifs :
pour cela, il suffit très simplement de mettre entre parenthèse ( ) le ou les motifs que l'on souhaite isoler.
Dans l'expression de sortie, si l'on souhaite réutiliser un motif, il suffit de le mentionner par son ordre d'identification. Ainsi, on peut par exemple inverser l'ordre de certain motif.
Mais !! Attention, pour ne pas que les parenthèses ( ) que l'on utilise dans le motif de recherche ou le numéro d'identification que l'on utilise dans l'expression de remplacement ne soient confondu avec des motifs de recherche ou des expression à écrire .... ben il faut juste les faire précéder du caractère d’échappement \ anti-slash !!

Voila, au final, l'expression que j'ai utilisé est de la forme suivante :

Code:

---

sed -e 's/EXPRESSION_RECHERCHE/EXPRESSION_DE_REMPLACEMENT/' fichier_entre.txt > fichier_sortie.txt

---

Les dernières choses que je dois trouver c'est :
Question 1 :
pourquoi certains utilise l'option /g ?

Code:

---

sed -e 's///' ?? ou sed -e 's///g'

---

Question 2 :
Je n'ai pas réussi à faire un sed le fichier lui même !
J'ai été obligé de rediriger la sortie dans un autre fichier :

Code:

---

sed -e 's///' fichier_entree.txt > fichier_sortie.txt

---

Est-il possible d'effectuer le sed directement dans le fichier ?

Et sinon, si vous avez des questions sur le remplacement en définissant des motifs, vous pouvez me demander!
Merci beaucoup !!

Bonjour :coucou:

• C'est pareil sur tous les forums, on ne trolle pas les questions des autres. Il fallait ouvrir une nouvelle discussion.
• Y arriver tout seul, c'est ce qu'il y a de meilleur.
• Le 'g' veut dire 'global'. Sinon, il ne substitue qu'une fois.
• Intéresse toi à l'option "-i" pour le changement sur place, avec ou sans backup.

Citation:

---

Envoyé par Flodelarab

• C'est pareil sur tous les forums, on ne trolle pas les questions des autres. Il fallait ouvrir une nouvelle discussion.
• Y arriver tout seul, c'est ce qu'il y a de meilleur.
• Le 'g' veut dire 'global'. Sinon, il ne substitue qu'une fois.
• Intéresse toi à l'option "-i" pour le changement sur place, avec ou sans backup.

---

• Je ne savais pas ... au contraire, j'aurais pensé qu'il valait mieux ne pas multiplier les sujets similaire. (et je ne suis pas un troll :no:)
• Oui :ange:
• OK, c'est pour ré-substituer dans le nouveau motif c'est ça ? c'est à dire il repasse en boucle même après que la substitution soit passer sur la ligne ?
• ok -i est l'option qu'il me fallait ... (je n'ai rien trouver sur l'histoire du backup)

Et il y a une façon de rechercher dans plusieurs sous-directory ? */* ? ça va marcher ça :-D
... Oui ça marche :-*

Code:

---

sed -i 's/CALL MICHU(\(.*\),\(.*\),\(.*\))/\2(1:\3)=\1/' */*.txt

---

Ahh ... et si j'ai plusieurs sous-sous dossier !!??!!! ... bon j'arrête de vous ennuyer avec ça ... je vais m'en sortir avec des */*/*.txt ...

Merciiiiiii !

Citation:

---

Envoyé par Wire.Less

• OK, c'est pour ré-substituer dans le nouveau motif c'est ça ? c'est à dire il repasse en boucle même après que la substitution soit passer sur la ligne ?

---

Non, sans le global, il traite juste la première occurrence trouvée de ton motif, avec le global, il traite toutes les occurrences de ton motif qu'il trouve, il ne revient pas en arrière...

Si c'était le cas, il bouclerait à l'infini dans le cas suivant par exemple: s/./&&/g.

Il ne te reste plus qu'à traiter ton dernier cas...:mouarf:

Ok, je comprends ...

Citation:

---

Envoyé par disedorgue

Si c'était le cas, il bouclerait à l'infini dans le cas suivant par exemple: s/./&&/g.

---

Sauf cet exemple que je ne comprends pas ... mais bon ...

Citation:

---

Il ne te reste plus qu'à traiter ton dernier cas...:mouarf:

---

Pour mon dernier cas ...

Code:

---

CALL MICHU ( 0.0D0, QS(1,1,1), (IT+2)*(JT+2)*(KT+2) )

---

...je penses que ... ma ligne de commande utilise des propriétés du langage Fortran que je ne souhaite pas réutiliser ...
en gros ma sous routine MICHU joue sur le fais que les sous routine n'ont pas la possibilité de discerner les dépassement d'indice de tableau ... le tableau passé en paramètre est de dimension 3 mais la sous-routine MICHU la traite comme un sous-tableau de dimension 1 ! C'est de la triche !! C'est juste que le compilateur n'a aucun moyen de vérifier cette irrégularité.

Mais moi je ne vais pas tricher ... donc je vais le traiter à la mano :-*
En gros, il ne faudrait pas écrire :

Code:

---

QS(1: (IT+2)*(JT+2)*(KT+2),1,1) = 0.0D0

---

Mais :

Code:

---

QS(1: IT+2,1:JT+2,1:KT+2) = 0.0D0

---

Merci encore.

Code:

---

1 2 3 4 5 6 7 8 9 10 11

$ ls afac*.txt afac.txt $ ls */afac*.txt afacdir/afac.txt $ ls **/afac*.txt afacdir/afac.txt $ shopt -s globstar $ ls **/afac*.txt afacdir/afacdir/afacdir/afac.txt afacdir/afac.txt afac.txt $ shopt -u globstar $

---

Activer l'option "globstar" débloque ** pour qu'il aille fouiller dans les dossiers, quelque soit le niveau (même zéro).

Citation:

---

Envoyé par Flodelarab

Activer l'option "globstar" débloque ** pour qu'il aille fouiller dans les dossiers, quelque soit le niveau (même zéro).

---

Merci :zoubi: A présent j'ai tout ce qu'il me faut!
Bonne fin de semaine à tous !