Nützliche Batch-Skripte

[e2e4]

Salut,

ich denke wir sollten hier eine Rubrik eröffnen, wo jeder nützliche Batch-Skripte vorstellen kann, die bei der Arbeit mit dem OS oder der Kommandozeile vonnutzen sind. Ich fange an mit cdd.bat :

::Schneller LW && Dir-Wechsel
::Benutzung ohne Parameter zeigt Verzeichnisse welche eine Ebene höher
@echo off
IF (%1)==() GOTO LIST
if [%OS%]==[Windows_NT] (cd /d %1 & goto :EOF)
echo %1 | FIND ":" | if NOT errorlevel 1 %1.\
cd %1
:LIST
DIR ..\ /AD | FIND /V /I "VOLUME IN" | FIND /V /I "VOLUME SERIAL" | FIND /V /I "FILE(S)" | FIND /V /I "DIR(S)" | FIND /V /I ". " | FIND /V /I ".. " | MORE
:END

[deb01]

Das Skript ist ja nicht schlecht, aber warum veröffentlichen wir das alles nicht hier. Das heißt doch schon Programmierung/Skripte ...

[e2e4]

Salut,

hatte mich falsch ausgedrückt, statt "Rubrik" meinte ich "Thread"

Habe heute ein interessantes gefunden (fassoc.cmd):

:: Return the filename associated with a file extension
:: This batch file can be used to determine which application
:: is associated with a given file extension.

@ECHO off
SETLOCAL
IF NOT [%1]==[] goto s_start

CLS
ECHO FASSOC
ECHO Returns the filename associated with a file extension
ECHO.
ECHO SYNTAX
ECHO FASSOC ext
ECHO.
ECHO KEY
ECHO ext : a file extension without a leading period.
ECHO.
ECHO e.g. FASSOC wri
ECHO.

GOTO :eof

:s_start

FOR /F "tokens=2* delims==" %%G IN ('assoc .%1') DO SET v_type=%%G

IF NOT DEFINED v_type GOTO :eof

FOR /F "tokens=2* delims==" %%G IN ('ftype %v_type%') DO ECHO %%G

----------

e2e4

[charly-tokic]

Hier ein Start/Stop/Status-Skript für beliebige Programme oder Skripte unter Linux und Solaris. Habe ich selbst gebraucht, um einen TCP-Server, der in Perl geschrieben wurde, bequem handhaben zu können. Was noch angepasst werden muss ist:
1. $SKRIPTLOC. In dieser Variable steht der Pfad zum Prgoramm das gestartet oder gestoppt werden soll.
2. $SKRIPTNAME. Einfach der Name des Programms. Nach diesem wird in der Prozesstabelle gefandet.
3. Outputtext muss noch angepasst werden.

Ciao! :-)


#!/usr/bin/perl -w
use strict;
use diagnostics;

my $SKRIPTLOC = "/opt/Infopark/NPS/SES/HOME/sesProxyServer.pl"; #Pfad zum Skript sesProxyServer.pl.
my $SKRIPTNAME = "sesProxyServer.pl"; #Name des Skripts, der den sesProxyServer erzeugt. Nach diesem Namen wird in der Prozesstabelle gesucht.
my $input = $ARGV[0];

if (!defined $input) {
print "Bitte Skript mit dem Zusatz start oder stop verwenden.\n";
} elsif ($input eq "stop") {
my $prozesse = `ps -aux|grep $SKRIPTNAME`;
my @prozess = (split "\n",$prozesse);
foreach my $i (@prozess) {
if ($i !~ /.*grep.*/) {
my @parts = (split " ", $i);
print "sesProxyServer-Prozess $parts[1] wird gestoppt.\n";
my $system = kill 9,($parts[1]);
if ($system != 0) {
print "sesProxyServer-Prozess $parts[1] wurde gestoppt.\n";
} else {
print "sesProxyServer-Prozess $parts[1] wurde NICHT gestoppt.\n";
}
}
}
} elsif ($input eq "start") {
my $prozesse = `ps -ef|grep $SKRIPTNAME`;
my @prozess = (split "\n",$prozesse);
foreach my $i (@prozess) {
if ($i !~ /.*grep.*/) {
@MAIN: arts = (split " ", $i);
} else {
my $negativ = 1;
}
}
if (defined @MAIN: arts) {
print "sesProxyServer läuft schon unter der PID $MAIN: arts[1].\n";
} else {
my $system = system("$SKRIPTLOC &");
if ($system == 0) {
print "Der sesProxyServer wurde gestartet. \n";
} else {
print "Der sesProxyServer wurde NICHT gestartet. \n";
}
}
} elsif ($input eq "status") {
my $prozesse = `ps -ef|grep $SKRIPTNAME`;
my @prozess = (split "\n",$prozesse);
foreach my $i (@prozess) {
if ($i !~ /.*grep.*/) {
@MAIN: arts = (split " ", $i);
} else {
my $negativ = 1;
}
}
if (defined @MAIN: arts) {
print "sesProxyServer läuft unter der PID $MAIN: arts[1].\n";
} else {
print "Der sesProxyServer ist nicht gestartet.\n";
}
} else {
print "Bitte Skript mit dem Zusatz start oder stop verwenden.\n";
}

[e2e4]

Salut charly-tokic,

es wäre doch sicherlich besser einen Thread für Perl-Skripte
(z.B. nützliche Perl-Skripte) zu öffnen, damit die Übersichtlichkeit gewahrt ist, oder?

Grüße

e2e4

[e2e4]

Tool-Ressourcen im Internet, um Batch effektiver zu lösen:

http://home.mnet-online.de/horst.muc/
http://thunder.prohosting.com/~ladi/e_cmd32.html#top
http://xset.tripod.com/
http://www.xxcopy.com/

e2e4

[e2e4]

Gerade eben gefunden:

:: ----------------------------------------------
:: Batchfile: CHKOS.BAT
:: Purpose: Determine 9x/NT/2K/XP
:: OS: 9x+ DOS PROMPT
:: Updated: Eric Leaf 04-10-02
:: 
:: Returns: ISWINNT, ISWIN2K, ISWINXP, ISWINXH, 
:: and ISWIN9x environment variables.
::
:: Echos: Current OS environment
:: ----------------------------------------------
@echo off
cls
SET ISWINNT=0
SET ISWIN2K=0
SET ISWINXP=0
SET ISWINXH=0
SET ISWIN9X=0
 
IF "%OS%"=="Windows_NT" GOTO NT_OS
SET ISWIN9X=1
GOTO END
 
:NT_OS
Set RANDOM=
If Defined RANDOM GOTO 2K_XP
SET ISWINNT=1
GOTO END
 
:2K_XP
IF "%CLIENTNAME%" == "Console" GOTO XP
SET ISWIN2K=1
GOTO END
 
:XP
IF "%USERDNSDOMAIN%"=="" GOTO XPH
SET ISWINXP=1
GOTO END
 
:XPH
SET ISWINXH=1
GOTO END
 
:END
if "%ISWIN9X%"=="1" echo Windows 9x
if "%ISWINNT%"=="1" echo Windows NT
if "%ISWIN2K%"=="1" echo Windows 2000 Professional
if "%ISWINXH%"=="1" echo Windows XP Home Edition
if "%ISWINXP%"=="1" echo Windows XP Professional

Kann das evtl. mal eine für WinXP testen, da ich das nicht habe?

e2e4

[Rupps.]

getestet und für gut befunden

Rupps

[e2e4]

Danke schön

e2e4

[Rupps.]

gerade aus der Mottenkiste gezogen

: >>> AKTZEIT.BAT <<<
: Dieser Batch wird das aktuelle Datum und die Uhrzeit
: aller angegebenen Dateien aktualisieren.
:
: Beispiel:

: AKTZEIT.BAT C:\DATEN\ART&LIEF\EINKAUF.FM
: Der Datei Einkauf.FM
: wird das aktuelle Datum und die aktuelle Uhrzeit zugewiesen.

: AKTZEIT:BAT C:\DATEN\ART&LIEF\*.*
: Allen Dateien im Verzeichnis C:\DATEN\ART&LIEF
: wird das aktuelle Datum und die aktuelle Uhrzeit zugewiesen.


@ECHO OFF
FOR %%D IN (%1,%2,%3,%4,%5,%6,%7,%8,%9) DO COPY /B %%D +,,

: Rupprecht Erwin, den 25.06.1996