文件_取大小W

揰掵佲

不知道是不是超过4G之后取出来的都有毛病
我测试的是5.14G的



附带修复后的代码

参考地址 https://docs.microsoft.com/zh-cn ... se-win32_find_dataa

nFileSizeHigh

文件大小的高位DWORD值，以字节为单位。
nFileSizeLow

文件大小的低位DWORD值，以字节为单位。

  

子程序名	返回值类型	公开	备 注
文件_取大小W2	长整数型		返回一个文件的长度，单位是字节
参数名	类 型	参考	可空	数组	备 注
文件的绝对路径	字节集

变量名	类 型	静态	数组	备 注
inf	WIN32_FIND_DATAW
handle	整数型

handle ＝ FindFirstFileW (文件的绝对路径, inf)
判断 (handle ≠ #INVALID_HANDLE_VALUE )
FindClose (handle)
返回 (合并长整数_ (inf.nFileSizeLow, inf.nFileSizeHigh))
判断 (handle ＝ #INVALID_HANDLE_VALUE )
输出调试文本 (“错误：找不到文件”)
输出调试文本 (取错误信息文本_API (handle))
返回 (0)

子程序名	返回值类型	公开	备 注
合并长整数_	长整数型		汇编 将第一个整数放置到结果长整数的低32位，将第二个整数放置到结果长整数的高32位，以此合并成一个长整数，并返回合并后的结果
参数名	类 型	参考	可空	数组	备 注
用作合并的整数1	整数型
用作合并的整数2	整数型

置入代码 ({ 139, 69, 8, 139, 85, 12, 201, 195 })
' MOV eax,[arg.1]
' MOV edx,[arg.2]
' leave
' ret
返回 (0)

.版本 2<br /> <br /> .子程序 文件_取大小W2, 长整数型, , 返回一个文件的长度，单位是字节<br /> .参数 文件的绝对路径, 字节集<br /> .局部变量 inf, WIN32_FIND_DATAW<br /> .局部变量 handle, 整数型<br /> <br /> handle ＝ FindFirstFileW (文件的绝对路径, inf)<br /> .判断开始 (handle ≠ #INVALID_HANDLE_VALUE)<br />     FindClose (handle)<br />     返回 (合并长整数_ (inf.nFileSizeLow, inf.nFileSizeHigh))<br /> .判断 (handle ＝ #INVALID_HANDLE_VALUE)<br />     输出调试文本 (“错误：找不到文件”)<br /> .默认<br />     输出调试文本 (取错误信息文本_API (handle))<br /> .判断结束<br /> 返回 (0)<br /> <br /> <br /> <br /> .子程序 合并长整数_, 长整数型, 公开, 汇编 将第一个整数放置到结果长整数的低32位，将第二个整数放置到结果长整数的高32位，以此合并成一个长整数，并返回合并后的结果<br /> .参数 用作合并的整数1, 整数型<br /> .参数 用作合并的整数2, 整数型<br /> <br /> 置入代码 ({ 139, 69, 8, 139, 85, 12, 201, 195 })<br /> ' MOV eax,[arg.1]<br /> ' MOV edx,[arg.2]<br /> ' leave<br /> ' ret<br /> 返回 (0)

再补充一个修复代码   这个代码就是基于官方的基础上改动的
需要注意的是 易语言的 位运算是 4字节的 所以 左移没有变成8字节
其次,整数_有符号转无符号 应该传入长整数型 通过指针操作的话 应该是需要8字节的 修改之后 可以正确取出来,但是也可能影响其他的转换 所以 也带一个无符号转换的子程序吧

  

子程序名	返回值类型	公开	备 注
文件_取大小W3	长整数型		返回一个文件的长度，单位是字节
参数名	类 型	参考	可空	数组	备 注
文件的绝对路径	字节集

变量名	类 型	静态	数组	备 注
inf	WIN32_FIND_DATAW
handle	整数型

handle ＝ FindFirstFileW (文件的绝对路径, inf)
判断 (handle ≠ #INVALID_HANDLE_VALUE )
FindClose (handle)
返回 (整数_到无符号 (位或_ (左移_ (inf.nFileSizeHigh, 32), inf.nFileSizeLow)))
判断 (handle ＝ #INVALID_HANDLE_VALUE )
输出调试文本 (“错误：找不到文件”)
输出调试文本 (取错误信息文本_API (handle))
返回 (0)

子程序名	返回值类型	公开	备 注
位或_	长整数型		汇编
参数名	类 型	参考	可空	数组	备 注
位运算数值一	长整数型
位运算数值二	长整数型

置入代码 ({ 139, 69, 8, 139, 85, 12, 11, 69, 16, 11, 85, 20, 201, 194, 16, 0 })
返回 (0)
' or64:
' mov eax,[ebp+8]
' mov edx,[ebp+0xc]
' or eax,[ebp+0x10]
' or edx,[ebp+0x14]
' leave
' ret 0x10

子程序名	返回值类型	公开	备 注
左移_	长整数型		汇编
参数名	类 型	参考	可空	数组	备 注
欲移动的整数	长整数型
欲移动的位数	整数型

置入代码 ({ 139, 69, 8, 139, 85, 12, 139, 77, 16, 128, 249, 64, 115, 14, 128, 249, 32, 115, 15, 15, 165, 194, 211, 224, 201, 194, 12, 0, 49, 192, 49, 210, 235, 246, 137, 194, 49, 192, 128, 225, 31, 211, 226, 235, 235 })
返回 (0)
' shrl64:
' mov eax,[ebp+8]
' mov edx,[ebp+0xc]
' mov ecx,[ebp+0x10]
' cmp cl,0x40
' jnb L01
' cmp cl,0x20
' jnb L02
' shld edx,eax,cl
' shl eax,cl
' L03:
' leave
' ret 0xc
' L01:
' xor eax,eax
' xor edx,edx
' jmp L03
' L02:
' mov edx,eax
' xor eax,eax
' and cl,0x1F
' shl edx,cl
' jmp L03

子程序名	返回值类型	公开	备 注
整数_到无符号	长整数型		如果显示负数，调用这个进行操作
参数名	类 型	参考	可空	数组	备 注
有符号整数	整数型

变量名	类 型	静态	数组	备 注
返回值	长整数型

如果真 (位与 (有符号整数, -2147483648) ＝ -2147483648)
返回值 ＝ 2147483648
返回 (返回值 ＋ 位与 (有符号整数, 2147483647))

.版本 2<br /> <br /> .子程序 文件_取大小W3, 长整数型, , 返回一个文件的长度，单位是字节<br /> .参数 文件的绝对路径, 字节集<br /> .局部变量 inf, WIN32_FIND_DATAW<br /> .局部变量 handle, 整数型<br /> <br /> handle ＝ FindFirstFileW (文件的绝对路径, inf)<br /> .判断开始 (handle ≠ #INVALID_HANDLE_VALUE)<br />     FindClose (handle)<br />     返回 (整数_到无符号(位或_ (左移_ (inf.nFileSizeHigh, 32), inf.nFileSizeLow)))<br /> .判断 (handle ＝ #INVALID_HANDLE_VALUE)<br />     输出调试文本 (“错误：找不到文件”)<br /> .默认<br />     输出调试文本 (取错误信息文本_API (handle))<br /> .判断结束<br /> 返回 (0)<br /> <br /> <br /> .版本 2<br /> <br /> .子程序 位或_, 长整数型, 公开, 汇编<br /> .参数 位运算数值一, 长整数型<br /> .参数 位运算数值二, 长整数型<br /> <br /> <br /> 置入代码 ({ 139, 69, 8, 139, 85, 12, 11, 69, 16, 11, 85, 20, 201, 194, 16, 0 })<br /> 返回 (0)<br /> ' or64:<br /> ' mov eax,[ebp+8]<br /> ' mov edx,[ebp+0xc]<br /> ' or eax,[ebp+0x10]<br /> ' or edx,[ebp+0x14]<br /> ' leave<br /> ' ret 0x10<br /> <br /> .子程序 左移_, 长整数型, 公开, 汇编<br /> .参数 欲移动的整数, 长整数型<br /> .参数 欲移动的位数, 整数型<br /> <br /> 置入代码 ({ 139, 69, 8, 139, 85, 12, 139, 77, 16, 128, 249, 64, 115, 14, 128, 249, 32, 115, 15, 15, 165, 194, 211, 224, 201, 194, 12, 0, 49, 192, 49, 210, 235, 246, 137, 194, 49, 192, 128, 225, 31, 211, 226, 235, 235 })<br /> 返回 (0)<br /> ' shrl64:<br /> ' mov eax,[ebp+8]<br /> ' mov edx,[ebp+0xc]<br /> ' mov ecx,[ebp+0x10]<br /> ' cmp cl,0x40<br /> ' jnb L01<br /> ' cmp cl,0x20<br /> ' jnb L02<br /> ' shld edx,eax,cl<br /> ' shl eax,cl<br /> ' L03:<br /> ' leave<br /> ' ret 0xc<br /> ' L01:<br /> ' xor eax,eax<br /> ' xor edx,edx<br /> ' jmp L03<br /> ' L02:<br /> ' mov edx,eax<br /> ' xor eax,eax<br /> ' and cl,0x1F<br /> ' shl edx,cl<br /> ' jmp L03<br /> .版本 2<br /> <br /> .子程序 整数_到无符号, 长整数型, 公开, 如果显示负数，调用这个进行操作<br /> .参数 有符号整数, 整数型<br /> .局部变量 返回值, 长整数型<br /> <br /> .如果真 (位与 (有符号整数, -2147483648) ＝ -2147483648)<br />     返回值 ＝ 2147483648<br /> .如果真结束<br /> 返回 (返回值 ＋ 位与 (有符号整数, 2147483647))

liaoxiaohu

66666666666666666

cfvgbhnj

整数转无符号的, 取长整数的变量地址, 然后把整数写进去4个字节就行了

zhou200303

怎么感觉都很高级的样子

揰掵佲

福仔 发表于 2022-6-10 02:57
如果模块没有处理高32位的话, 那超过4G的都会出问题....
一个整数32位, 2的32次方等于4GB, 不处理高32位的 ...

反正反馈一下.模块处理了,但没完全处理

福仔

如果模块没有处理高32位的话, 那超过4G的都会出问题....
一个整数32位, 2的32次方等于4GB, 不处理高32位的话, 最多能显示4G