Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | Download | RSS feed

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