Frage Entwicklung Batch & Shell

gelöst Mehrere TXT-Files Zeilenweise auslesen, zusammensetzen und in CSV datei schreiben

@echo off&setlocal

REM Darstellung der CPU-Auslastung Windowsserver

title Performance Windowsserver

REM #####################################

REM		Setzen des Datums

REM #####################################

FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set Cyear=%%c%%b%%a

FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set DAY=%%a

FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set MON=%%b

FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set YEAR=%%c

REM #####################################

REM		Setzen der Zeit

REM #####################################

set hh=%TIME:~0,2%

set mm=%TIME:~3,2%

set ss=%TIME:~6,2%

REM #####################################

REM		Setze Serverlist

REM #####################################

set servera=Q4DE8NCO*

set SID=DKS

REM #####################################

REM		Setzen der Pararmeter

REM #####################################

set Java="C:\Program Files\Java\jre6\bin\java.exe"

set ChartMaker=D:\Charts\bin\

set Datadir=D:\Charts\data\

set PNGdir=D:\Charts\data\PNG\

set INIdir=D:\Charts\ini\

set Quelle=D:\Charts\quelle\" 

set OutFile=aktuell_win.csv

set Output=3^>"%datadir%%Outfile%"

set PngFile=aktuell_win.png

set IniFile=chart_win.ini

set "inDatei=CPU_Q4DE8NCO*_%cyear%" & set "inDatei1="

REM #####################################

REM		Check Verzeichnisse

REM #####################################

if not exist %Chartmaker% mkdir %Chartmaker%

if not exist %Datadir% mkdir %Datadir%

if not exist %PNGdir% mkdir %PNGdir%

if not exist %INIdir% mkdir %INIdir%

REM #####################################

REM		Baue OutFile

REM #####################################

pushd "%quelle%"

del "%Output%" 2>nul

for /f "delims=" %%i in ('dir /b /on "%inDatei%"') do if not defined inDatei1 set "inDatei1=%%i"

if not defined inDatei1 echo Keine passende Datei gefunden! & goto :eof

%Output% <nul (

    >&3 set/p="SID;Datum/Zeit"

    for /f "tokens=2 delims=_" %%d in ('dir /b /on "%inDatei%"') do >&3 set/p=";%%d"

    >&3 echo(

    for /f skip^=1usebackqtokens^=1-4 %%i in (%inDatei1%) do (

        >&3 set/p="%sid%;%%j %%k;%%l"

        for /f "skip=1 delims=" %%a in ('dir /b /on "%inDatei%"') do for /f tokens^=4 %%m in (' findstr /c:"%%j %%k" %%a ') do >&3 set/p=";%%m"

        >&3 echo(

) )

popd

call %ChartMaker%ersetze.bat

REM #####################################

REM		Baue Chart 

REM #####################################

cd %ChartMaker%

%JAVA% -jar %ChartMaker%ChartMaker.jar %Datadir%%Outfile% %PNGdir%%PngFile% %INIdir%%IniFile%

%PNGdir%%PngFile%

@echo off

setlocal enabledelayedexpansion

pushd "D:\Charts\data"

REM #####################################

REM		Setzen des Datums

REM #####################################

FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set Cyear=%%c%%b%%a

FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set DAY=%%a

FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set MON=%%b

FOR /F "tokens=1,2,3,4 delims=/. " %%a in ('date/T') do set YEAR=%%c

REM #####################################

REM		Setze Datei

REM #####################################

set "filename=aktuell_win.csv"

set "tempfile=aktuell_win_.csv"

REM #####################################

REM		lese erste Zeile aus

REM #####################################

for /F "delims=" %%i in (D:\Charts\data\aktuell_win.csv) do if not defined zeile set "zeile=%%i"

echo %zeile% >%tempfile%

REM #####################################

REM  lese restliche Zeilen aus und bau um

REM #####################################

for /F "skip=1 tokens=1-13 delims=/;" %%a in (%filename%) do (

set text=%%a;%%c.%%b.%%d;%%e;%%f;%%g;%%h;%%i;%%j;%%k;%%l;%%m

set text=!text:^|=;!

echo !text!>>%tempfile%

)

REM #####################################

REM  lösche altes File / benenne TEMP um

REM #####################################

del %filename%

ren %tempfile% %filename%

popd

SID;Datum/Zeit;Q4DE8NCOJ23;Q4DE8NCOJ24;Q4DE8NCOJ25;Q4DE8NCOJ26;Q4DE8NCOJ27;Q4DE8NCOJ28 

DKS;12.12.2011 00:10;1;1;2;1;0;2;;;

DKS;12.12.2011 00:20;0;1;4;0;2;0;;;

DKS;12.12.2011 00:30;0;2;2;1;0;0;;;

DKS;12.12.2011 00:40;1;0;3;1;0;1;;;

DKS;12.12.2011 00:50;1;0;1;1;1;0;;;

DKS;12.12.2011 01:00;0;0;2;1;0;1;;;

DKS;12.12.2011 01:10;1;1;2;1;0;3;;;

DKS;12.12.2011 01:20;1;2;2;0;0;1;;;