Voici quelques scripts et autres petits outils.
Dynamique WallPaper
Un service Windows (ecrit en Perl) qui change l'image de fond du bureau (WallPaper)
avec vos propres images au rythme que vous choisissez.
Version avec images  Version sans images

Changer le WallPaper
Un script simple en WSH (VBSCript) pour modifier le fond du bureau à "scheduller" au rythme désiré.
ConnectODBC
Programme (perl) permetant de se connecter à une base de données avec un DSN (DataSourceName) ODBC
Connection en mode text sur n'importe quel base via ODBC.
Possibilité de passer n'importe quel ordre SQL compris par la base cible
Possibilité de faire le CATALOG ODBC. (Code source utilisable avec activestate Perl et Executable compilé en mode autonome pour utilisation sur n'importe quel Win32).
MQ Series (IBM)
Programme (perl) permetant de surveiller la connection à un QueueManager et le remplissage des files.
(Nécessite un client MQ).
Manipuler des images jpeg
Programme (perl) permetant de créer ou modifier la taille (dimension de l'image ET taille en octets),
et de modifier la compression (=qualité) des images jpeg.
Le zip contient un executable "stand alone" ET le code source (nécessitant le module GD).
CheckWinHost
Outils simple de surveillance de machine Windows
Surveillance EventLog, taille disque, process, service, ouverture de port, test HTTP ...
Alerte par mail.
Heurodate  Heurodate avec exe Win32
Script en Perl pour heurodater des fichiers (IE renommer le nom d'un fichier avec la date système).
Version interprété : Fonctionne sous unix comme sous windows.
Version exécutable : Fonctionne sous Win32.
ArchiveLogMagic
Windows  Solaris  Linux RH  Aix5L
Programme vérifiant la taille d'une archivelog Oracle avec la taille annoncée dans l'entete.
Syntaxe: archivelog_magic <nom du fichier d'archive à vérifier> Uniquement pour Oracle 8i et 9i
sessions Oracle
Version 8i, 9i et 10g  Version pré 8 et 7
Script sql listant les sessions sur une base Oracle. (à passer avec les droits de lecture sur v$session).
Nombre de block demandés par session Oracle
gets.sql
Script sql, donnant par sessions, le nombre de block demandé ('db block gets' + 'consistent gets').
Envoi de mail via SMTP en ksh uniquement
sendmail.ksh
Script ksh permettant un envoi de mail via un serveur SMTP.
Utilisation de sqlplus en ksh avec une seule connection
sqlplus.ksh
Script ksh permettant l'utilisation de sqlplus dans un script ksh en ne se connectant qu'UNE fois.
AddEvent
Programme (perl) permetant de Créer des evenements dans la base de registre d'une machine windows
(Code source utilisable avec activestate Perl et Executable compilé en mode autonome pour utilisation sur n'importe quel Win32).
getHeaderHTTP
Programme (perl) permetant de récupérer une page web ou le header HTTP
Usage:
GetHeader.pl -h <hostname> -p <port> -c <GET|HEAD> -u <URI>
Par défaut
hostname=localhost
port=80
commande (-c) = HEAD
URI= /
(Code source utilisable avec activestate Perl et Executable compilé en mode autonome pour utilisation sur n'importe quel Win32).
Supprimer des fichiers plus vieux que X jours
Sous unix: find $MY_DIR -mtime +$NB_JOURS -type f -exec rm {} \;
(Pas de script pour une ligne de commande !!)
Sous windows: script perl: SuppOldFile.pl
Usage:
SuppOldFile.pl <Nom du répertoire> <Nombre de jours>
Automatiser un ftp
script perl: ftp.pl
La configuration se fait dans un fichier .ini. Voir le ReadMe.txt.
Extraction de table Oracle au format texte
extract.zip
La configuration se fait dans un fichier .ini. Voir le ReadMe.txt dans le zip.
L'archive contient le script perl, un "readme" et l'executable utilisable sur Win32.
(Il faut un client Oracle evidemment.)
Sauvegarde RMAN d'une base de données avec catalog=controlfile
script pour Oracle 9i, 10g backup.ksh
script pour Oracle 8i backup8i.ksh
Restauration RMAN d'une base de données avec catalog=controlfile
script pour Oracle 9i, 10g restore.ksh
script pour Oracle 8i restore8i.ksh
Attention: Si le controlfile est perdu il faut d'abord recopier le controlfile sauvé au bons endroits ...
Attention: Si les redologs sont perdus il faudra faire un resetlog lors de l'open de la database.
Attention: Le backup,recovery d'une base de données c'est un métier !! :-))
Restauration backupset RMAN d'archivelog non connu du catalog
script pour Oracle 8i,9i,10g release 1 RestoreArchLog.ksh
Usage:
./RestoreArchLog.ksh <nom absolu du backuppiece> <Repertoire de destination des archivelogs>
Pour les 10g release 2 et +, dans rman faire :
catalog backuppiece '<nom complet du backuppiece>';
restore archivelog all;
Attendre le démarrage d'une base Oracle
Programme Java WaitDbStart.java (Connection avec le ThinDriver).
Le programme "ne rend la main" que si la base répond.
Usage:
java WaitDbStart <hostname> <Port> <SID> <Temporisation entre les tentatives>
Comme Java, c'est SUPER portable sur tous les systèmes du monde sans aucun problème, voici la class compilé pour :
(Faire clic droit et "save as")
WaitDbStart.class pour JVM 1.3
WaitDbStart.class pour JVM 1.4
WaitDbStart.class pour JVM 1.5
WaitDbStart.class pour JVM 1.6
Attention selon les versions de java il faut avoir:
Pour un Java 1.4 ou + :
CLASSPATH=$ORACLE_HOME/jdbc/lib/ojdbc14.jar
Pour un Java 1.2 ou 1.3 :
CLASSPATH=$ORACLE_HOME/jdbc/lib/classes12.zip (ou jar)
Pour un Java 1.1 :
CLASSPATH=$ORACLE_HOME/jdbc/lib/classes111.zip (ou jar)
Attention aussi au version du JDBC utilisé.
Conseil presque idiot (tellement c'est evident) :
version du JDBC = version du moteur Oracle
c'est mieux ! :-)
Suivi de statistique dans une base Oracle
Package OraStat.zip
Service Windows qui prend des statistiques issues de requetes (Vous pouvez ajouter les votres) pour les stocker dans un repository.
Le package comprend les scripts perl CGI (pour un serveur Apache) permettant la restitution en graph des statistiques.
Peut être utilisé pour le "tunning" ET le "Capacity Planning"
Voir le readme dans le ZIP.
Crypter/Décrypter n'importe quel fichier.
PovCrypt.zip
Le zip contient un exe Win32 et le code source (perl).
Utilisation:
Dans la boite de dialogue choisir:
1- Action cryptage ou décryptage.
2- Entrez la clé qui permettra de crypter/décryter
(Evidemment la clé doit être la même pour crypter ET décryter)
3- Choisir le fichier à traiter.
D'autres à venir ... ...

Requete Web (HTTP) en ksh
GetHTTP.ksh
Script ksh permettant de lancer une requete HTTP simple.
Cryptage en ksh
crypt.ksh
Script ksh permettant de crypter/décrypter.
Vérifier un fichier Oracle (DataBase) grâce aux entêtes
OraHeader.pl
Script perl qui affiche quelques infos de n'importe quel fichier Oracle (ArchiveLog,RedoLog,DataFile,TempFile,ControlFile,BackupPiece).

Remerciements pour les programmes, photos, idées trouvés et utilisés ici.
Merci à
- mon pote Fifi pour les photos exemples (WallPaper).
- site Extreme Instability pour les photos exemples (WallPaper).
- site ?? pour le programme djpeg.exe
- au collègue Eric Jolent pour le défi sur le VBscript ;-)
- A tous les collègues et néanmoins de chez JCDECAUX et d'ailleurs pour leurs besoins multiples qui ont suscités quelques idées à partager. ;-)