AutoIt bricht ohne ersichtlichen Grund beim Kopiern von Datein ab (FileCopy)

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Man kopiert größere Mengen von Datein mit Autoit z.B. in eine RAM Disk. Mal gehen 20.0000 Datein dann wieder nur 7.500. Die Ram Disk hat mehr als ausreichend Platz (1GB die Dateien bringen es nur auf 400-500 MB) Die Größe der Einzeldateien ist jeweils identisch. Ich habe ehrlich gesagt einige Stündchen gesucht - bis ich auf die Lösung kam. Der Satz Dateinen (7.500 Stücj) hatte den gleichen Inhalt aber wesentlich längere Dateinamen, jedoch alles < 220 für den ganzen Pfad). Trotzdem, die langen Namen sind das Problem. Mit langen Namen passen nur 7.500 Dateien in ein Verzeichnis auf der RAM Disk. Schuld ist also die RAM Disk, nicht Autoit. Wenn man die Datein auf mehrere Verzeichnisse verteilt ( je ca. 7000) funktioniert das ganze.

Peter

Ps.: Wenn sich jemand wundert weshalb ich mir die Frage gleich selbst beantworte - so lässt sich die Problemlösung für andere "sichern" ?

**chip**

Nutz dazu lieber robocopy.

**Bitnugger**

Bei sehr langen Pfaden gehe ich gerne hin und verkürze diese... via HARDLINK, SUBST ODER PUSHD/POPD... das macht nebenher auch noch die Ausgaben übersichtlicher...

Z. B. so...

AutoIt

Local $iNTFSLink = FileCreateNTFSLink('f:\Audio\MP3\International\S\Scorpions Discography\2000 - Scorpions - Moment Of Glory (With Berliner Philharmoniker)', 'f:\Scorpions', $FC_NOOVERWRITE)
If FileCopy($iNTFSLink & '\*.*', 'e:\AUDIO\Scorpions', $FC_NOOVERWRITE + $FC_CREATEPATH) = 0 Then Exit ConsoleWrite('Ops, Fehler beim Kopieren...' & @CRLF & '--> ' & $iNTFSLink & @CRLF) +1

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Danke für die Tips,
ich hatte vielleicht vergessen, zu erwähnen, dass ich die langen Dateinamen selbst produziere, da ich sie als "Vehikel" benutze um Daten zwischen zwei Programmen zu "transportieren". Da stehen vollständige Adressen, usw darin, werden im nächsten Programm ausgelesen und auf ein vernünftiges Maß eingekürzt, Aber auf dem Weg dorthin landen die, weil signifikant schneller, in einer RAM Disk.

Übrigens macht autoit das wirklich anständig. Auf einer NTFS Platte problemlos einige 10.0000 Dateien... (Mehr habe ich noch nicht probiert bzw. fallen nicht an)

Übrigens scheint es die gleichen Beschränkungen nicht nur in einer RAM Disk zu geben, sondern auch auf dem einen oder anderen FAT 32 formatierten USb Stick.

Gruß

Peter

**Bitnugger**

Zitat von Peter S. Taler

Daten zwischen zwei Programmen zu "transportieren"

Dann schau mal, ob dir das nicht besser gefällt... musst du natürlich noch an deine Bedürfnisse anpassen. Eine weitere Alternative wäre via TCP/UDP zu kommunizieren...

Welche RAMDISK benutzt du denn? Habe schon einige getestet, die hatten aber alle unverzeihliche Macken. Benutze nun seit längerem "ImDisk Toolkit" und bin sehr zufrieden damit, zumal du damit auch 'dynamische' RAMDISKs erstellen kannst.

FAT32
----------------------------------------------------------
Maximum disk size: 2 terabytes
Maximum file size: 4 gigabytes
Maximum number of files on disk: 268,435,437
Maximum number of files in a single folder: 65,534

NTFS ("New Technology File System")
----------------------------------------------------------
Maximum disk size: 256 terabytes
Maximum file size: 256 terabytes
Maximum number of files on disk: 4,294,967,295
Maximum number of files in a single folder: 4,294,967,295

Der Explorer und viele andere Programme, die sich am Explorer orientieren, machen allerdings schon weit vorher schlapp.

CopyDataRcv - der Empfänger

AutoIt

;-- TIME_STAMP   2016-10-09 08:06:57


#include <Array.au3>


; Windows Definitions
Global Const $StructDef_COPYDATA = "ptr;dword;ptr"
Global Const $WM_COPYDATA = 0x4A
Global Const $WM_CLOSE = 0x10
; The costum Struct (Must be the same in Sender and Recivcer)
Global Const $STRUCTDEF_AU3MESSAGE = "char[256];int"


; Create Reciver window
$hwmd_Reciver = GUICreate("CopyDataRcv")
; Register Windows Messages
GUIRegisterMsg($WM_COPYDATA, "_GUIRegisterMsgProc")
GUIRegisterMsg($WM_CLOSE, "_GUIRegisterMsgProc")
; Message Handler
Func _GUIRegisterMsgProc($hWnd, $MsgID, $WParam, $LParam)
	If $MsgID = $WM_COPYDATA Then
		; We Recived a WM_COPYDATA Message
		; $LParam = Poiter to a COPYDATA Struct
		$vs_cds = DllStructCreate($StructDef_COPYDATA, $LParam)
		; Member No. 3 of COPYDATA Struct (PVOID lpData;) = Pointer to Costum Struct
		$vs_msg = DllStructCreate($STRUCTDEF_AU3MESSAGE, DllStructGetData($vs_cds, 3))
		Local $sMessage = DllStructGetData($vs_msg, 1)
		; Display what we have recived
		ConsoleWrite('$sMessage = ' & $sMessage & @CRLF)
		Local $aMessage = StringSplit($sMessage, '||', $STR_ENTIRESPLIT)
		;_ArrayDisplay($aMessage, '$aMessage')
		Local $asMessage = _ArrayToString($aMessage, '! ' & @CRLF)
		ConsoleWrite($asMessage & @CRLF)
		; Array|2|3|2||12345||Something|for|us|to|shout|about!
		Local $sType = StringMid($sMessage, 1, StringInStr($sMessage, '|', 0, 1) - 1)
		ConsoleWrite('$sType    = ' & $sType & @CRLF)
		Local $sType = StringMid($sMessage, 1, StringInStr($sMessage, '|', 0, 2))
		ConsoleWrite('$sType    = ' & $sType & @CRLF)
		;MsgBox(0, "Test String", DllStructGetData($vs_msg, 1))
		;MsgBox(0, "Test Integer", DllStructGetData($vs_msg, 2))
	ElseIf $MsgID = $WM_CLOSE Then
		; We Recived a WM_CLOSE Message
		Exit
	EndIf
EndFunc   ;==>_GUIRegisterMsgProc
; Keep it Runnig ...
While 1
	Sleep(250)
WEnd

Alles anzeigen

SendMessage - der Sender

AutoIt

;-- TIME_STAMP   2016-10-09 08:06:15


#include <misc.au3>
#include <SendMessage.au3>
#include <_UBound.au3>
#include <Array.au3>


; Windows Definitions
Global Const $StructDef_COPYDATA = "dword var1;dword var2;ptr var3" ;I have changed piccaso's structure
Global Const $WM_COPYDATA = 0x4A


Global $aTextToSend = [['Something', 'for'], ['us', 'to'], ['shout', 'about!']]
$sUB = _UBound($aTextToSend, 2)
$aUB = _UBound($aTextToSend, 1)
;_ArrayDisplay($aUB, '$aUB')


; Type of Var
Local $sTextToSendArray2String = VarGetType($aTextToSend) & '||'
; UBoundInfo
For $i = 0 To $aUB[1] - 1 Step 1
	$sTextToSendArray2String &= $aUB[$i] & '|'
Next
$sTextToSendArray2String &= '|'
; Passwort
Local $sPasswort = '12345' & '||'
$sTextToSendArray2String &= $sPasswort
; Daten
For $i = 0 To $aUB[1] - 1 Step 1
	If $aUB[2] > 1 Then
		For $j = 0 To $aUB[2] - 1 Step 1
			;ConsoleWrite(StringFormat('$i:%s $j:%s', $i, $j) & @CRLF)
			$sTextToSendArray2String &= $aTextToSend[$i][$j] & '|'
		Next
	Else
		$sTextToSendArray2String &= $aTextToSend[$i] & '|'
	EndIf
Next
$sTextToSendArray2String = StringTrimRight($sTextToSendArray2String, 1)
ConsoleWrite($sTextToSendArray2String & @CRLF)
Local $aMessage = StringSplit($sTextToSendArray2String, '||', $STR_ENTIRESPLIT)
;_ArrayDisplay($aMessage, '$aMessage')
;Exit
$TextToSend = $sTextToSendArray2String
;$TextToSend = "Something for us to shout about!"
$CDString = DllStructCreate("char var1[256]") ;the array to hold the string we are sending


DllStructSetData($CDString, 1, $TextToSend)
$pCDString = DllStructGetPtr($CDString) ;the pointer to the string


$vs_cds = DllStructCreate($StructDef_COPYDATA) ;create the message struct
DllStructSetData($vs_cds, "var1", 0) ;0 here indicates to the receiving program that we are sending a string
DllStructSetData($vs_cds, "var2", StringLen($TextToSend) + 1) ;tell the receiver the length of the string
DllStructSetData($vs_cds, "var3", $pCDString) ;the pointer to the string
$pStruct = DllStructGetPtr($vs_cds)
_SendMessage(WinGetHandle("CopyDataRcv"), $WM_COPYDATA, 0, $pStruct)


;MsgBox(0,'Done','String sent')
ConsoleWrite('Done, String sent' & @CRLF)


$vs_cds = 0 ;free the struct
$CDString = 0 ;free the struct

Alles anzeigen

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Hmmm ich trau mir das gar nicht sagen. Ich benutze das Teil schon seit 13 Jahren. Auf mehreren dutzenden verschiedenen Rechnern. Ich glaube die war mal von MS.Zumindest legt ein Hinweis in der install.inf das Nahe Copyright by MS. Läuft als NTFS oder Fat32. Ich kann mich nicht errinern, das die jemals Zicken gemacht hätte. ISt aber klassisch. Wenn Strom weg - Daten weg. Es gibt ja auch welche die den Inhalt "Chachen". Aber ich wollte tatsächlich so ein "altmodisches Teil" Strom weg Daten weg. Größe ist anpassbar von wenigen K bis über GB. Habe das aber nie wirklich probiert. Bis vor kurzem immer mit so 350 MB. Nun habe ich z.Z. 1GB funktioniert auch reibungslos. Nur nach Größenumstellung --> ist ein Reboot. ist erforderlich. Ich geh davon aus dass das mal Freeware war. Man brauchte nie einen Schlüssel, Beschränkungen in Form von Copyright bei der Installation gibt es auch nicht.

Für manche read /write Operationen ist eine RAM Disk Gold wert. Ich habe einige Scripte am laufen mit relativ großen Mengen kleiner Files, aufmachen, reinschauen, Daten entnehmen, pdf verwandeln, mergen usw. Das geht in dem Teil 50 x Schneller als sonst. Kopieren der Dateien eingerechnet.

Gruß Peter.

Ps.: Wenn Du interesse hast kann ich Dir die gerne mal packen. Ich habe aber keine Ahnung was bei BS > xp passiert. Ich bin unverbesserlicher xpler.

**Bitnugger**

Danke, ist lieb gemeint, aber XP ist für mich schon lange keine Option mehr und auch wenn die MS-RAMDISK auf Win 10 laufen sollte, wäre sie für mich uninteressant, weil sie nicht dynamisch* ist und es davon auch höchstwahrscheinlich keine 64-Bit-Version gibt, die eine max. Größe > 3,5 GB erlaubt.

Meiner RAMDISK benutze ich als temporäres Verzeichnis für den Browser-Cache (Firefox), zum Archive ent-/packen, Musik/Videos transkodieren, und für diverse Laufzeitdaten für Scripte, z. B. Playlisten.

* die RAMDISK belegt immer nur so viel RAM, wie sie an Inhalt hat... und wächst mit dem Inhalt dynamisch an.

Peter S. Taler · *Ab 19-10-22 ergänzt um:*

Ja mache ich ähnlich. Jeder Krempel, der abends nicht mehr interesiert. Man gewöhnt sich auch schnell daran, und ist ganz verblüfft wenn auf einem Rechner keine RAM Disk ist. Und manches geht in der RAM Disk so schnell - dass man ganz "fertig" ist wenn es auf einer "normalen" Disk laufen muss.

Gruß

Peter.