;GRCupdate.kix
;Updates GRC.dat based on IP address, this will prevent users from downloading updates across the wan or lost Nav Parents
;Script will find out if computer is NT/2000 and copy GRC.dat to correct location
;Nav Service is then stopped and restarted for changes to take effect
;Also writes to event log of parent server

cls
select
Case @dos=5.0
$system="Win2k"
endselect
select
Case @dos=4.0
$system="WinNT"
endselect

If $system = "Win2k"
GOTO W2k
else GOTO NT4

:W2k
$TCPIP = @IPAddress0
$3octet = val(substr($TCPIP,9,3))
;New Jersey
if $3octet = 25
USE W: "\\bssnjlan\vphome"
SHELL '%comspec% /c COPY W:\GRC.dat c:\docume~1\alluse~1\applic~1\symantec\norton~1\7.5'
USE W: /DEL
SHELL '%comspec% /c NET STOP "Norton AntiVirus Client" >NUL'
SHELL '%comspec% /c NET START "Norton AntiVirus Client" >NUL'
IF @ERROR = 1
$BAk = "GRC.DAT UNSUCCESSFUL"
ELSE
$BAk = "GRC.DAT SUCCESSFUL"
ENDIF
IF $Bak = "GRC.DAT SUCCESSFUL"
LOGEVENT(4,1000,"GRC.DAT file on @WKSTA Was Sucessfully Updated", "\\bssnjlan", "GRC.dat Process")
Else
LOGEVENT(4,1001,"GRC.DAT file on @WKSTA Was NOT Updated Sucessfully", "\\bssnjlan", "GRC.dat Process")
ENDIF
else

:NT4
;New Jersey
$TCPIP = @IPAddress0
$3octet = val(substr($TCPIP,9,3))
if $3octet = 25
USE W: "\\bssnjlan\vphome"
SHELL '%comspec% /c COPY W:\GRC.dat c:\winnt\profiles\alluse~1\applic~1\symantec\norton~1\7.5'
USE W: /DEL
SHELL '%comspec% /c NET STOP "Norton AntiVirus Client" >NUL'
SHELL '%comspec% /c NET START "Norton AntiVirus Client" >NUL'
IF @ERROR = 1
$BAk = "GRC.DAT UNSUCCESSFUL"
ELSE
$BAk = "GRC.DAT SUCCESSFUL"
ENDIF
IF $Bak = "GRC.DAT SUCCESSFUL"
LOGEVENT(4,1000,"GRC.DAT file on @WKSTA Was Sucessfully Updated", "\\bssnjbdc", "GRC.dat Process")
Else
LOGEVENT(4,1001,"GRC.DAT file on @WKSTA Was NOT Updated Sucessfully", "\\bssnjbdc", "GRC.dat Process")
ENDIF