FileSplitter: Probleme mit großen Dateien

[MrKnogge]

Abend Luckie,

ich habe gerade eine 7GB große Testdatei erstellt und erhalte folgendes Phänomen:

Ich wähle die Dateigröße 2000 MB und im Editfeld darunter erscheint "4", wenn ich aber 2500 MB einstelle möchte dein tool die Datei in 4294967293 Teile teilen. Und dies tritt ab 2048 MB auf.

[Luckie]

Das sieht ganz nach einem Integer Überlauf aus. Aber wo? Das kann ja eigentlich nur hier passieren:

Delphi-Quellcode:

function CalcCntParts(const Filename: string; Size: Int64): Cardinal;
var
  FileSize          : Int64; // >4GB
begin
  result := 0;
  if Size > 0 then
  begin
    FileSize := GetFileSize(PChar(Filename));
    if (FileSize > 0) and (FileSize div Size < High(Integer)) then
      result := (FileSize - 1) div Integer(Size) + 1;
  end;
end;

[MrKnogge]

Zitat von Luckie:

Das sieht ganz nach einem Integer Überlauf aus. Aber wo? Das kann ja eigentlich nur hier passieren:

Delphi-Quellcode:

High(Integer))
// und
Integer(Size)

?

[Luckie]

Ich habe es jetzt mal so geändert:

Delphi-Quellcode:

function CalcCntParts(const Filename: string; Size: Int64): Cardinal;
var
  FileSize          : Int64; // >4GB
begin
  result := 0;
  if Size > 0 then
  begin
    FileSize := GetFileSize(PChar(Filename));
    if (FileSize > 0) and (FileSize div Size < High(Int64)) then
      result := (FileSize - 1) div Int64(Size) + 1;
  end;
end;

Neue Exe im Anhang.

[omata]

Size ist doch schon int64, wieso noch ein Typecast

[MrKnogge]

Nun zeigt er bei 2500 MB schon mal 3 Teile an, teilt die Datei aber in lauter 1024 KB große Dateien

[StInkeSchuh]

Guten Abend ebenfalls,

Ich habe sehr viel freien Festplattenspeicher (wer braucht schon 500 GB um seine Files zu verwalten...) und hab ein ca 4,5 GB großes CD-Image mithilfe eines Editors (der aufgrund der Dateigröße selbst geschrieben wurde... ) vervierfacht (copy & paste), sodass am ende eine 18 GB große Testdatei da war.

Die hab ich nun versucht zu splitten (mit der neuen Version).

Die Teile berechnet er nun richtig, aber am Ende Kommen nur 1 Mega-Files heraus. (Aua, das gibt eine Beule im Papierkorb )

Ich weiß, ihr findet mit 18 GB übertreib ich es ein wenig, war aber so

mfg St!nkeSchuh

EDIT: Hab deine neue Version nicht berücksichtigt

[MrKnogge]

@StInkeSchuh
Wie groß hast du die Teile festgelegt, Probleme treten wohl nur bei größer als 2047MB auf.

[StInkeSchuh]

@MrKnogge:

Die Teile waren einmal 9 GB, dann 4,5 und zum Schluss 2 GB. Hat aber gefunzt, bis ich im Exploder (= heisst bei mir Explorer) 18.000 einen Megabyte große Dateien gefunden habe.

Also die Berechnung ist korrekt, die Umsetzung leider noch nicht.

[Luckie]

Mist. Dann muss ich noch mal weitersuchen.