Java Security ayarlarını bilgisayarlarda Medium'a çekme

Erdem TEKŞEN

(@ErdemTEKSEN)

Gönderiler: 58

Trusted Member

Konu başlatıcı

GPO ile Java Security ayarlarını bilgisayarlarda Medium'a çekme şansımız var mı acaba?

Çok fazla bilgisayar var çünkü.

Gönderildi : 09/12/2013 13:22

Evren Banger

(@evrenbanger)

Gönderiler: 2439

Üye

Selamlar linkte var.

http://www.darkoperator.com/blog/2013/1/12/pushing-security-configuration-for-java-7-update-10-via-gpo.html

Gönderildi : 09/12/2013 13:33

Erdem TEKŞEN

(@ErdemTEKSEN)

Gönderiler: 58

Trusted Member

Konu başlatıcı

Teşekkürler buraları epey okumuştum. Farklı java sürümleri mevcut sabit bir dosya basmak yerine sadece deployment.properties dosyasına MEDIUM ayarını ekleyecek birşey var mı acaba?

http://www.edugeek.net/blogs/duke5a/2125-vb-script-set-java-security-level-medium.html

Buradaki çalıştırdım ancak dosyada bir değişiklik olmadı. Deneme şansı olan var mı acaba? Veya nerede yanlış kod var.

Bu kodu java.vbs olarak masaüstüne attım ve çalıştırdım ancak sonuç alamadım.

Gönderildi : 09/12/2013 13:55

Evren Banger

(@evrenbanger)

Gönderiler: 2439

Üye

Esasında ADMX en iyisi ama güncel birtane bulamadım bakıyorum sende o şekilde bakarsan daha yararlı olabilir.

Gönderildi : 09/12/2013 14:15

Erdem TEKŞEN

(@ErdemTEKSEN)

Gönderiler: 58

Trusted Member

Konu başlatıcı

Biraz kodlarla oynadım oldu. Aşağıdaki kodu java.vbs olarak kaydedin. Artık gpo yayınlayabilirsiniz.

Windows 7 vs için;

Call JavaSecurity

Sub JavaSecurity

Set wshShell = WScript.CreateObject( "WScript.Shell" )

strUserName = wshShell.ExpandEnvironmentStrings( "%USERNAME%" )

Set objFSO = CreateObject("Scripting.FileSystemObject")

Const ForReading = 1

Const ForWriting = 2

FoundIt = False

strUserFilePath = "c:\Users\" & strUserName & "\AppData\LocalLow\Sun\Java\Deployment\deployment.properties"

strSecurityMedium = "deployment.security.level=MEDIUM"

strMixcodeDisable= "deployment.security.mixcode=DISABLE"

'Check to see if Java is installed, if not, then exit sub

If objFSO.FileExists(strUserFilePath) Then

'Do Nothing

Else

Exit Sub

End If

'Check to see if Java security is set to medium, if so, then exit sub

FoundIt = (InStr(1,objFSO.OpenTextFile(strUserFilePath,1,true,-2).ReadAll,strSecurityMedium,1) <> 0)

If FoundIt = True Then

Exit Sub

Else

'Do Nothing

End If

'Open Java configuration files for reading

Set objUserFile = objFSO.OpenTextFile(strUserFilePath, ForReading)

'Copy file contents into string

strUserFile = objUserFile.ReadAll

'Add medium security line to config

strNewUserFile = strUserFile & Chr(13) & strSecurityMedium & Chr(13) & strMixcodeDisable

'Open Java configuration files for writing

Set objUserFile = objFSO.OpenTextFile(strUserFilePath, ForWriting)

'Write the files

objUserFile.WriteLine strNewUserFile

'Removes Java configuration file from memory

objUserFile.Close

'House cleaning

Set objFSO = Nothing

End Sub

Windows XP içinse;

Call JavaSecurity

Sub JavaSecurity
Set wshShell = WScript.CreateObject( "WScript.Shell" )
strUserName = wshShell.ExpandEnvironmentStrings( "%USERNAME%" )

Set objFSO = CreateObject("Scripting.FileSystemObject")

Const ForReading = 1
Const ForWriting = 2

FoundIt = False

strUserFilePath = "C:\Documents and Settings\" & strUserName & "\Application Data\Sun\Java\Deployment\deployment.properties"
strSecurityMedium = "deployment.security.level=MEDIUM"
strMixcodeDisable= "deployment.security.mixcode=DISABLE"

'Check to see if Java is installed, if not, then exit sub
If objFSO.FileExists(strUserFilePath) Then
'Do Nothing
Else
Exit Sub
End If

'Check to see if Java security is set to medium, if so, then exit sub
FoundIt = (InStr(1,objFSO.OpenTextFile(strUserFilePath,1,true,-2).ReadAll,strSecurityMedium,1) <> 0)
If FoundIt = True Then
Exit Sub
Else
'Do Nothing
End If

'Open Java configuration files for reading
Set objUserFile = objFSO.OpenTextFile(strUserFilePath, ForReading)

'Copy file contents into string
strUserFile = objUserFile.ReadAll

'Add medium security line to config
strNewUserFile = strUserFile & Chr(13) & strSecurityMedium & Chr(13) & strMixcodeDisable

'Open Java configuration files for writing
Set objUserFile = objFSO.OpenTextFile(strUserFilePath, ForWriting)

'Write the files
objUserFile.WriteLine strNewUserFile

'Removes Java configuration file from memory
objUserFile.Close

'House cleaning
Set objFSO = Nothing

End Sub

Gönderildi : 09/12/2013 16:54