MASM32编程获取文件最后修改时间

傷城~ 2024-03-17 18:49 15阅读 0赞

;<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<  
;FileName: FileTime.asm  
;Function: Show the last write time of file "C:/IO.SYS"  
; Author: Purple Endurer  
;  
;Date Summary  
;---------------------------------------------------------------------------  
; 2006.10.28 Created and Passed!  
  
.386  
.model flat, stdcall  
option casemap: none  
  
include /masm32/ include/windows.inc  
  
include /masm32/ include/user32.inc  
include /masm32/ include/kernel32.inc  
  
includelib /masm32/ lib/user32.lib  
includelib /masm32/ lib/kernel32.lib  
  
GetFileLastWriteTime PROTO :LPSTR, :LPSTR  
SysTime2Str PROTO : DWORD, :LPSTR  
  
  
; SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS  
.data  
; SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS  
g\_szFileSpec db "C:/IO.SYS", 0  
  
  
; SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS  
.data?  
; SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS  
g\_buf20 db 20 dup(?)  
  
  
; SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS  
.code  
; SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS  
  
start:  
invoke GetFileLastWriteTime, OFFSET g\_szFileSpec, OFFSET g\_buf20  
.if eax==0  
invoke MessageBox, NULL, OFFSET g\_buf20, OFFSET g\_szFileSpec, NULL  
.else  
invoke MessageBox, NULL, eax, OFFSET g\_szFileSpec, NULL  
.endif  
invoke ExitProcess, NULL  
  
  
;///  
; Get the last write time of a file  
; input: lpstrFileSpec--the pointer to the file specifier  
; output: eax > 0, fail, eax = the begin addr of error message  
; eax = 0, success, the time str is stored in g\_buffer1  
;///  
GetFileLastWriteTime PROC lpstrFileSpec: LPSTR, lpstrBuf: LPSTR  
LOCAL hOpenFile: HANDLE  
LOCAL stFileLastWriteTime: FILETIME  
LOCAL stLocalFileTime: FILETIME  
LOCAL stSysTime: SYSTEMTIME  
LOCAL dwResult: DWORD  
  
invoke CreateFile, lpstrFileSpec, GENERIC\_READ, FILE\_SHARE\_READ, NULL,/  
OPEN\_EXISTING, FILE\_FLAG\_BACKUP\_SEMANTICS, NULL  
.if eax==INVALID\_HANDLE\_VALUE  
mov eax, OFFSET g\_szFailToCreateFile  
.else  
mov hOpenFile, eax  
  
; BOOL GetFileTime(  
; HANDLE hFile, // identifies the file   
; LPFILETIME lpCreationTime, // address of creation time   
; LPFILETIME lpLastAccessTime,// address of last access time   
; LPFILETIME lpLastWriteTime // address of last write time   
; );  
  
invoke GetFileTime, hOpenFile, NULL, NULL, ADDR stFileLastWriteTime  
.if eax == 0  
mov dwResult, OFFSET g\_szGetFileTimeErr  
.else  
; BOOL FileTimeToSystemTime(  
; CONST FILETIME \*lpFileTime, // pointer to file time to convert   
; LPSYSTEMTIME lpSystemTime // pointer to structure to receive system time   
; );  
invoke FileTimeToLocalFileTime, ADDR stFileLastWriteTime, ADDR stLocalFileTime  
invoke FileTimeToSystemTime, ADDR stLocalFileTime, ADDR stSysTime  
.if eax==0  
mov dwResult, OFFSET g\_szFileTimeToSystemTimeErr  
.else  
invoke SysTime2Str, ADDR stSysTime, lpstrBuf  
mov dwResult, 0  
.endif  
.endif  
invoke CloseHandle, hOpenFile  
mov eax, dwResult  
.endif  
  
ret  
g\_szFailToCreateFile db "创建文件失败！", 0  
g\_szGetFileTimeErr db "取文件时间失败!", 0  
g\_szFileTimeToSystemTimeErr db "转换时间失败!", 0  
GetFileLastWriteTime ENDP  
  
  
SysTime2Str PROC lpSysTime: DWORD, lpstrBuf: LPSTR  
xor eax, eax  
jz @F  
g\_szFmt4SysTime db "%d-%d-%d %d:%d:%d", 0  
@@:  
pushad  
mov edi, lpSysTime  
assume edi: ptr SYSTEMTIME  
movzx eax, \[ edi\].wYear  
movzx ebx, \[ edi\].wMonth  
movzx ecx, \[ edi\].wDay  
movzx edx, \[ edi\].wHour  
movzx esi, \[ edi\].wMinute  
movzx edi, \[ edi\].wSecond  
assume edi: nothing  
  
invoke wsprintf, lpstrBuf, OFFSET g\_szFmt4SysTime, eax, ebx, ecx, edx, esi, edi  
  
popad  
ret  
SysTime2Str ENDP  
  
end start