@ECHO OFF
REM ----------------------------------------------------------------------------
REM Copyright (c) 2024 by Digital Data GmbH
REM
REM Digital Data GmbH • Ludwig-Rinn-Strasse 16 • D-35452 Heuchelheim
REM Tel.: 0641/202360 • E-Mail: info-flow@digitaldata.works
REM ----------------------------------------------------------------------------
REM Creation Date / Author:    06.01.2024 / MK
REM Version Date / Editor:     18.10.2024 / MK
REM Version Number:            1.2.1.0

pushd "%~dp0"

SET DFSSERVER_PRIMARY=172.24.11.92
SET DFSSERVER_SECONDARY=172.24.11.1
SET DFSSERVERPATH_PRIMARY=\\DD-VMP09-STO01\DD-VMP09-STO01-A3-ZFS$
SET DFSSERVERPATH_SECONDARY=\\DD-STO01\DD-STO01-A2$
SET DFSROOTPATH=\\dd-gan.local.digitaldata.works\dd-DFS01

ping -n 1 %DFSSERVER_PRIMARY% >nul
IF %errorlevel% equ 0 (
	ECHO Der primäre Server %DFSSERVER_PRIMARY%, ist erreichbar!
	SET DFSSERVERPATH=%DFSSERVERPATH_PRIMARY%
	GOTO :SetDFS

) else (
	ECHO Der primäre Server %DFSSERVER_PRIMARY%, ist nicht erreichbar!
	SET DFSSERVERPATH=%DFSSERVERPATH_SECONDARY%
	SET DFSSERVER=%DFSSERVER_SECONDARY%
)

ping -n 1 %DFSSERVER_SECONDARY% >nul
IF %errorlevel% equ 0 (
	ECHO Der sekundäre Server %DFSSERVER_SECONDARY%, ist erreichbar!
	GOTO :SetDFS

) else (
	ECHO Der sekundäre Server %DFSSERVER_SECONDARY%, ist nicht erreichbar!
	ECHO DFS Server kann nicht gesetzt werden!
	GOTO :EOF
)

:SetDFS
dfsutil.exe client property state active %DFSROOTPATH%\ArchivedObjects %DFSSERVERPATH%\ArchivedObjects
dfsutil.exe client property state active %DFSROOTPATH%\ServerObjects %DFSSERVERPATH%\ServerObjects
dfsutil.exe client property state active %DFSROOTPATH%\SharedObjects %DFSSERVERPATH%\SharedObjects
dfsutil.exe client property state active %DFSROOTPATH%\UserObjects %DFSSERVERPATH%\UserObjects

:EOF
timeout /t 10
exit