XML Port Scan

Se os problemas de Injeção de Código (Cross Site Scripting) não foram suficientes para alertar os desenvolvedores, administradores de servidores web sobre a importância da configuração adequada dos servidores de aplicação, agora eles vão ter que acordar.

Primeiro foram os port scan baseados em javascript, agora pesquisadores da SIFT Information Security Services apresentaram um paper onde eles se aproveitam do parser do XML que é realizado no servidor de aplicação, para fazer um enumeration de maquinas que estão protegidas por um firewall.





O paper também descreve as medidas para mitigar esse risco. Pra variar, coisas que já são recomendadas a muito tempo.

XML Port Scanning - Bypassing Restrictive Perimeter Firewalls

Biometria

Quem acompanha os blogs do Fernando Cima e do André Fucs, estão verificando uma série de pontos que devem ser considerados na implementação de biometria.

Eu quero disponibilizar o video do:

Mythbusters-Beat Finger Print Security System

XML Port Scan

Se os problemas de Injeção de Código (Cross Site Scripting) não foram suficientes para alertar os desenvolvedores, administradores de servidores web sobre a importância da configuração adequada dos servidores de aplicação, agora eles vão ter que acordar.

Primeiro foram os port scan baseados em javascript, agora pesquisadores da SIFT Information Security Services apresentaram um paper onde eles se aproveitam do parser do XML que é realizado no servidor de aplicação, para fazer um enumeration de maquinas que estão protegidas por um firewall.





O paper também descreve as medidas para mitigar esse risco. Pra variar, coisas que já são recomendadas a muito tempo.

XML Port Scanning - Bypassing Restrictive Perimeter Firewalls

Biometria

Quem acompanha os blogs do Fernando Cima e do André Fucs, estão verificando uma série de pontos que devem ser considerados na implementação de biometria.

Eu quero disponibilizar o video do:

Mythbusters-Beat Finger Print Security System

Hype Cycle

Apesar de não ser um grande fã do Gartner, ele costuma disponibilizar algumas informações interessantes.

Uma dessas informações é o Hype Cycle. Hype Cycle é basicamente, um estudo considerando 5 fases e mostrado em um gráfico, tendências, evolução, pico e outras características.



Pesquisando no google image, pode-se encontrar vários gráficos de hype cycle.

Hype Cycle por wikipedia
Entendo o Hype Cycle por Gartner

Hype Cycle

Apesar de não ser um grande fã do Gartner, ele costuma disponibilizar algumas informações interessantes.

Uma dessas informações é o Hype Cycle. Hype Cycle é basicamente, um estudo considerando 5 fases e mostrado em um gráfico, tendências, evolução, pico e outras características.



Pesquisando no google image, pode-se encontrar vários gráficos de hype cycle.

Hype Cycle por wikipedia
Entendo o Hype Cycle por Gartner

Google está atento

Hoje pesquisando um site, me deparei com um novo "serviço" do google. Ele avisa quando você está partindo para um site potencialmente perigoso.

Google está atento

Hoje pesquisando um site, me deparei com um novo "serviço" do google. Ele avisa quando você está partindo para um site potencialmente perigoso.

Bunker

Alguns acontecimentos, muitas vezes nos faz pensar em ter um bunker. Mas, o que realmente seria um bunker.

Bunker basicamente são infra-estruturas com vários controles de segurança, capazes de proteger de ataques pesados, armas de fogo, tóxicos, etc...

Interessante é ver toda tecnologia e técnicas empregadas no desenvolvimento de tais infra-estruturas. Vai muito além do que uma sala cofre pode oferecer. Ronaldo Vasconcelos já falou sobre um dos mais famosos o NORAD (North American Aerospace Defense Command).


Entrada no NORAD

Pesquisando, se encontra muito material sobre e já pode-se perceber que hoje já existe muitas outras utilidades para os bunker, como realização de festas e usar como moradia.

Com uma pesquisada no google image é possivel encontrar muitos detalhes, inclusive projetos.

Bunker pelo Wikipedia
NORAD
Ronaldo Vasconcelos
Sala cofre FAQ

Bunker

Alguns acontecimentos, muitas vezes nos faz pensar em ter um bunker. Mas, o que realmente seria um bunker.

Bunker basicamente são infra-estruturas com vários controles de segurança, capazes de proteger de ataques pesados, armas de fogo, tóxicos, etc...

Interessante é ver toda tecnologia e técnicas empregadas no desenvolvimento de tais infra-estruturas. Vai muito além do que uma sala cofre pode oferecer. Ronaldo Vasconcelos já falou sobre um dos mais famosos o NORAD (North American Aerospace Defense Command).


Entrada no NORAD

Pesquisando, se encontra muito material sobre e já pode-se perceber que hoje já existe muitas outras utilidades para os bunker, como realização de festas e usar como moradia.

Com uma pesquisada no google image é possivel encontrar muitos detalhes, inclusive projetos.

Bunker pelo Wikipedia
NORAD
Ronaldo Vasconcelos
Sala cofre FAQ

Engenharia de Software

Engenharia de software na minha opinião não é a chave para software seguro, mas, é indispensável para qualidade do software.

O SWEBOK (Software Engineering Body of Knowledge) é um CBK (Corpo de conhecimento) sobre engenharia de software. o SWEBOK é um projeto do IEEE Computer Society e conta com apoio da Rational, Mitre, NIST, entre outros.



Excelente guia de referência para desenvolvimento de software.

Guide to the SWEBOK
Uma introdução ao SWEBOK
IEEE Computer Society

Quebrando Teclado Virtual de Internet Banking

Há muito tempo eu já tinha conhecimento desta técnica, mas, agora foi feito um video por profissionais espanhóis.

O vídeo mostra a atuação de um trojan que gera um video de tudo que é feito na tela do internet banking, isto torna os teclados virtuais inúteis.



O mais interessante é ver a mídia divulgar como novidade este tipo de ameaça:

Vírus "filma" digitação de senhas em Internet banking
Video espanhol mostrando atuação

Engenharia de Software

Engenharia de software na minha opinião não é a chave para software seguro, mas, é indispensável para qualidade do software.

O SWEBOK (Software Engineering Body of Knowledge) é um CBK (Corpo de conhecimento) sobre engenharia de software. o SWEBOK é um projeto do IEEE Computer Society e conta com apoio da Rational, Mitre, NIST, entre outros.



Excelente guia de referência para desenvolvimento de software.

Guide to the SWEBOK
Uma introdução ao SWEBOK
IEEE Computer Society

Quebrando Teclado Virtual de Internet Banking

Há muito tempo eu já tinha conhecimento desta técnica, mas, agora foi feito um video por profissionais espanhóis.

O vídeo mostra a atuação de um trojan que gera um video de tudo que é feito na tela do internet banking, isto torna os teclados virtuais inúteis.



O mais interessante é ver a mídia divulgar como novidade este tipo de ameaça:

Vírus "filma" digitação de senhas em Internet banking
Video espanhol mostrando atuação

Security Pendrive 2 (backup)

Como havia falado, eu já tinha meus dados criptografados, só precisava de uma "estratégia" de backup dos dados.

Primeiro vou explicar como ficou toda solução.

1 - Peguei meu mp3 player e criei três pastas:

• TrueCrypt - Onde instalei o truecrypt;
• Musica - Onde coloco as músicas que estou ouvindo;
• Dados - Diretório onde criei o diretório criptografado;
  
  

2 - Criptografei o volume dados usando o truecrypt.

Agora vamos aos scripts de backup. Eu usei dois scripts já prontos, só alterei o que eu precisava, em breve com mais tempo devo aperfeiçoar.

Um script é do Vinicius Canto (esse entende um pouquinho de scripts vbs) e o outro baixei da net "Tom's Cool Backup Script".

O script do Vinicius fica monitorando quando é "plugado" um dispositivo mass storage (pendrive) na maquina.

Plugado o pendrive, o script "PendriveMonitor.vbs" chama o script "backup.vbs". O "pendrivemonitor.vbs" fica rodando direto no micro, o "backup.vbs" será executado sempre que você plugar um pendrive.

O "backup.vbs" vai perguntar se você deseja fazer backup dos dados do pendrive, se optar por fazer ele irá copiar a pasta F:\dados para C:\backup. Feito o backup ele dá um alerta e pergunta se você deseja verificar o log.

Eu mantive todos os créditos nos dois scripts caso vocês queiram copiar pastas diferentes é só alterar no script.

Código do PendriveMonitor.vbs

'USB Storage Monitor<br />'<br />'Vinicius Canto<br />'MVP Visual Developer - Scripting<br />'<br />'Grupo PET Computagco - Universidade de Sco Paulo - Brasil<br /><br />'Disabling error messages...<br />On Error Resume Next<br /><br />'Main routine<br />strComputer = "."<br />Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")<br /><br />Set colMonitoredEvents = objWMIService.ExecNotificationQuery("SELECT * FROM __InstanceCreationEvent WITHIN 10 WHERE Targetinstance ISA 'Win32_PNPEntity' and TargetInstance.DeviceId like '%USBStor%'")<br />Do<br />Set objLatestEvent = colMonitoredEvents.NextEvent<br />BackupDados()<br />Loop<br /><br />Sub BackupDados()<br />Set WshShell = WScript.CreateObject( "WScript.Shell" )<br />WshShell.Run ("""backup.vbs""") 'Chama o Script de Backup<br />End Sub

Código do Backup.vbs

'==========================================================================<br />'Tom's Cool Backup Script revised 19 April 2002<br />'Written by Tom Hingston of http://cheqsoft.com<br />'<br />'This script copies all the files that are new or have changed,<br />'to the backup folder specified by BackupPath.<br />'It also logs the files copied from the last 5 backups to C:\Backuplog.txt<br />'<br />'INSTRUCTIONS<br />'You need to change settings in 2 places below... Setting 1 is where to<br />'backup to; Setting 2 is what to backup. There is optional Setting 3 which<br />'allows you to exclude some sub-folders from within the folders being backed up.<br />'<br />'All file/folder paths need to be inside speech marks "Like this"<br />'or otherwise the speech marks need to be empty ""<br />'<br />' Learn about VBScript at...<br />' http://msdn.microsoft.com/scripting/default.htm?/scripting/vbscript/<br />'==========================================================================<br /><br /><br />'==========================================================================<br />'SETTING 1 - WHERE TO BACKUP TO...<br />' Set BackupPath<br />' BackupPath is the Folder that you want to backup to....<br />' Example1: BackupPath = "H:\Backup"<br />' Example2: BackupPath = "\\Tom\C\Quality Documents"<br /><br />BackupPath = "c:\backup" ' <-- Set backup path here 'END OF SETTING 1 '========================================================================== If Wscript.Arguments.Count = 0 Then 'not initiated by dropping folder on it '========================================================================== 'SETTING 2 - FILES AND/OR FOLDERS TO BACKUP... ' 'These are the Files and/or Folders that you want to backup. Quantity = 10 '<-- This can be increased if MyData(?) increases. redim MyData(Quantity) ' These are the Folders that you want to backup... ' EXAMPLE: MyData(1) = "C:\Data" MyData(1) = "F:\dados" ' <-- Set these MyData(2) = "" MyData(3) = "" MyData(4) = "" MyData(5) = "" MyData(6) = "" MyData(7) = "" MyData(8) = "" MyData(9) = "" MyData(10) = "" 'END OF SETTING 2 '========================================================================== Else redim MyData(1) MyData(1) = Wscript.Arguments(0) 'was initiated by dropping folder on it Quantity = 1 End If '========================================================================== 'SETTING 3 - FOLDERS TO EXCLUDE... (optional) ' 'These are Sub-Folders within the folders being backed up, 'that you can Exclude from the backup. 'EXAMPLE: Excl_Data(1) = "C:\Data\Kids files" Excl_Quantity = 5 '<-- This can be increased if Excl_Data(?) increases. redim Excl_Data(Excl_Quantity) Excl_Data(1) = "" '<-- Set these if required Excl_Data(2) = "" Excl_Data(3) = "" Excl_Data(4) = "" Excl_Data(5) = "" 'END OF SETTING 3 '========================================================================== set fso = CreateObject("Scripting.FileSystemObject") strScript = WScript.ScriptFullName strScript = fso.GetFileName( strScript ) strScript = left( strScript, len(strScript) - 4 ) StartMe = msgbox("Benvindo ao Tom's Cool Backup script." & vbcrlf & vbcrlf & _ "O Backup do pendrive será feito no diretório: " &amp;amp;amp;amp;amp;amp;amp;amp;amp; BackupPath & " (" & strScript & ")" & vbcrlf & vbcrlf & _ "Deseja realizar o backup agora?" , 33, "Tom's Cool Backup Script " & " - " & strScript ) if StartMe = 2 then 'cancelled wscript.quit End if count = 0 MyDelay = 1 '(mS) that cause script delays to allow system to still be used (doevents) dim arrResults ' array to store results in redim arrResults(0) If right(BackupPath, 1) <> "\" then<br />BackupPath = BackupPath & "\" 'inserts the slash as it is required later<br />End If<br /><br />call CheckPath<br /><br />if not fso.folderExists ( BackupPath ) then<br />fso.CreateFolder( BackupPath )<br />end if<br /><br /><br />'sets drv for MakeFolderPath<br />If left(BackupPath , 1) = "\" then 'network<br />for ss = 1 to len(BackupPath )<br />strCh = mid(BackupPath , ss, 1)<br />if strCh = "\" then countslash = countslash + 1<br />if countslash = 3 then<br />drv = ss + 3<br />end if<br />next 'ss<br />if not countslash >= 3 then msgbox "Error in script relative to network path"<br />else 'local drive letter<br />drv = 5<br />End If<br /><br />For i = 1 to Quantity<br />If MyData(i) <> "" then<br /><br />if fso.DriveExists( MyData(i) ) Then 'it is a drive<br />call backup( MyData(i) )<br /><br />elseif fso.folderExists(MyData(i)) then 'it is a folder<br />call MakeFolderPath( BackupPath & right(MyData(i), len(MyData(i))-3 ) )<br />call backup( MyData(i) )<br /><br />elseif fso.fileExists(MyData(i)) then 'it is a file<br />call FileBackup( MyData(i) )<br /><br />else 'not a drive or folder or file<br />msgbox MyData(i) &amp;amp;amp;amp;amp;amp;amp;amp; vbcrlf & vbcrlf & "This file/folder does not appear to exist" & _<br />vbcrlf & "Please ensure you have typed it correctly or that" & vbcrlf & _<br />"you have not moved, renamed or deleted it.", 48, "File or Folder Error"<br />end if<br /><br />End If<br />Next 'i<br /><br />strlog = "----------------------" & vbnewline &amp;amp;amp;amp;amp;amp;amp;amp;amp;amp; "Backup on " & now() & vbnewline<br />strlog = strlog & join(arrResults, vbnewline) &amp;amp;amp;amp;amp;amp;amp;amp;amp;amp; vbnewline & "= " & count & " files copied to " &amp;amp;amp;amp;amp;amp;amp;amp;amp;amp; BackupPath & vbnewline & vbnewline<br />call logresults ( strlog )<br /><br />ViewLog = msgbox("Backup Realizado..." & vbnewline & "Total de arquivos copiados: " & count &_<br />vbnewline & "Deseja verificar o log do Backup (c:\backup\backuplog.txt)?", vbyesno + 32 + 256, "Tom's Cool Backup Script")<br />if ViewLog = 6 then 'yes<br />Set WshShell = WScript.CreateObject( "WScript.Shell" )<br />WshShell.Run ("""C:\backup\backupLog.txt""") 'open log file<br />end if<br /><br />Set WshShell = nothing<br />set fso = nothing<br />wscript.quit<br /><br />'-------------------------------------------------------<br />'Performes the actual copying if required<br />Sub Backup( mypath )<br /><br />if ExcludeF( mypath ) = False then<br />Set fldr = fso.GetFolder( myPath )<br />'Set fc = fldr.Files<br />For Each f in fldr.Files<br />DoEvents<br />If not fso.folderExists( BackupPath & right(myPath, len(myPath)-3 )) then<br />call MakeFolderPath( BackupPath & right(myPath, len(myPath)-3 ))<br />End if<br />If fso.DriveExists( mypath ) Then 'it is a drive<br />backfolder = BackupPath<br />else 'it is a folder<br />backfolder = BackupPath & right(fldr, len(fldr)-3 ) & "\"<br />end if<br /><br /><br />ext = right(Lcase(f.name), 3) '----------------------------<br />' FILE TYPES NOT TO BACK UP<br />'----------------------------<br />if ext <> "tmp" then<br /><br />backupfile = backfolder & f.name<br /><br />If fso.fileExists( backupfile ) then<br />if fso.GetFile(f).DateLastModified > fso.GetFile(backupfile).DateLastModified then<br />fso.CopyFile f, backfolder, true<br />count = count + 1<br />ReDim Preserve arrResults(count)<br />arrResults(count) = f<br />end if<br />Else 'does not yet exist in backup<br />fso.CopyFile f, backfolder, true<br />count = count + 1<br />ReDim Preserve arrResults(count)<br />arrResults(count) = f<br />End if<br />end if ' if ext.. that checked for filetype<br />DoEvents<br /><br />Next 'f1<br /><br />For Each Folder In fldr.SubFolders<br />Call Backup(Folder)<br />Next 'Folder<br /><br />End if 'ExcludeF( mypath ) = False<br />End Sub<br /><br />'-----------------------------------------------------------------<br />'performs the actual copying of Files if the path was a file - not folder<br />Sub FileBackup( myFile )<br /><br />set f = fso.GetFile( myFile )<br />backupfile = BackupPath & f.name<br /><br />If fso.fileExists( backupfile ) then 'already exists in backup<br />if fso.GetFile(f).DateLastModified > fso.GetFile(backupfile).DateLastModified then<br />fso.CopyFile f, BackupPath , true<br />count = count + 1<br />ReDim Preserve arrResults(count)<br />arrResults(count) = f<br />end if<br />Else 'does not yet exist in backup<br />fso.CopyFile f, BackupPath , true<br />count = count + 1<br />ReDim Preserve arrResults(count)<br />arrResults(count) = f<br />End if 'fso.fileExists( backupfile ) then<br /><br />End Sub<br /><br />'------------------------------------------------------------------<br />'if the folder does not yet exist in the backup path, make it.<br />Sub MakeFolderPath( myfolder )<br />For x = drv to len( myFolder )<br />MyChr = mid( myFolder , x, 1)<br />if mychr = "\" then<br />xfolder = left(myfolder, x-1)<br />if not fso.folderExists ( xFolder ) then<br />fso.CreateFolder( xFolder )<br />end if<br />end if<br />Next 'x<br />if not fso.folderExists ( myFolder ) then<br />fso.CreateFolder( myFolder )<br />end if<br />End sub<br /><br />'----------------------------------------------------------------<br />'function that writes results to the log.txt<br />Sub LogResults( myText )<br />myfile = "C:\backup\Backuplog.txt"<br /><br />Set fso = CreateObject("Scripting.FileSystemObject")<br />OutFile = "C:\#temp#.txt"<br />set textstream = fso.OpenTextFile(myFile,1,true)<br />Set OutStream=fso.CreateTextFile(OutFile,True)<br /><br />OutStream.WriteLine( mytext )<br /><br />Do until textstream.AtEndOfStream 'writes existing text to temp file<br />OneLine = textstream.ReadLine<br />OutStream.WriteLine(oneline)<br />if instr(Oneline, "----------") then 'finds start of each backup log<br />logcount = logcount + 1<br />if logcount >= 5 then<br />exit do<br />end if<br />end if<br />Loop<br /><br />textstream.close<br />OutStream.Close<br />fso.CopyFile OutFile, myfile, true<br />fso.DeleteFile OutFile<br />End Sub<br /><br />'----------------------------------------------------------------<br /><br />Function ExcludeF(qF)<br />'On error resume next<br />for q = 1 to Excl_Quantity<br />if right(Excl_Data(q), 1) = "\" then<br />Excl_Data(q) = left(Excl_Data(q), len(Excl_Data(q))-1) 'removes last end if<br /><br />If lcase(qF) = lcase(Excl_Data(q)) then<br />ExcludeF = True<br />Exit Function<br />End if<br />Next 'q<br /><br />ExcludeF = False<br />End Function<br /><br />'----------------------------------------------------------------<br /><br />Function Excludefolder(qFolder)<br />'On error resume next<br />for q = 1 to Excl_Quantity<br />if right(Excl_Data(q), 1) = "\" then<br />Excl_Data(q) = left(Excl_Data(q), len(Excl_Data(q))-1) 'removes last end if<br /><br />If lcase(qFolder) = lcase(Excl_Data(q)) then<br />Excludefolder = True<br />Exit Function<br />End if<br />Next 'q<br /><br />Excludefolder = False<br />End Function<br /><br />'-------------------------------------------------------------------<br /><br />Sub DoEvents<br />'To cause script delays to allow system to still be used (doevents)<br />On error resume next<br />wscript.sleep 1 'milliseconds<br />End Sub<br />'-------------------------------------------------------------------<br /><br />Sub CheckPath<br />'To ensure the backup path is not inside a folder being backed up<br /><br />for p = 1 to Quantity<br />if not MyData(p) = "" then<br />if lcase(left(BackupPath , len(MyData(p)))) = lcase(MyData(p)) then<br />msgbox "You cannot back up a folder to a folder inside it" & vbcrlf &_<br />"because it will also backup the backup etc." &amp;amp;amp;amp;amp;amp;amp;amp;amp; vbcrlf & vbcrlf &_<br />"Please use a different BackupPath." & vbcrlf & vbcrlf &_<br />"This backup has been cancelled.", 64, "Error in BackupPath "<br />wscript.quit<br />end if 'left(BackupPath , len(MyData(p))) = MyData(p)<br />end if ' not MyData(p) = ""<br />next 'p<br /><br />End Sub<br /><br />'-------------------------------------------------------------------<br />'DISCLAIMER<br />'The Software Product is provided "as is"; I make no warranty,<br />'whether express or implied, of the merchantability of<br />'the Software Product or its fitness for any particular purpose.<br /><br />'In no circumstances will I be liable for any damage,<br />'loss of profits, loss of data, goodwill or for any indirect or<br />'consequential loss arising out of your use of the Software Product,<br />'or inability to use the Software Product, even if I<br />'have been advised of the possibility of such loss.<br /><br />'Use of our software implies your acceptance of this disclaimer.<br />'

Salve no mesmo diretório do outro script como Backup.vbs.

Crie um atalho para o PendriveMonitor no iniciar da maquina, assim ele será executado sempre que a maquina for reiniciada.

Qualquer dúvida poste um comentário.

Blog do Vinicius Canto

Sony PSP TIFF Image Viewing Code Execution Vulnerability

Em um post recente eu havia falado que não falaria de PSP (Playstation Portátil) em um blog de segurança. Mas, a secunia acaba de divulgar uma brecha no PSP que possibilita que o invasor tenha acesso ao PSP.



Quem nunca jogou aquela partidinha de Winning Eleven que feche os olhos, mas, também alerto que hoje os playstations não são mais usados só para jogar.

Brecha de segurança no console portátil da Sony permite que crackers
formatem arquivos maliciosos e tomem controle do equipamento

Alerta da secunia

Security Pendrive 2 (backup)

Como havia falado, eu já tinha meus dados criptografados, só precisava de uma "estratégia" de backup dos dados.

Primeiro vou explicar como ficou toda solução.

1 - Peguei meu mp3 player e criei três pastas:

• TrueCrypt - Onde instalei o truecrypt;


• Musica - Onde coloco as músicas que estou ouvindo;


• Dados - Diretório onde criei o diretório criptografado;

2 - Criptografei o volume dados usando o truecrypt.

Agora vamos aos scripts de backup. Eu usei dois scripts já prontos, só alterei o que eu precisava, em breve com mais tempo devo aperfeiçoar.

Um script é do Vinicius Canto (esse entende um pouquinho de scripts vbs) e o outro baixei da net "Tom's Cool Backup Script".

O script do Vinicius fica monitorando quando é "plugado" um dispositivo mass storage (pendrive) na maquina.

Plugado o pendrive, o script "PendriveMonitor.vbs" chama o script "backup.vbs". O "pendrivemonitor.vbs" fica rodando direto no micro, o "backup.vbs" será executado sempre que você plugar um pendrive.

O "backup.vbs" vai perguntar se você deseja fazer backup dos dados do pendrive, se optar por fazer ele irá copiar a pasta F:\dados para C:\backup. Feito o backup ele dá um alerta e pergunta se você deseja verificar o log.







Eu mantive todos os créditos nos dois scripts caso vocês queiram copiar pastas diferentes é só alterar no script.

Código do PendriveMonitor.vbs

'USB Storage Monitor<br> '<br> 'Vinicius Canto<br> 'MVP Visual Developer - Scripting<br> '<br> 'Grupo PET Computagco - Universidade de Sco Paulo - Brasil</p> <p>'Disabling error messages...<br> On Error Resume Next</p> <p>'Main routine<br> strComputer = "."<br> Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")</p> <p>Set colMonitoredEvents = objWMIService.ExecNotificationQuery("SELECT * FROM __InstanceCreationEvent WITHIN 10 WHERE Targetinstance ISA 'Win32_PNPEntity' and TargetInstance.DeviceId like '%USBStor%'")<br> Do<br> Set objLatestEvent = colMonitoredEvents.NextEvent<br> BackupDados()<br> Loop</p> <p>Sub BackupDados()<br> Set WshShell = WScript.CreateObject( "WScript.Shell" )<br> WshShell.Run ("""backup.vbs""") 'Chama o Script de Backup<br> End Sub

Sony PSP TIFF Image Viewing Code Execution Vulnerability

Em um post recente eu havia falado que não falaria de PSP (Playstation Portátil) em um blog de segurança. Mas, a secunia acaba de divulgar uma brecha no PSP que possibilita que o invasor tenha acesso ao PSP.



Quem nunca jogou aquela partidinha de Winning Eleven que feche os olhos, mas, também alerto que hoje os playstations não são mais usados só para jogar.

Brecha de segurança no console portátil da Sony permite que crackers
formatem arquivos maliciosos e tomem controle do equipamentoAlerta da secunia

Security Pendrive

Eu hoje não consigo mais viver sem meu pendrive, sempre que não estou com ele eu preciso. Por outro lado comecei a ficar preocupado com o volume e conteúdo das informações que eu estava armazenando nele.

Decidi então criptpgrafar os dados e utilizar ainda mais o recursos do pendrive. Criptografei um volume de dados e comecei a utilizar o Firefox e Thunderbird portable.





Com o firefox e thunderbird no pendrive eu posso usar também uma agenda sincronizada usando um plugin do firefox.

Ou seja, agora mantenho meus e-mails e minhas configurações de browser no meu pendrive. Além de ser uma "camada" a mais de proteção contra códigos maliciosos que exploram o browser.



Para ficar mais prático eu instalei o próprio TrueCrypt no pendrive, assim não preciso ter o mesmo instalado em toda maquina que eu for utilizar. Mas, mesmo com o TrueCripty no próprio pendrive, ele precisa formatar o volume ou quebrar a senha para ter acesso aos dados.

Agora vou desenvolver um script para "automatizar" o back-up. Assim pelo menos em casa e no escritório tenho sempre um back-up atualizado.

Aplicações para rodar no pendrive
TrueCrypt

Security Pendrive

Eu hoje não consigo mais viver sem meu pendrive, sempre que não estou com ele eu preciso. Por outro lado comecei a ficar preocupado com o volume e conteúdo das informações que eu estava armazenando nele.

Decidi então criptpgrafar os dados e utilizar ainda mais o recursos do pendrive. Criptografei um volume de dados e comecei a utilizar o Firefox e Thunderbird portable.





Com o firefox e thunderbird no pendrive eu posso usar também uma agenda sincronizada usando um plugin do firefox.

Ou seja, agora mantenho meus e-mails e minhas configurações de browser no meu pendrive. Além de ser uma "camada" a mais de proteção contra códigos maliciosos que exploram o browser.



Para ficar mais prático eu instalei o próprio TrueCrypt no pendrive, assim não preciso ter o mesmo instalado em toda maquina que eu for utilizar. Mas, mesmo com o TrueCrypt no próprio pendrive, ele precisa formatar o volume ou quebrar a senha para ter acesso aos dados.

Agora vou desenvolver um script para "automatizar" o back-up. Assim pelo menos em casa e no escritório tenho sempre um back-up atualizado.

Aplicações para rodar no pendrive
TrueCrypt