Programmation

Classer le fichier passwd par UID

Posted by Olivier Legras on 15 septembre 2011 at 10:19

Voici une commande bien pratique qui permet de classer le fichier passwd par UID : sort -t : -k 3,4 -g /etc/passwd sort –> Commande de trie -t –> défini le séparateur. Dans le fichier /etc/passwd, le séparateur est ‘:’ -k –> défini l’ordre du trie soit pour notre exemple, nous voulons trier la colonne [...]

Filtrer les erreurs php – Error_reporting

Posted by Olivier Legras on 21 décembre 2010 at 10:52

Il est parfois nécessaire de filtrer les erreurs pour ne pas polluer les fichiers log de données récurrentes et non nécessaire. Par exemple, les erreurs Deprecated : [Mon Dec 20 16:09:36 2010] [error] [client 192.168.0.1] PHP Deprecated:  Function ereg_replace() is deprecated in Cette erreur nous indique que l’application PHP utilise une fonction qui est en [...]

Créer un fichier d’une taille définie

Posted by Olivier Legras on 3 décembre 2010 at 9:21

Pour certains tests, il peut être utile de créer des fichiers d’une taille précise. Pour cela, nous pouvons utiliser la commande dd : dd if=/dev/zero of=5M bs=1k count=5 Ici, nous allons créer un fichier nommé 5M qui aura la taille de 1000 blocks de 1Ko * 5. C’est à dire 5M. Le fichier créé sera [...]

Tracer les pertes de paquets d’un ping dans un fichier texte

Posted by Olivier Legras on 12 octobre 2010 at 9:55

Suite à un problème de coupures intermittentes que j’ai eu avec un lien d’un site distant, j’ai trouvé un petit bat permettant de faire un ping toutes les 4 s et de tracer les pertes de paquets. Voici le contenu de mon fichier .bat : @echo off echo Ping vers 192.168.0.1 en cours echo NE [...]

[MISE A JOUR] Synchroniser et superviser VULTURE

Posted by Olivier Legras on 22 juillet 2010 at 4:40

Après avoir ajouté des interfaces à mes serveurs Vulture pour prendre en charge mes certificats SSL par domaine, j’ai du mettre à jour mes scripts de synchronisation et de supervision. Pour rappel, la première version ainsi qu’une doc explicative se trouve à cette adresse : http://www.croc-informatique.fr/2009/07/synchronisation-et-monitoring-de-deux-reverse-proxy-vulture/ J’en ai profité pour remanier un peu mon code [...]

[Nagios] Visualiser la commande exécutée par Nagios

Posted by Olivier Legras on 21 juillet 2010 at 5:38

J’ai passé la journée à rechercher pourquoi mon event handler ne voulait pas fonctionner. J’avais l’impression que certaines macros ne fonctionnaient pas. Mais sur Nagios, comment pouvons nous voir la commande qu’il exécute avec les valeurs des arguments? Et bien, la solution est ici : http://www.waggy.at/nagios/capture_plugin.htm Sur ce site, vous allez trouvez un plugin perl [...]

[VBS] Supprimer les fichiers d’un repertoire en fonction de leur date de modification

Posted by admin on 12 novembre 2009 at 3:26

Voici un script écrit en VBS qui permet de nettoyer un répertoire. Ce script est équivalent à la commande linux : find /rep –mtime +5 –exec rm –f {} \; Voici le script : ‘Les declarations ‘Repertoire ou sont stockes les fichiers DossierSauvegarde = "C:\TEST\" ‘Nombre de jours de conservation des Fichiers AgeMaximalFichiers = "30" [...]

[Plugin Nagios] Supervision des erreurs sur les interfaces des équipements réseau

Posted by admin on 23 juillet 2009 at 5:29

Suite à des problèmes que j’ai rencontré, j’ai décidé de superviser les interfaces de mes équipements réseau. Je n’ai pas trouvé de plugin de ce type donc j’en ai créé un. Mon plugin n’est pas du tout optimisé car je ne suis pas un grand développeur (même plutôt un débutant). je viens juste de le [...]

Trucs perl -2

Posted by admin on 23 juillet 2009 at 12:41

Remplacer un caractère ou une chaine dans une chaine : $chaine =~ s/\//-/g; Ici on remplace “/” par “–” dans l’ensemble de la chaine grâce à l’option “g”. “/” étant un caractère interprété par perl, il faut mettre un “\” devant. Cette expression fonctionne également pour remplacer une chaine dans la chaine. exemple :

Trucs Perl

Posted by admin on 21 juillet 2009 at 8:54

Tailles d’un tableau à 2 dimensions : # nombre de lignesmy $nbr_lignes = @MonTableau_2D;   # nombre de colonnes de la ligne 0 my $nbr_colonnes = @{$MonTableau_2D[0]}; Boucle for : Le Perl dispose de la structure for, qui est une copie de celle du C. for (initialisation; test; incrémentation) { première action; deuxième action; etc… }  [...]