磁盘暴力填充器 安全销毁磁盘数据

无踪的风

1. <#*,:&cls
   
2. [url=home.php?mod=space&uid=11189]@echo[/url] off
   
3. cd /d "%~dp0"
   
4. set "batchfile=%~f0"
   
5. powershell -C "Set-Location -LiteralPath ([Environment]::CurrentDirectory);. ([ScriptBlock]::Create([IO.File]::ReadAllText($env:batchfile,[Text.Encoding]::GetEncoding(0) )) )"
   
6. pause
   
7. exit /b
   
8. #>
   
9. 
   
10. # 文件大小
    
11. $fillSize = 5gb
    
12. # 目标磁盘
    
13. $drvLetter = "c:"
    
14. # 数据类型：1=以随机填充，2=指定填充字节
    
15. $fillType = 1
    
16. # 指定字节
    
17. [byte]$fillByte = 0x88
    
18. # 循环次数
    
19. $fillCount = 300
    
20. 
    
21. $drvInfo = New-Object System.IO.DriveInfo -ArgumentList $drvLetter
    
22. $drvInfo
    
23. if (-not $drvInfo.IsReady) {
    
24.   Write-Error '该磁盘未就绪'
    
25.   return
    
26. }
    
27. 
    
28. $buff = New-Object 'byte[]' -ArgumentList 1mb
    
29. 
    
30. if ($fillType -eq 1) {
    
31.   $rnd = New-Object Random
    
32.   $rnd.NextBytes($buff)
    
33. }elseif ($fillType -eq 2) {
    
34.   for ($i = 0; $i -lt $buff.Count; $i++) {
    
35.     $buff[$i] = $fillByte
    
36.   }
    
37. }
    
38. 
    
39. $listFills = New-Object 'System.Collections.Generic.List[string]'
    
40. for ($i = 1; $i -lt $fillCount+1; $i++) {
    
41.   $listFills.Clear()
    
42.   try {
    
43.     "第 ${i} 次填充"
    
44.     while ($drvInfo.AvailableFreeSpace -gt $fillSize) {
    
45.       $outName = [Guid]::NewGuid().ToString()
    
46.       $outFile = [IO.Path]::Combine($drvInfo.RootDirectory.FullName, $outName)
    
47.       $listFills.Add($outFile)
    
48.         try {
    
49.           $stream = New-Object System.IO.FileStream -ArgumentList ($outFile, 'Create', 'Write', 'Read', 1mb)
    
50.           $ctr = 0
    
51.           do {
    
52.             $stream.Write($buff, 0, $buff.Count)
    
53.             $ctr += $buff.Count
    
54.           } until ($ctr -ge $fillSize)
    
55.           $stream.SetLength($fillSize)
    
56.         } finally {
    
57.           if ($stream) {
    
58.             $stream.Close()
    
59.             $stream = $null
    
60.           }
    
61.         }
    
62.     }
    
63.   } finally {}
    
64.   "正在删除文件"
    
65.   Remove-Item -LiteralPath $listFills -Force
    
66.   trap {}
    
67. }

复制代码

此代码只写不读，填满自动删除。如果中断需要手动删除残留文件，它是不会自动删除的。
工作原理：固态硬盘有PE次数，一旦被消耗完硬盘将变得不可靠。


使用方法：把代码另存为bat文件即可，测试内容自己修改后运行。