Dateieditierung per Batchdatei (machine.config)

::--snipp ErmittleMachineConfigPath.bat
@echo off & setlocal
Set "OutOfTheReg=%temp%\MySharedDLLs.reg"  
Set "NeededRegKey=HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\SharedDlls"  
regedit /e %OutOfTheReg% %NeededRegKey%
goto skipProsa
~~~~~~~~~~~
:: In der %OutOfTheReg%-Datei steht jetzt die oben abgedruckte meterlange Liste
:: Von der brauchen wir eine Zeile: die Zeile mit "machine.config" 
:: Die holen wir mit dem FIND-Befehl
:: Ein CMD-Prompt-Befehl "find /i "machine.config" %OutOfTheReg%" 
:: würde als Output sinngemäß liefern:

---------- Z:\TEMP\MYSHAREDDLLS.REG
"C:\\WINDOWS\\Microsoft.NET\\Framework\\v1.1.4322\\CONFIG\\machine.config"=dword:00000001</i>  
:: Die ersten beiden Outputzeilen entsorgen wir mit "skip=2" in der nächsten Anweisung, 
:: ebenfalls alles nach dem "="-Zeichen inclusive mit "delims==" 
:skipProsa
for /F "skip=2 delims==" %%i in ('find /i "machine.config" %OutofTheReg%') do Set "MCFile=%%i"  
:: In MCFile steht jetzt folgendes:
:: "C:\\WINDOWS\\Microsoft.NET\\Framework\\v1.1.4322\\CONFIG\\machine.config" 
::da ersetzen wir die doppelten Backslashes durch einfache.
Set MCFile=%MCFile:\\=\%
::Ergebnis MCFile="C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\CONFIG\machine.config" 
::--snapp ErmittleMachineConfigPath.bat

$cmd$change
CHANGE Version 1.1
Programmiert von: tec@Onlinehome.de

Dieses Programm sucht in einer Textdatei nach einem bestimmten
Buchstaben und ersetzt es durch einen anderen.

Das Programm wird folgendermassen aufgerufen:
CHANGE.EXE <Datei> <Char1> <Char2> <x> <y>

<Datei> = Pfad + Dateiname der zu durchforstenden Datei
<Char1> = Nach diesem Buchstabe wird gesucht
<Char2> = Buchstabe wird ersetzt durch diesen Buchstaben
<x>     = wenn x = 1 dann: wird jede Zeile am Bildschirm angezeigt
<x>     = wenn x = 2 dann: wird keine Zeile am Bildschirm angezeigt
<y>     = wenn y = 1 dann: statt <Char1> wird das Pipezeichen "|" genommen  
<y>     = wenn y = 2 dann: statt <Char2> wird das Pipezeichen "|" genommen  
          Die Eingabe von <y> ist optional - muss also nicht unbedingt sein!
          <Char1> oder <Char2> werden dann je nachdem ignoriert. Wurde deshalb
          eingebaut da DOS kein "|" als Parameter erlaubt!  

Beispiel: CHANGE.EXE D:\BEISPIEL.TXT T Z
Es werden in der Datei D:\BEISPIEL.TXT alle Buchstaben T durch Z ersetzt.

::--snipp SetUserToSystemInMachineConfig.bat
@echo off & setlocal
Set "OutOfTheReg=%temp%\MySharedDLLs.reg"  
Set "NeededRegKey=HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\SharedDlls"  
regedit /e %OutOfTheReg% %NeededRegKey%
goto skipProsa
~~~~~~~~~~~
:: In der %OutOfTheReg%-Datei steht jetzt die oben abgedruckte meterlange Liste
:: Von der brauchen wir eine Zeile: die Zeile mit "machine.config"  
:: Die holen wir mit fem FIND-Befehl
:: Ein CMD-Prompt-Befehl <i>$cmd$find /i "machine.config" %OutOfTheReg%</i>  
:: würde als Output sinngemäß liefern:
<i> 
---------- Z:\TEMP\MYSHAREDDLLS.REG
"C:\\WINDOWS\\Microsoft.NET\\Framework\\v1.1.4322\\CONFIG\\machine.config"=dword:00000001</i>  
:: Die ersten beiden Outputzeilen entsorgen wir mit "skip=2" in der nächsten Anweisung  
:: ebenfalls alles nach dem "="-Zeichen inclusive mit "delims=="  
:skipProsa
for /F "skip=2 delims==" %%i in ('find /i "machine.config" %OutofTheReg%') do Set "MCFile=%%i"  
:: In MCFile steht jetzt folgendes:
:: "C:\\WINDOWS\\Microsoft.NET\\Framework\\v1.1.4322\\CONFIG\\machine.config"  
::da ersetzen wir die doppelten Backslashes durch einfache.
Set MCFile=%MCFile:\\=\%
::Ergebnis MCFile="C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\CONFIG\machine.config"  
:: Die Überprüfung IF exist %MCFILE% sollte schon rein...
IF NOT exist %MCFILE% exit /b 3
:: Also raus mit ERRORLEVEL 3
for /f "skip=1 tokens=3" %%i in ('find /i /c "username=""machine" %MCFile%') do @set "AnzZeilen=%%i"  
IF NOT [%AnzZeilen%]==[1] exit /b 2
:: wenn nicht genau EINE Zeile mit [username="machine"]...ist Ende hier.  
Set "MCKopie=%temp%\MCTemp.txt"  
Copy /y %MCFile% %MCKopie% >nul
:: Arbeitskopie der machine.config anlegen.
:: Alle Kleinerzeichen ersetzen durch §, alle Größerzeichen durch "ß"  
change %MCKopie% ^< § 2 >nul
change %MCKopie% ^> ß 2 >nul
:: Die Zeilennummer ermitteln mit dem Text [username="machine"]  
FOR /F "skip=2 tokens=1" %%i IN ('find /i /n "username=""machine" %MCKopie%') DO set "ReplLine=%%i"  
::bei der konkreten Datei machine.config, mit der ich teste, 
:: steht jetzt bei %ReplLine% der Wert [452] für die gefundene Zeile
::noch eben die eckigen Klammern wech...
::[Edit] -------Set ReplLine=%ReplLine:[=%
::[Edit] -------Set ReplLine=%ReplLine:]=%
::[Edit] Hier war ein M$-Bug, den ich übersehen habe. 
::[Edit]   %ReplLine% wurde falsch gesetzt auf "[452]username=""machine"  
::[Edit] **Drex-M$-Stümper *grmpffffffff*
::[Edit] Workaround nächste Zeile: [/Edit]
For /F "delims=" %%i in ("%ReplLine%") do set "ReplLine=%%i"  
:: So, jetzt machine.config lesen und neue schreiben:
Set /a "AktuelleZeile=1"  
Set "MCNew=%temp%\MCNew.txt"  
If exist %MCNew% del %MCNew%
FOR /f "delims=" %%i IN (%MCTemp%) DO call :ReadAndWrite %%i  
change %MCNew% § ^< 2 >nul
change %MCNew% ß ^> 2 >nul
If Exist %MCFile% copy %MCFile% %MCfile%.old >nul
IF EXIST %MCNew% COPY /y %MCNew% %MCFile% >nul
goto :eof

:ReadAndWrite Parameter %1 ist die alte Zeile
IF [%AktuelleZeile%]==[%ReplLine%] echo username="system">>%MCNew%  
IF Not [%AktuelleZeile%]==[%ReplLine%] echo %* >>%MCNew%
Set /A "AktuelleZeile+=1"  
goto :eof
::--snapp SetUserToSystemInMachineConfig.bat