Simpler Dateiblocker

    • VB.NET

    Es gibt 6 Antworten in diesem Thema. Der letzte Beitrag () ist von ErfinderDesRades.

      Simpler Dateiblocker

      Hallo,

      habe einen Dateiblocker erweitert mit dem man ganz einfach Dateien unöffbar machen kann.
      Grundidee: Das erste Byte der Datei zu manipulieren.

      Getestet mit pdf, jpg, mp4, exe, rar
      Funktioniert nicht mit mp3 (wahrsch. muss man einfach mehrere Bytes manipulieren) und auch nicht mit txt (weils halt ne txt ist).

      Vorteil: Man kann blitzschnell Dateien für Laien "verschlüsseln". Da immer nur das 1. Byte verändert wird, dauert es bei einer 500mb-Datei genauso lange wie bei einer 5kb-Datei.

      Man braucht 2 Buttons und ein Label:

      VB.NET-Quellcode

      1. Imports System.IO
      3. Public Class Form1
      5. Private Function GetFilename() As String
      6. Dim ofd As New OpenFileDialog
      7. Dim Filename As String
      9. With ofd
      10. .Title = "Open File"
      11. .RestoreDirectory = True
      12. .Filter = "All files|*.*"
      13. If .ShowDialog() = DialogResult.OK Then
      14. Filename = .FileName
      15. Return Filename
      16. Else
      17. Filename = String.Empty
      18. Return Filename
      19. End If
      20. End With
      21. End Function
      25. Private Sub BlockFile(ByVal Filename As String, Encrypt As Boolean)
      27. If File.Exists(Filename) Then
      28. Dim fs As New FileStream(Filename, FileMode.Open)
      29. Dim br As New BinaryReader(fs)
      30. Dim Content As Byte = br.ReadByte
      33. If Encrypt = True Then
      34. If Content = 255 Then Content = 0 Else Content += 1
      35. Else
      36. If Content = 0 Then Content = 255 Else Content -= 1
      37. End If
      39. br.Close()
      40. Dim bw As New BinaryWriter(New FileStream(Filename, FileMode.OpenOrCreate))
      41. bw.Write(Content)
      42. bw.Close()
      44. End If
      46. End Sub
      48. Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
      49. 'Original wird unbrauchbar gemacht
      50. Dim Filename As String = GetFilename()
      52. If (Not Filename Is String.Empty) Then
      53. BlockFile(Filename, True)
      54. Label1.Text = "blocked"
      55. End If
      56. End Sub
      59. Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
      60. 'Unbrauchbare Datei wieder in den Originalzustand versetzen
      61. Dim Filename As String = GetFilename()
      63. If (Not Filename Is String.Empty) Then
      64. BlockFile(Filename, False)
      65. Label1.Text = "unblocked"
      66. End If
      67. End Sub
      68. End Class



      Quelle: visual-basic5.de/vbclassic/dotnet/magicheader.htm
      Für ein Mindestmaß an Rechtschreibung, Interpunktion und Majuskeln!

      bla schrieb:

      Man kann blitzschnell Dateien für Laien "verschlüsseln".
      Das halte ich nicht für sehr sinnvoll.
      Was, wwenn zwischendurch das System crasht?
      Was passiert, wenn jemand so eine Datei vorfindet? Im schlimmsten Fall löscht er sie und futsch sind die Daten.
      Das kann "Laien" und auch Profis passieren.
      Sicherer ist es, einfach den PC zu sperren, wenn keiner ran soll.
      Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
      Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
      Ein guter .NET-Snippetkonverter (der ist verfügbar).
      Programmierfragen über PN / Konversation werden ignoriert!

      a) ist das crap
      b) wird das bei mp3 nie was. Da kannst du auch sonst noch 500 bytes abändern. Nur die Datei KANN beschädigt werden jedoch noch immer hörbar. MP3 basiert auf Frames. Ist eines beschädigt (nur im Header relevant) wird einfach das nächste gesucht. Erstmal nachdenken und dann programmieren.


      Opensource Audio-Bibliothek auf github: KLICK, im Showroom oder auf NuGet.

      Mod-Comment by ErfinderDesRades:
      Ich finde, die Sinnhaftigkeit des Vorgehens ist nun genügend in Frage gestellt worden. Festzuhalten bleibt der Trick, dass manche DateiFormate durch Veränderung nur eines Bytes unbrauchbar gemacht werden können, und das ist auch reversibel.

    Facebook
    Telefonspende