Archiv für die Kategorie ‘Skripte’

Textbearbeitung mit Ant

Donnerstag, 10. Juni 2010

Mit folgendem Tag werden innerhalb der JNLP-Datei die Werte für “codebase” und “main-class” ausgetauscht.

<replace dir="C:/Entwicklung/Projekt/dist">
   <include name="launch.jnlp"/>
   <replacefilter token=‘codebase="file:/C:/Entwicklung/Projekt/dist/"’ value=‘codebase="http://domain.de/p/"’/>
   <replacefilter token=‘main-class="bob.pokolm.Main"’ value=‘main-class="bob.pokolm.MainTwo"’/>
</replace>

Benutzereingabe bei Ant

Donnerstag, 10. Juni 2010

Mit dem folgenden Fragment wird ein Kennwort erfragt, ein Skript gestartet und das Kennwort als Parameter übergeben.

<target name="deploy-over-script" depends="clean,jar" description="Kopiert Projekt zum Server.">
   <input message="Kennwort:"  addproperty="my.pass" />
   <exec executable="cmd">
      <arg value="/c"/>
      <arg value="C:/Projekt/deploy_over_script.cmd"/>
      <arg value="${my.pass}"/>
   </exec>
</target>

Attribut “userAccountControl” auswerten

Sonntag, 21. Februar 2010

Der weitere Ablauf in einem Bash-Skript sollte davon abhängen, ob Computerkonten im Active Directory aktiviert oder deaktiviert sind. Der Status der Benutzer- und Computerkonten wird im Active Directory vom Attribut “userAccountControl” bestimmt.


typeset -i ACTRL
ACTRL=`ldapsearch -x -LLL -b "dc=firma,dc=de" -h srvdc01 \
   -D "CN=admin,CN=Users,DC=firma,DC=de" -w XXXXX -s sub \
   "(&(objectCategory=computer)(cn=$i))" userAccountControl | \
   grep -r "^userAccountControl:.*" | \
   sed ’s/^userAccountControl: //g’`
ACTRL=$ACTRL\&2
if [ $ACTRL -gt 0 ]; then

Parameter mit “getopts”

Donnerstag, 05. Juni 2008

Mit getopts lassen sich die Parameter vom Skriptaufruf leichter auswerten. Es werden Parameter mit genau einem oder keinem Argument verarbeitet.

(more…)

Squid mit SARG nachträglich auswerten

Sonntag, 05. August 2007

Das folgende Mini-Skript kann genutzt werden, um nachträglich eine Auswertung für den Squid per SARG zu erstellen.

#!/bin/bash

COUNT=0

while [ $COUNT -le 10 ]; do
   YESTERDAY=$(date –date "$COUNT days ago" +%d/%m/%Y);
   /usr/bin/sarg -o /var/www/sarg/daily -d $YESTERDAY;
   COUNT=$[$COUNT+1];
done

exit 0

Perl und IMAP

Samstag, 07. Juli 2007

Das Modul Mail::IMAPClient ermoeglicht der Programmiersprache Perl den komfortablen Zugriff auf einen IMAP-Server.

(more…)

Perl Minis

Mittwoch, 23. August 2006

CPAN-Modul installieren

perl -MCPAN -e ‘install HTTPD::Log::Merge’