Suppression des codes de couleur ANSI du flux de texte

Examiner les résultats de

perl -e 'use Term::ANSIColor; print color "white"; print "ABC\n"; print color "reset";'

dans un éditeur de texte (par exemple, vi) affiche les éléments suivants:

^[[37mABC
^[[0m

Comment supprimer les codes de couleur ANSI du fichier de sortie? Je suppose que le meilleur moyen serait de diriger la sortie via un éditeur de flux de toutes sortes.

Ce qui suit ne fonctionne pas

perl -e 'use Term::ANSIColor; print color "white"; print "ABC\n"; print color "reset";' | perl -pe 's/\^\[\[37m//g' | perl -pe 's/\^\[\[0m//g'

Les caractères ^[[37met ^[[0mfont partie des séquences d'échappement ANSI (codes CSI) . Voir aussi ces spécifications .

Utiliser GNU sed

sed 's/\x1b\[[0-9;]*m//g'

• \x1b(ou \x1B) est le caractère spécial d' échappement
  ( sedne prend pas en charge les alternatives \eet \033)
• \[ est le deuxième caractère de la séquence d'échappement
• [0-9;]* est la valeur de couleur regex
• m est le dernier caractère de la séquence d'échappement

Sur macOS, la sedcommande par défaut ne prend pas en charge les caractères spéciaux tels \eque ceux signalés par slm et steamer25 dans les commentaires. Utilisez plutôt gsedque vous pouvez installer en utilisant brew install gnu-sed.

Exemple avec la ligne de commande de OP:   _{(OP signifie affiche originale)}

perl -e 'use Term::ANSIColor; print color "white"; print "ABC\n"; print color "reset";' | 
      sed 's/\x1b\[[0-9;]*m//g'

Tom Hale suggère de supprimer toutes les autres séquences d'échappement en utilisant [a-zA-Z]au lieu de la lettre mpropre à la séquence d'échappement en mode graphique (couleur). Mais [a-zA-Z]peut être trop large et pourrait enlever trop. Michał Faleński et Miguel Mota proposent de ne supprimer que certaines séquences d'échappement avec [mGKH]et [mGKF]respectivement. Britton Kerin indique qu'il Kfaut également utiliser en plus de msupprimer les couleurs d' gccerreur / avertissement (n'oubliez pas de rediriger gcc 2>&1 | sed...).

sed 's/\x1b\[[0-9;]*m//g'           # Remove color sequences only
sed 's/\x1b\[[0-9;]*[a-zA-Z]//g'    # Remove all escape sequences
sed 's/\x1b\[[0-9;]*[mGKH]//g'      # Remove color and move sequences
sed 's/\x1b\[[0-9;]*[mGKF]//g'      # Remove color and move sequences

Last escape
sequence
character   Purpose
---------   -------------------------------
m           Graphics Rendition Mode (including Color)
G           Horizontal cursor move
K           Horizontal deletion
H           New cursor position
F           Move cursor to previous n lines

En utilisant perl

La version de sedinstallée sur certains systèmes d'exploitation peut être limitée (par exemple, macOS). La commande perla l'avantage d'être généralement plus facile à installer / mettre à jour sur plusieurs systèmes d'exploitation. Adam Katz suggère d'utiliser \e(idem \x1b) dans PCRE .

Choisissez votre regex en fonction du nombre de commandes que vous souhaitez filtrer:

perl -pe 's/\e\[[0-9;]*m//g'          # Remove colors only
perl -pe 's/\e\[[0-9;]*[mG]//g'
perl -pe 's/\e\[[0-9;]*[mGKH]//g'
perl -pe 's/\e\[[0-9;]*[a-zA-Z]//g'
perl -pe 's/\e\[[0-9;]*m(?:\e\[K)?//g' # Adam Katz's trick

Exemple avec la ligne de commande de OP:

perl -e 'use Term::ANSIColor; print color "white"; print "ABC\n"; print color "reset";' \
      | perl -pe 's/\e\[[0-9;]*m//g'

Usage

Comme le souligne le commentaire de Stuart Cardall , cette sedligne de commande est utilisée par le projet Ultimate Nginx Bad Bot (1 000 étoiles) pour nettoyer le rapport de courrier électronique ;-)

J'ai découvert un meilleur dissolvant de séquence d'échappement. Vérifie ça:

perl -pe 's/\x1b\[[0-9;]*[mG]//g'

Ce qui est affiché comme ^[est pas ^ et [; c'est le ESCcaractère ASCII , produit par Escou Ctrl[(la ^notation signifie la touche Ctrl).

ESCest 0x1B hexadécimal ou 033 octal, vous devez donc utiliser \x1Bou \033dans vos regex:

perl -pe 's/\033\[37m//g; s/\033[0m//g'

perl -pe 's/\033\[\d*(;\d*)*m//g'

Si vous préférez quelque chose de simple, vous pouvez utiliser le module strip-ansi ( Node.js requis):

$ npm install --global strip-ansi-cli

Ensuite, utilisez-le comme ceci:

$ strip-ansi < colors.o

Ou simplement passer une chaîne:

$ strip-ansi '^[[37mABC^[[0m'

commandlinefu donne cette réponse qui supprime les couleurs ANSI ainsi que les commandes de mouvement:

sed "s,\x1B\[[0-9;]*[a-zA-Z],,g"

Pour seulement des couleurs, vous voulez:

 sed "s,\x1B\[[0-9;]*m,,g"

Je crois que ceci est une suppression faisant autorité de toutes les séquences d'échappement ANSI :

perl -pe '
  s/\e\[[\x30-\x3f]*[\x20-\x2f]*[\x40-\x7e]//g;
  s/\e[PX^_].*?\e\\//g;
  s/\e\][^\a]*(?:\a|\e\\)//g;
  s/\e[\[\]A-Z\\^_@]//g;'

(S'il vous plaît noter qu'il perl, comme beaucoup d' autres langues (mais pas sed), accepte \ecomme caractère d'échappement Esc, \x1bou \033par code, montré dans les terminaux comme ^[. Je l' utilise ici car il semble plus intuitive.)

Cette commande perl, que vous pouvez exécuter sur une seule ligne si vous préférez, comporte quatre remplacements:

Le premier va après les séquences CSI (les séquences de code d’échappement commençant par le "Contrôleur de séquence" de Esc[, qui couvre bien plus que les séquences de sélection de rendu graphique qui composent les codes de couleur et autres décorations de texte).

Le deuxième remplacement supprime les séquences restantes qui impliquent des caractères de fin et se terminent par ST (le terminateur de chaîne, Esc\). Le troisième remplacement est la même chose , mais permet également le système d' exploitation commande des séquences pour mettre fin avec un BEL ( \x07, \007souvent \a).

Le quatrième remplacement supprime les échappées restantes.

Pensez également à supprimer d'autres caractères ASCII de largeur nulle, tels que BEL et d'autres caractères de contrôle C0 et C1 plus obscurs . J'ai utilisé s/[\x00-\x1f\x7f-\x9f\xad]+//g, qui comprend également Supprimer et Soft Hyphen . Ceci exclut les caractères de largeur nulle codés plus élevés par Unicode, mais je crois que c'est exhaustif pour ASCII (Unicode \x00- \xff). Si vous faites cela, supprimez ces dernières car elles peuvent être impliquées dans des séquences plus longues.

La question "Répondu" ne fonctionnant pas pour moi, j'ai donc créé cette expression rationnelle à la place pour supprimer les séquences d'échappement générées par le module perl Term :: ANSIColor.

cat colors.o | perl -pe 's/\x1b\[[^m]+m//g;

Les expressions rationnelles de Grawity devraient fonctionner correctement, mais l'utilisation de + semble également fonctionner correctement.

"tput sgr0" a quitté ce caractère de contrôle ^ (B ^ [
Voici une version modifiée pour s'en occuper.

perl -pe 's/\e[\[\(][0-9;]*[mGKFB]//g' logfile.log

J'ai eu un problème similaire avec la suppression des caractères ajoutés lors de la collecte de la sortie interactive supérieure via mastic, ce qui a aidé:

cat putty1.log | perl -pe 's/\x1b.*?[mGKH]//g'

C'est ce qui a fonctionné pour moi (testé sur Mac OS X)

perl -pe 's/\[[0-9;]*[mGKF]//g'