------------------------------------------------------------ [BUG/PRB.] VFP 9.0 FIX - COPY FILE COMMAND January 2024 ------------------------------------------------------------ CCB 1. BUG: In vfp9 (and vfp6, vfp7, vfp8), the COPY FILE command always creates the destination file with a lower case file name. In Windows operating system, we can use the file names with case insensitive, for example, the file name ABC.TXT is the same as the file name abc.txt. In other operating systems such as Unix and Linux, we use the file names with case sensitive, for example, the file name ABC.TXT is not the same as the file name abc.txt, they are two different file names. The bug was reported by Walther Neuhardt. 2. CAUSE: There are some BUGs in the following code. 3. RESOLUTION: We can write some code to fix the BUG. Fun6d6e05 :: ; proc near push ebp ;0x006d6e05 : 55 lea ebp , dword ptr [ esp + 0FFFFF8ACh ] ;0x006d6e06 : 8dac24acf8ffff sub esp , 07DCh ;0x006d6e0d : 81ecdc070000 mov eax , dword ptr [ Data937090 ] ;0x006d6e13 : a190709300 push ebx ;0x006d6e18 : 53 push esi ;0x006d6e19 : 56 push edi ;0x006d6e1a : 57 mov dword ptr [ ebp + 0750h ] , eax ;0x006d6e1b : 898550070000 xor eax , eax ;0x006d6e21 : 33c0 xor edx , edx ;0x006d6e23 : 33d2 inc dword ptr [ Data9393ac ] ;0x006d6e25 : ff05ac939300 mov ecx , 090h ;0x006d6e2b : b990000000 lea edi , dword ptr [ ebp + 0404h ] ;0x006d6e30 : 8dbd04040000 rep stosd ;0x006d6e36 : f3ab lea eax , dword ptr [ ebp + 02FCh ] ;0x006d6e38 : 8d85fc020000 push eax ;0x006d6e3e : 50 mov edi , offset Data93a8c0 ;0x006d6e3f : bfc0a89300 mov ebx , offset Data91aed0 ;0x006d6e44 : bbd0ae9100 mov dword ptr [ ebp - 36 ] , edx ;0x006d6e49 : 8955dc mov dword ptr [ ebp - 32 ] , edx ;0x006d6e4c : 8955e0 mov byte ptr [ ebp + 02FCh ] , dl ;0x006d6e4f : 8895fc020000 call Fun52a205 ;0x006d6e55 : e8ab33e5ff inc dword ptr [ Data9393ac ] ;0x006d6e5a : ff05ac939300 lea eax , dword ptr [ ebp + 01F4h ] ;0x006d6e60 : 8d85f4010000 push eax ;0x006d6e66 : 50 xor edi , edi ;0x006d6e67 : 33ff mov byte ptr [ ebp + 01F4h ] , 00h ;0x006d6e69 : c685f401000000 call Fun52a205 ;0x006d6e70 : e89033e5ff ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; ; mov dword ptr vfpa_copyfile_nottolower,01h xor ebx , ebx ;0x006d6e75 : 33db push ebx ;0x006d6e77 : 53 mov edi , 0105h ;0x006d6e78 : bf05010000 push edi ;0x006d6e7d : 57 lea edx , dword ptr [ ebp + 0404h ] ;0x006d6e7e : 8d9504040000 lea ecx , dword ptr [ ebp + 02FCh ] ;0x006d6e84 : 8d8dfc020000 call Fun43d389 ;0x006d6e8a : e8fa64d6ff ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; Label6d6e8e :: ; mov dword ptr vfpa_copyfile_nottolower,00h Label6d6e8f :: push ebx ;0x006d6e8f : 53 lea eax , dword ptr [ ebp + 0404h ] ;0x006d6e90 : 8d8504040000 push eax ;0x006d6e96 : 50 call Fun4156a2 ;0x006d6e97 : e806e8d3ff test eax , eax ;0x006d6e9c : 85c0 je Label6d6ecb ;0x006d6e9e : 742b pushd offset Data928494 ;0x006d6ea0 : 6894849200 push edi ;0x006d6ea5 : 57 lea esi , dword ptr [ ebp + 0404h ] ;0x006d6ea6 : 8db504040000 call Fun5557a3 ;0x006d6eac : e8f2e8e7ff push ebx ;0x006d6eb1 : 53 push ebx ;0x006d6eb2 : 53 push ebx ;0x006d6eb3 : 53 push edi ;0x006d6eb4 : 57 mov eax , esi ;0x006d6eb5 : 8bc6 push eax ;0x006d6eb7 : 50 call Fun437e2a ;0x006d6eb8 : e86d0fd6ff push eax ;0x006d6ebd : 50 mov edx , esi ;0x006d6ebe : 8bd6 lea ecx , dword ptr [ ebp + 02FCh ] ;0x006d6ec0 : 8d8dfc020000 call Fun42cc34 ;0x006d6ec6 : e8695dd5ff Label6d6ecb :: lea eax , dword ptr [ ebp + 02FCh ] ;0x006d6ecb : 8d85fc020000 push eax ;0x006d6ed1 : 50 lea eax , dword ptr [ ebp - 52 ] ;0x006d6ed2 : 8d45cc push eax ;0x006d6ed5 : 50 call Fun434bcf ;0x006d6ed6 : e8f4dcd5ff ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; ; mov dword ptr vfpa_copyfile_nottolower,01h push ebx ;0x006d6edb : 53 push edi ;0x006d6edc : 57 lea edx , dword ptr [ ebp + 0644h ] ;0x006d6edd : 8d9544060000 lea ecx , dword ptr [ ebp + 01F4h ] ;0x006d6ee3 : 8d8df4010000 call Fun43d389 ;0x006d6ee9 : e89b64d6ff ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; Label6d6eed :: ; mov dword ptr vfpa_copyfile_nottolower,00h Label6d6eee :: push ebx ;0x006d6eee : 53 lea eax , dword ptr [ ebp + 0644h ] ;0x006d6eef : 8d8544060000 push eax ;0x006d6ef5 : 50 call Fun4156a2 ;0x006d6ef6 : e8a7e7d3ff test eax , eax ;0x006d6efb : 85c0 je Label6d6f2a ;0x006d6efd : 742b pushd offset Data928494 ;0x006d6eff : 6894849200 push edi ;0x006d6f04 : 57 lea esi , dword ptr [ ebp + 0644h ] ;0x006d6f05 : 8db544060000 call Fun5557a3 ;0x006d6f0b : e893e8e7ff push ebx ;0x006d6f10 : 53 push ebx ;0x006d6f11 : 53 push ebx ;0x006d6f12 : 53 push edi ;0x006d6f13 : 57 mov eax , esi ;0x006d6f14 : 8bc6 push eax ;0x006d6f16 : 50 call Fun437e2a ;0x006d6f17 : e80e0fd6ff push eax ;0x006d6f1c : 50 mov edx , esi ;0x006d6f1d : 8bd6 lea ecx , dword ptr [ ebp + 01F4h ] ;0x006d6f1f : 8d8df4010000 call Fun42cc34 ;0x006d6f25 : e80a5dd5ff Label6d6f2a :: ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; ; mov dword ptr vfpa_copyfile_nottolower,01h xor esi , esi ;0x006d6f2a : 33f6 inc esi ;0x006d6f2c : 46 mov edi , esi ;0x006d6f2d : 8bfe mov eax , esi ;0x006d6f2f : 8bc6 lea edx , dword ptr [ ebp + 0644h ] ;0x006d6f31 : 8d9544060000 lea ecx , dword ptr [ ebp + 01F4h ] ;0x006d6f37 : 8d8df4010000 call Fun43f2b9 ;0x006d6f3d : e87783d6ff ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; Label6d6f41 :: ; mov dword ptr vfpa_copyfile_nottolower,00h Label6d6f42 :: lea eax , dword ptr [ ebp + 01F4h ] ;0x006d6f42 : 8d85f4010000 push eax ;0x006d6f48 : 50 lea eax , dword ptr [ ebp - 48 ] ;0x006d6f49 : 8d45d0 push eax ;0x006d6f4c : 50 call Fun434bcf ;0x006d6f4d : e87ddcd5ff lea edx , dword ptr [ ebp - 44 ] ;0x006d6f52 : 8d55d4 lea eax , dword ptr [ ebp + 0FFFFFF7Ch ] ;0x006d6f55 : 8d857cffffff call Fun42c27f ;0x006d6f5b : e81f53d5ff push ebx ;0x006d6f60 : 53 push eax ;0x006d6f61 : 50 call Fun42c2be ;0x006d6f62 : e85753d5ff mov edi , eax ;0x006d6f67 : 8bf8 cmp edi , ebx ;0x006d6f69 : 3bfb pop ecx ;0x006d6f6b : 59 pop ecx ;0x006d6f6c : 59 jne Label6d6ff3 ;0x006d6f6d : 0f8580000000 ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; ; mov dword ptr vfpa_copyfile_nottolower,01h push ebx ;0x006d6f73 : 53 lea eax , dword ptr [ ebp + 0404h ] ;0x006d6f74 : 8d8504040000 push eax ;0x006d6f7a : 50 call Fun42c953 ;0x006d6f7b : e8d359d5ff ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; Label6d6f7f :: ; mov dword ptr vfpa_copyfile_nottolower,00h Label6d6f80 :: cmp eax , ebx ;0x006d6f80 : 3bc3 jne Label6d6ff3 ;0x006d6f82 : 756f mov dword ptr [ ebp - 36 ] , esi ;0x006d6f84 : 8975dc Label6d6f87 :: lea eax , dword ptr [ ebp + 052Ch ] ;0x006d6f87 : 8d852c050000 push eax ;0x006d6f8d : 50 lea eax , dword ptr [ ebp - 52 ] ;0x006d6f8e : 8d45cc push eax ;0x006d6f91 : 50 lea eax , dword ptr [ ebp + 0ECh ] ;0x006d6f92 : 8d85ec000000 push eax ;0x006d6f98 : 50 call Fun42c5c5 ;0x006d6f99 : e82756d5ff lea eax , dword ptr [ ebp + 052Ch ] ;0x006d6f9e : 8d852c050000 push eax ;0x006d6fa4 : 50 lea ecx , dword ptr [ ebp + 0644h ] ;0x006d6fa5 : 8d8d44060000 call Fun75fa7f ;0x006d6fab : e8cf8a0800 lea eax , dword ptr [ ebp + 052Ch ] ;0x006d6fb0 : 8d852c050000 push eax ;0x006d6fb6 : 50 lea eax , dword ptr [ ebp - 48 ] ;0x006d6fb7 : 8d45d0 push eax ;0x006d6fba : 50 lea eax , dword ptr [ ebp - 28 ] ;0x006d6fbb : 8d45e4 push eax ;0x006d6fbe : 50 call Fun42c5c5 ;0x006d6fbf : e80156d5ff lea eax , dword ptr [ ebp - 28 ] ;0x006d6fc4 : 8d45e4 push eax ;0x006d6fc7 : 50 lea eax , dword ptr [ ebp + 0ECh ] ;0x006d6fc8 : 8d85ec000000 push eax ;0x006d6fce : 50 call Fun6d6beb ;0x006d6fcf : e817fcffff cmp eax , 0FFFFFFFEh ;0x006d6fd4 : 83f8fe je Label6d6fe4 ;0x006d6fd7 : 740b cmp eax , 0FFFFFFFDh ;0x006d6fd9 : 83f8fd je Label6d6ff3 ;0x006d6fdc : 7415 inc dword ptr [ ebp - 32 ] ;0x006d6fde : ff45e0 mov dword ptr [ ebp - 40 ] , eax ;0x006d6fe1 : 8945d8 ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; lea eax , dword ptr [ ebp - 28 ] push eax push eax call MoveFileA Label6d6fe4 :: ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; ; mov dword ptr vfpa_copyfile_nottolower,01h lea eax , dword ptr [ ebp + 0404h ] ;0x006d6fe4 : 8d8504040000 call Fun49cced ;0x006d6fea : e8fe5cdcff ; ; ------------------------------------------------- ; VFP 9.0 FIX - COPY FILE COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the COPY FILE command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; Label6d6fee :: ; mov dword ptr vfpa_copyfile_nottolower,00h Label6d6fef :: test eax , eax ;0x006d6fef : 85c0 je Label6d6f87 ;0x006d6ff1 : 7494 Label6d6ff3 :: lea eax , dword ptr [ ebp - 44 ] ;0x006d6ff3 : 8d45d4 push eax ;0x006d6ff6 : 50 lea eax , dword ptr [ ebp + 0FFFFFF7Ch ] ;0x006d6ff7 : 8d857cffffff call Fun42d200 ;0x006d6ffd : e8fe61d5ff lea esi , dword ptr [ ebp + 0404h ] ;0x006d7002 : 8db504040000 call Fun43e393 ;0x006d7008 : e88673d6ff cmp edi , ebx ;0x006d700d : 3bfb je Label6d7018 ;0x006d700f : 7407 mov ecx , edi ;0x006d7011 : 8bcf call Fun544742 ;0x006d7013 : e82ad7e6ff Label6d7018 :: cmp dword ptr [ ebp - 36 ] , ebx ;0x006d7018 : 395ddc jne Label6d7032 ;0x006d701b : 7515 lea ecx , dword ptr [ ebp + 02FCh ] ;0x006d701d : 8d8dfc020000 call Fun44d338 ;0x006d7023 : e81063d7ff mov ecx , 0ADh ;0x006d7028 : b9ad000000 call Fun544742 ;0x006d702d : e810d7e6ff Label6d7032 :: mov eax , dword ptr [ Data9370f8 ] ;0x006d7032 : a1f8709300 mov eax , dword ptr [eax] ;0x006d7037 : 8b00 cmp dword ptr [ eax + 0118h ] , ebx ;0x006d7039 : 399818010000 je Label6d7082 ;0x006d703f : 7441 cmp word ptr [ ebp - 32 ] , bx ;0x006d7041 : 66395de0 jbe Label6d7082 ;0x006d7045 : 763b cmp word ptr [ ebp - 32 ] , 01h ;0x006d7047 : 66837de001 je Label6d705a ;0x006d704c : 740c movzx eax ,word ptr [ ebp - 32 ] ;0x006d704e : 0fb745e0 push eax ;0x006d7052 : 50 mov ecx , 051Bh ;0x006d7053 : b91b050000 jmp Label6d7062 ;0x006d7058 : eb08 Label6d705a :: push dword ptr [ ebp - 40 ] ;0x006d705a : ff75d8 mov ecx , 0508h ;0x006d705d : b908050000 Label6d7062 :: call Fun42c583 ;0x006d7062 : e81c55d5ff push eax ;0x006d7067 : 50 lea eax , dword ptr [ ebp + 0644h ] ;0x006d7068 : 8d8544060000 push eax ;0x006d706e : 50 call Fun43089c ;0x006d706f : e82898d5ff add esp , 0Ch ;0x006d7074 : 83c40c lea eax , dword ptr [ ebp + 0644h ] ;0x006d7077 : 8d8544060000 call Fun543829 ;0x006d707d : e8a7c7e6ff Label6d7082 :: mov ecx , dword ptr [ ebp + 0750h ] ;0x006d7082 : 8b8d50070000 call Fun42bf1d ;0x006d7088 : e8904ed5ff pop edi ;0x006d708d : 5f pop esi ;0x006d708e : 5e pop ebx ;0x006d708f : 5b add ebp , 0754h ;0x006d7090 : 81c554070000 leave ;0x006d7096 : c9 ret ;0x006d7097 : c3 Fun890a33 :: ; proc near push ebp ;0x00890a33 : 55 lea ebp , dword ptr [ esp + 0FFFFFAC0h ] ;0x00890a34 : 8dac24c0faffff sub esp , 05CCh ;0x00890a3b : 81eccc050000 mov eax , dword ptr [ Data937090 ] ;0x00890a41 : a190709300 push ebx ;0x00890a46 : 53 push esi ;0x00890a47 : 56 push edi ;0x00890a48 : 57 mov dword ptr [ ebp + 053Ch ] , eax ;0x00890a49 : 89853c050000 ; ; ------------------------------------------------- ; VFP 9.0 FIX - RENAME COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the RENAME command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; ; mov dword ptr vfpa_copyfile_nottolower,01h xor ebx , ebx ;0x00890a4f : 33db xor eax , eax ;0x00890a51 : 33c0 mov ecx , 090h ;0x00890a53 : b990000000 lea edi , dword ptr [ ebp + 01F0h ] ;0x00890a58 : 8dbdf0010000 push ebx ;0x00890a5e : 53 rep stosd ;0x00890a5f : f3ab mov ecx , dword ptr [ ebp + 0548h ] ;0x00890a61 : 8b8d48050000 pushd 0105h ;0x00890a67 : 6805010000 lea edx , dword ptr [ ebp + 01F0h ] ;0x00890a6c : 8d95f0010000 mov dword ptr [ ebp - 36 ] , ebx ;0x00890a72 : 895ddc call Fun43d389 ;0x00890a75 : e80fc9baff ; ; ------------------------------------------------- ; VFP 9.0 FIX - RENAME COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the RENAME command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; Label890a79 :: ; mov dword ptr vfpa_copyfile_nottolower,00h Label890a7a :: push dword ptr [ ebp + 0548h ] ;0x00890a7a : ffb548050000 lea eax , dword ptr [ ebp - 48 ] ;0x00890a80 : 8d45d0 push eax ;0x00890a83 : 50 call Fun434bcf ;0x00890a84 : e84641baff ; ; ------------------------------------------------- ; VFP 9.0 FIX - RENAME COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the RENAME command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; ; mov dword ptr vfpa_copyfile_nottolower,01h mov ecx , dword ptr [ ebp + 054Ch ] ;0x00890a89 : 8b8d4c050000 xor eax , eax ;0x00890a8f : 33c0 inc eax ;0x00890a91 : 40 mov edi , eax ;0x00890a92 : 8bf8 lea edx , dword ptr [ ebp - 32 ] ;0x00890a94 : 8d55e0 call Fun43f2b9 ;0x00890a97 : e81de8baff ; ; ------------------------------------------------- ; VFP 9.0 FIX - RENAME COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the RENAME command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; Label890a9b :: ; mov dword ptr vfpa_copyfile_nottolower,00h Label890a9c :: push dword ptr [ ebp + 054Ch ] ;0x00890a9c : ffb54c050000 lea eax , dword ptr [ ebp - 52 ] ;0x00890aa2 : 8d45cc push eax ;0x00890aa5 : 50 call Fun434bcf ;0x00890aa6 : e82441baff lea edx , dword ptr [ ebp - 44 ] ;0x00890aab : 8d55d4 lea eax , dword ptr [ ebp + 0FFFFFF78h ] ;0x00890aae : 8d8578ffffff call Fun42c27f ;0x00890ab4 : e8c6b7b9ff push ebx ;0x00890ab9 : 53 push eax ;0x00890aba : 50 call Fun42c2be ;0x00890abb : e8feb7b9ff cmp eax , ebx ;0x00890ac0 : 3bc3 pop ecx ;0x00890ac2 : 59 pop ecx ;0x00890ac3 : 59 mov dword ptr [ ebp - 40 ] , eax ;0x00890ac4 : 8945d8 jne Label890b9f ;0x00890ac7 : 0f85d2000000 ; ; ------------------------------------------------- ; VFP 9.0 FIX - RENAME COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the RENAME command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; ; mov dword ptr vfpa_copyfile_nottolower,01h push ebx ;0x00890acd : 53 lea eax , dword ptr [ ebp + 01F0h ] ;0x00890ace : 8d85f0010000 push eax ;0x00890ad4 : 50 call Fun42c953 ;0x00890ad5 : e879beb9ff ; ; ------------------------------------------------- ; VFP 9.0 FIX - RENAME COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the RENAME command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; Label890ad9 :: ; mov dword ptr vfpa_copyfile_nottolower,00h Label890ada :: cmp eax , ebx ;0x00890ada : 3bc3 jne Label890b9f ;0x00890adc : 0f85bd000000 Label890ae2 :: inc dword ptr [ ebp - 36 ] ;0x00890ae2 : ff45dc lea eax , dword ptr [ ebp + 0318h ] ;0x00890ae5 : 8d8518030000 push eax ;0x00890aeb : 50 lea eax , dword ptr [ ebp - 48 ] ;0x00890aec : 8d45d0 push eax ;0x00890aef : 50 lea eax , dword ptr [ ebp + 0430h ] ;0x00890af0 : 8d8530040000 push eax ;0x00890af6 : 50 call Fun42c5c5 ;0x00890af7 : e8c9bab9ff lea edx , dword ptr [ ebp + 0430h ] ;0x00890afc : 8d9530040000 call Fun49d5c3 ;0x00890b02 : e8bccac0ff test eax , eax ;0x00890b07 : 85c0 je Label890b16 ;0x00890b09 : 740b lea ecx , dword ptr [ ebp + 0430h ] ;0x00890b0b : 8d8d30040000 call Fun7c7bf8 ;0x00890b11 : e8e270f3ff Label890b16 :: push ebx ;0x00890b16 : 53 lea eax , dword ptr [ ebp + 0430h ] ;0x00890b17 : 8d8530040000 call Fun42d5e0 ;0x00890b1d : e8becab9ff test eax , eax ;0x00890b22 : 85c0 je Label890b30 ;0x00890b24 : 740a mov ecx , 084h ;0x00890b26 : b984000000 call Fun544742 ;0x00890b2b : e8123ccbff Label890b30 :: lea eax , dword ptr [ ebp + 0318h ] ;0x00890b30 : 8d8518030000 push eax ;0x00890b36 : 50 lea ecx , dword ptr [ ebp - 32 ] ;0x00890b37 : 8d4de0 call Fun75fa7f ;0x00890b3a : e840efecff lea eax , dword ptr [ ebp + 0318h ] ;0x00890b3f : 8d8518030000 push eax ;0x00890b45 : 50 lea eax , dword ptr [ ebp - 52 ] ;0x00890b46 : 8d45cc push eax ;0x00890b49 : 50 lea eax , dword ptr [ ebp + 0E8h ] ;0x00890b4a : 8d85e8000000 push eax ;0x00890b50 : 50 call Fun42c5c5 ;0x00890b51 : e86fbab9ff lea edx , dword ptr [ ebp + 0E8h ] ;0x00890b56 : 8d95e8000000 call Fun49d5c3 ;0x00890b5c : e862cac0ff test eax , eax ;0x00890b61 : 85c0 je Label890b70 ;0x00890b63 : 740b lea ecx , dword ptr [ ebp + 0E8h ] ;0x00890b65 : 8d8de8000000 call Fun7c7bf8 ;0x00890b6b : e88870f3ff Label890b70 :: lea edi , dword ptr [ ebp + 0E8h ] ;0x00890b70 : 8dbde8000000 lea eax , dword ptr [ ebp + 0430h ] ;0x00890b76 : 8d8530040000 call Fun488609 ;0x00890b7c : e8887abfff cmp eax , ebx ;0x00890b81 : 3bc3 je Label890b8c ;0x00890b83 : 7407 mov ecx , eax ;0x00890b85 : 8bc8 call Fun544742 ;0x00890b87 : e8b63bcbff Label890b8c :: ; ; ------------------------------------------------- ; VFP 9.0 FIX - RENAME COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the RENAME command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; push edi push edi call MoveFileA Label890b8d :: ; ; ------------------------------------------------- ; VFP 9.0 FIX - RENAME COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the RENAME command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; ; mov dword ptr vfpa_copyfile_nottolower,01h lea eax , dword ptr [ ebp + 01F0h ] ;0x00890b8c : 8d85f0010000 call Fun49cced ;0x00890b92 : e856c1c0ff ; ; ------------------------------------------------- ; VFP 9.0 FIX - RENAME COMMAND ; December 2017 ; ------------------------------------------------- ; CCB ; ; In vfp9, the RENAME command always creates the destination file with a lower case file name, ; now it creates the destination file with the user-specified file name. ; ; 2017/12/3, by ccb ; Label890b96 :: ; mov dword ptr vfpa_copyfile_nottolower,00h Label890b97 :: test eax , eax ;0x00890b97 : 85c0 je Label890ae2 ;0x00890b99 : 0f8443ffffff Label890b9f :: lea eax , dword ptr [ ebp - 44 ] ;0x00890b9f : 8d45d4 push eax ;0x00890ba2 : 50 lea eax , dword ptr [ ebp + 0FFFFFF78h ] ;0x00890ba3 : 8d8578ffffff call Fun42d200 ;0x00890ba9 : e852c6b9ff lea esi , dword ptr [ ebp + 01F0h ] ;0x00890bae : 8db5f0010000 call Fun43e393 ;0x00890bb4 : e8dad7baff mov ecx , dword ptr [ ebp - 40 ] ;0x00890bb9 : 8b4dd8 cmp ecx , ebx ;0x00890bbc : 3bcb je Label890bc5 ;0x00890bbe : 7405 call Fun544742 ;0x00890bc0 : e87d3bcbff Label890bc5 :: cmp dword ptr [ ebp - 36 ] , ebx ;0x00890bc5 : 395ddc jne Label890bda ;0x00890bc8 : 7510 mov ecx , dword ptr [ ebp + 0548h ] ;0x00890bca : 8b8d48050000 pushd 0ADh ;0x00890bd0 : 68ad000000 call Fun44d388 ;0x00890bd5 : e8aec7bbff Label890bda :: mov ecx , dword ptr [ ebp + 053Ch ] ;0x00890bda : 8b8d3c050000 call Fun42bf1d ;0x00890be0 : e838b3b9ff pop edi ;0x00890be5 : 5f pop esi ;0x00890be6 : 5e pop ebx ;0x00890be7 : 5b add ebp , 0540h ;0x00890be8 : 81c540050000 leave ;0x00890bee : c9 ret 08h ;0x00890bef : c20800 Now the COPY FILE and RENAME commands create the destination file with the user-specified file name. 4. APPLIES TO: VFP 6.0.8167.0 VFP 6.0.8961.0 (SP5) VFP 7.0.0.9262 VFP 7.0.0.9465 (SP1) VFP 8.0.0.2521 VFP 8.0.0.3117 (SP1) VFP 9.0.0.2412 VFP 9.0.0.3504 (SP1) VFP 9.0.0.4611 (SP2) VFP 9.0.0.5015 (SP2) VFP 9.0.0.5411 (SP2) VFP 9.0.0.5721 (SP2) VFP 9.0.0.5815 (SP2) VFP 9.0.0.6303 (SP2) VFP 9.0.0.6602 (SP2) VFP 9.0.0.7423 (SP2) The bug has been fixed in VFP Advanced. 5. REFERENCE WEBSITES: 1, baiyujia.com: http://www.baiyujia.com 2, microsoft.com: https://connect.microsoft.com/VisualStudio/feedback/details/218023/vfp-8-9-copy-file-and-rename-commands-change-file-names-allways-to-lawercase https://social.msdn.microsoft.com/Forums/en-US/8bf07ea5-4693-4d97-b6d8-844d6f0a0712/how-can-i-copy-a-file-and-rename-to-upper-case-file-name https://social.msdn.microsoft.com/Forums/en-US/3192215f-b073-4082-893a-79ca36f36ffd/rename-case-sensitive 3, foxite.com: https://www.foxite.com/archives/copy-file-changed-case-0000402944.htm https://www.foxite.com/archives/copy-filerename-changes-cases-to-filenames-0000023778.htm https://www.foxite.com/archives/copy-file-0000314742.htm https://www.foxite.com/archives/copy-file-changes-filename-to-lower-case-0000104923.htm https://www.foxite.com/archives/copy-file-issue-0000428071.htm https://www.foxite.com/archives/file-copy-issue-0000428069.htm https://www.foxite.com/archives/renaming-a-file-to-uppercase-0000246959.htm 4, mzvfp.com: http://www.mzvfp.com/read.php?tid=56306 5, sunyear.com.tw: http://vfp.sunyear.com.tw/viewtopic.php?t=6848 http://vfp.sunyear.com.tw/viewtopic.php?t=4795 6, berezniker.com: https://www.berezniker.com/content/pages/visual-foxpro/copy-move-rename-file-preserving-destination-name-case 7, narkive.com: http://microsoft.public.fox.programmer.exchange.narkive.com/z9Qbft2p/copy-file-changes-file-name-case-to-lower-case 8, devx.com: http://forums.devx.com/showthread.php?80569-fOXPRO-BUG 9, computer-programming-forum.com: http://computer-programming-forum.com/2-vfp/3ee2f0a5908c69b3.htm 6. OTHER: For reference only, there is no guarantees. Any questions or suggestions, please send me an email at ccb2000@163.com. |