home *** CD-ROM | disk | FTP | other *** search
/ Collection of Hack-Phreak Scene Programs / cleanhpvac.zip / cleanhpvac / CCTX0497.ZIP / VBBUPDT2.ZIP / VBB-4.ZIP / VBB-4.021 < prev    next >
Text File  |  1997-01-03  |  2KB  |  49 lines
  1.  
  2.                       VBB VBB VBB VBB VBB VBB VBB VBB
  3.                      VBB                           VBB
  4.                      VBB Directory Findy by Spider VBB 
  5.                      VBB                           VBB
  6.                      VBB          of VBB           VBB
  7.                      VBB                           VBB
  8.                       VBB VBB VBB VBB VBB VBB VBB VBB
  9.  
  10.   This is a little lamer, but I have seen this just 3 or 4 times on virus, I
  11.  am talking about find directories to fuck... instead of look for files, the
  12.  virus will look for other directories... Well, I invented a little big func-
  13.  tion to do that that took me 2 weeks of research and tests... take a look, I
  14.  think that is possible to decrese the size of the function, but it's up to 
  15.  you... fill free to change everything yo want on this peace of code:
  16.  
  17.  Start:
  18.       call GET_DTA         ; Get proper DTA address in DX.
  19.       push dx              ; Save it.
  20.       mov ah,1AH           ; Set DTA.
  21.       int 21H
  22.         
  23.       mov ah, 04eh                       ; Search for first subdirectory
  24.       mov cx, 00010001b                  ; Dir mask                        
  25.       lea dx, maske_dir                  ; 
  26.       int 21h                            ;
  27.       jc Erro                            ;
  28.  
  29.       pop  bx                            ; Get pointer to search table (DTA)
  30.       test BYTE PTR [bx+15H], 00010001b  ; Is this a directory?
  31.       jz Find_next                       ; No, find next
  32.       cmp BYTE PTR [bx+1EH],'.'          ; Is it a subdirectory header?
  33.       jne Real                           ; No, it's a real directory!!
  34.  
  35.  GET_DTA:                                 ;
  36.         mov     dx,OFFSET DTA2           ;
  37.         mov     al,2BH                   ;
  38.         add     dx,ax                    ; Return with dx= proper dta offset
  39.         ret                              ;
  40.  
  41. DTA2      db 56H dup (?)                 ;dta for directory finds (2 deep)
  42. maske_dir db "*",00                      ; search dir's
  43.  
  44.   It's very simple... know you can right real cool virus!! He he, if you find
  45.  a best way of do this kind of search.. please, tell me ok?!? See ya..
  46.           
  47.                                                                    Spider
  48. My e-mail:  mgl@merconet.com.br
  49.