Subversion Repositories Kolibri OS

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2570 hidnplayr 1
 
2
        DEBUGF  1, "FileInfoHeader (0x%x)\n", ptr
3
        DEBUGF  1, "Version: %u\n", [ptr + FileInfoHeader.Version]:4
4
        DEBUGF  1, "FilesRead: %u\n", [ptr + FileInfoHeader.FilesRead]:4
5
        DEBUGF  1, "FilesCount: %u\n\n", [ptr + FileInfoHeader.FilesCount]:4
6
}
7
8
 
9
        DEBUGF  1, "FileInfoA (0x%x)\n", ptr
10
        DEBUGF  1, "Attributes: 0x%x\n", [ptr + FileInfoA.Attributes]:8
11
        DEBUGF  1, "Flags: 0x%x\n", [ptr + FileInfoA.Flags]:8
12
        DEBUGF  1, "FileSizeLow: 0x%x\n", [ptr + FileInfoA.FileSize]:8
13
        DEBUGF  1, "FileSizeHigh: 0x%x\n", [ptr + FileInfoA.FileSize+4]:8
14
        push    eax
15
        lea     eax, [ptr + FileInfoA.FileName]
16
        DEBUGF  1, "FileName: %s\n\n", eax
17
        pop     eax
18
}
19
20
 
21
        DEBUGF  1, "FileInfoBlock (0x%x)\n", ptr
22
        DEBUGF  1, "Function: %u\n", [ptr + FileInfoBlock.Function]:4
23
        DEBUGF  1, "Position: %u\n", [ptr + FileInfoBlock.Position]:4
24
        DEBUGF  1, "Flags: 0x%x\n", [ptr + FileInfoBlock.Flags]:8
25
        DEBUGF  1, "Count: %u\n", [ptr + FileInfoBlock.Count]:4
26
        DEBUGF  1, "Buffer: 0x%x\n", [ptr + FileInfoBlock.Buffer]:8
27
        DEBUGF  1, "FileName: %s\n\n", [ptr + FileInfoBlock.FileName]:8
28
}
29
30
 
31
        DEBUGF  1, "FindOptions (0x%x)\n", ptr
32
        DEBUGF  1, "Attributes: 0x%x\n", [ptr + FindOptions.Attributes]:8
33
        DEBUGF  1, "Mask: %s\n\n", [ptr + FindOptions.Mask]
34
}
35
36
 
37
        push    eax
38
        mov     eax, ptr
39
        DEBUGF  1, "FindFileBlock (0x%x)\n\n", eax
40
        debug_FileInfoHeader eax
41
        add     eax, sizeof.FileInfoHeader
42
        debug_FileInfoA eax
43
        add     eax, sizeof.FileInfoA
44
        debug_FileInfoBlock eax
45
        add     eax, sizeof.FileInfoBlock
46
        debug_FindOptions eax
47
        pop     eax
48
}
49