tunnel-1.0/0040755000076400007640000000000010153451663011715 5ustar frezhfrezhtunnel-1.0/netman.h0100664000076400007640000000511510153446136013350 0ustar frezhfrezh#include #include #include #include #include #include #include #include #include #include extern int errno,h_errno; /* * int setDaemon(int debug) * * regresa estado de exito o fracaso * debug * */ int setDaemon(int debug); /* * int gateway(char *nombrehost,int puerto,int debug) * char *nombrehost .- Nombre del host al que redireccionar connexion. * int puerto .- Puerto al que redireccionar. * int debug .- Nivel de comentarios : * -2 Modo ErrTerm.- Corre en modo daemon, y termina ejecucion en caso de error. * -1 Modo Daemon .- Corre silencioso en modo daemon. * 0 Silencio.- Corre sin comentarios en una terminal. * 1 Errores .- Despliega errores. * 2 Super Verbose .- Muestra paso a paso la corrida del programa. * * Returns .- Regresa el estatus de error, entero que indica parte donde trono el codigo. * */ int gateway(char *nombrehost,int puerto,int debug); /* * struct hostent *getHostAddr(char *nombrehost,int debug) * * Devuelve un hostent, -1 en error * * nomnbre host puede ser una direccion en notacion punto o * un nombre de dominio * */ struct hostent *getHostAddr(char *nombrehost,int debug); /* * int openRemote(char *nombrehost,int puerto, int debug) * * regresa un descriptor de socket * 0 o menor a 0 si hay error * * nombrehost es una cadena con el nombre del host * puerto es puerto donde se abrira la conexion * debug pasa el estado de debug * * Nota : Implementar reconocimiento de IP ardres o nombre host * */ int openRemote(char *nombrehost,int puerto,int debug); /* * int osmosis(int obj,int src,int debug) * * Poner la entrada de src en la salida del obj * y viceversa. * * regresa estatus de exito o error * * obj Descriptor en non blocking mode. * Es el destino del tunnel * scr Descriptor en non blocking mode. * Es el originador del servicio * debug * */ int osmosis(int obj, int src,int debug); /* * void spylog(char *logfile,char *buffer, int len) * * Genera en una bitacora todo lo quepasa por la conexion. * */ void spylog(FILE *logfile, char *buffer,int len); /* * int do_gate(int fd, char *nombrehost, int puerto, int debug) * * regresa estatus del exito * * fd socket server (non blocking) * nombrehost * puerto * debug * */ int do_gate(int fd,char *nombrehost, int puerto,int debug); /* * int setNoblock (int fd) * * Regresa el resultado de fcntl y de ioctl * La entrada es un socket. * */ int setNonBlock(int fd,int debug); /* void sigIntManager(int signo) * Called when a sig INT is received */ void sigIntManager(int signo); tunnel-1.0/Makefile0100664000076400007640000000034310153437636013360 0ustar frezhfrezhtunnel: tunnel.o gcc tunnel.o netman.o myerrata.o -o tunnel tunnel.o: netman.o myerrata.o gcc -c tunnel.c netman.o: myerrata.o gcc -c netman.c myerrata.o: gcc -c myerrata.c clean: rm myerrata.o netman.o tunnel.o tunnel tunnel-1.0/myerrata.h0100664000076400007640000000015510153437600013705 0ustar frezhfrezh#include #include #include "config.h" void errata(char *QuePaso,int debug,int level); tunnel-1.0/myerrata.c0100664000076400007640000000041310153427550013700 0ustar frezhfrezh#include #include #define GETHOSTBY 1 void errata(char *QuePaso,int debug,int level){ if (!QuePaso){ // QuePaso vacio... if (level<=debug) printf("--> %i\n",level); }else{ if (level<=debug) printf("%s : %i , %i\n",QuePaso,debug,level); } } tunnel-1.0/netman.c0100664000076400007640000002122710153451630013340 0ustar frezhfrezh#include #include #include #include #include #include #include #include #include #include #include "myerrata.h" // errata(char *,int debug, int level)); #include "config.h" #include "netman.h" extern int errno,h_errno; /* Indica fin senalpa terminar */ int sigIntReceived = 0; /* * int setDaemon(int debug) * * regresa estado de exito o fracaso * debug * */ int setDaemon(int debug){ pid_t pid; int i; for (i=0;i<2;i++){ switch((pid=fork())){ case -1: errata("Error an fork.",debug,1); break; case 0: if(i>=1){ errata("forking listo !",debug,2); setsid(); umask(0); chdir("/"); } break; default: exit(1); } } } /* * int gateway(char *nombrehost,int puerto,int debug) * char *nombrehost .- Nombre del host al que redireccionar connexion. * int puerto .- Puerto al que redireccionar. * int debug .- Nivel de comentarios : * -2 Modo ErrTerm.- Corre en modo daemon, y termina ejecucion en caso de error. * -1 Modo Daemon .- Corre silencioso en modo daemon. * 0 Silencio.- Corre sin comentarios en una terminal. * 1 Errores .- Despliega errores. * 2 Super Verbose .- Muestra paso a paso la corrida del programa. * * Returns .- Regresa el estatus de error, entero que indica parte donde trono el codigo. * */ int gateway(char *nombrehost,int puerto,int debug){ // Abrir Servidor en puerto LOCALPORT // Aceptar y lanzar do_gate() que es donde se llelva la accion. // Preparacion del Server struct sockaddr_in sin, fsin; // Ver si los podemos reciclar int s, ssock, alen; if (debug<0){ setDaemon(debug); } sin.sin_family = AF_INET; sin.sin_addr.s_addr = htonl(INADDR_ANY); sin.sin_port = htons(LOCALPORT); // Aca escucharemos // Comeinza manejo de excepciones if(getHostAddr(nombrehost,debug)<=0){ errata("NombreHost invalido.",debug,1); return -1; }else if ((s=socket(PF_INET, SOCK_STREAM,0))<0){//crear socket // Nivel de error errata("No se pudo crear el socket.",debug,1); return -1;// no se puede recobrar. }else if(bind(s,(struct sockaddr*)&sin,sizeof(sin))<0){ //Asignar direccion. // Nivel de error errata("Fallo bind o setNonBlock al asignar direccion.",debug,1); return -1;// Irrecobrable. }else if(listen(s,BACKLOG)<0){ // Nivel de error errata("No podemos escuchar en el socket.",debug,1); return -1; // No hay mas alla... }else{// Si todo chido iniciar modo concurrente multiproceso ! signal(SIGCHLD,SIG_IGN); while(1){ alen = sizeof(fsin); if ((ssock=accept(s,(struct sockaddr *)&fsin,&alen))<0){ if(errno==EINTR){ errata("errno == EINTR",debug,2); continue; } errata("No Acepte Conexion",debug,1); } // Hacer multiproceso switch(fork()){ case -1: errata("Proceso Infertil : (...",debug,1); printf("kill -9 %i\n",getpid()); break; case 0: errata("Creando hijo !",debug,2); close(s); return do_gate(ssock,nombrehost,puerto,debug); default: close(ssock); break; } } } } /* * struct hostent *getHostAddr(char *nombrehost,int debug) * * Devuelve un hostent, -1 en error * * nomnbre host puede ser una direccion en notacion punto o * un nombre de dominio * */ struct hostent *getHostAddr(char *nombrehost,int debug){ struct hostent *onHost; struct in_addr *twHost; unsigned long int addr; char erata[50]; errata("Entrando a getHostAddr.",debug,2); if (nombrehost == NULL){ // Ojo con esto ! nombrehost=(char *)calloc(13,sizeof(char)); strcpy(nombrehost,"localhost"); } if ((inet_aton(nombrehost,twHost))==0){ // Resolver nombre... if((onHost = gethostbyname(nombrehost))==0){ errata("Error en gethostbyname.",debug,1); return (struct hostent *)-1; } }else{ // Resolver Direccion ... addr=inet_ntoa(twHost); if ((onHost=gethostbyaddr((char *)&addr,sizeof (addr),AF_INET))==0){ errata("Error en gethostbyaddr.",debug,1); return (struct hostent *)-1; } } sprintf(erata,"Host > %s",inet_ntoa(*(struct in_addr *)onHost->h_addr_list[0])); errata(erata,debug,2); return onHost; } /* * int openRemote(char *nombrehost,int puerto, int debug) * * regresa un descriptor de socket * 0 o menor a 0 si hay error * * nombrehost es una cadena con el nombre del host * puerto es puerto donde se abrira la conexion * debug pasa el estado de debug * * Nota : Implementar reconocimiento de IP ardres o nombre host * */ int openRemote(char *nombrehost,int puerto,int debug){ int sock; struct sockaddr_in remoto; struct hostent *door; char erata[50]; door = getHostAddr(nombrehost,debug); if (door<=0){ errata("Error en getHostAddr",debug,1); return -1; } if((sock=socket(PF_INET,SOCK_STREAM,0))<0){ errata("Error al crear socket remoto",debug,1); return -1; } remoto.sin_family=AF_INET; memcpy((char *)&remoto.sin_addr,(char *)door->h_addr,door->h_length); remoto.sin_port = htons(puerto); if(connect(sock,(struct sockaddr *)&remoto,sizeof(remoto))<0){ errata("Fallo al hacer tunel paso 1.",debug,1); close (sock); return -1; } sprintf(erata,"Abierto : %s %i",door->h_name,puerto); errata(erata,debug,2); return sock; } /* * int osmosis(int obj,int src,int debug) * * Poner la entrada de src en la salida del obj * y viceversa. * * regresa estatus de exito o error * * obj Descriptor en non blocking mode. * Es el destino del tunnel * scr Descriptor en non blocking mode. * Es el originador del servicio * debug * */ int osmosis(int obj, int src,int debug){ char rswp[CHUNK_MAX+1],rbuf[CHUNK_MAX],filelog[256]; int Total=0,cw=0,cr=0, retsel; fd_set *rfds; struct timeval tv; /* Apuntador de bitacora */ FILE *spyfile; if (SPYMODE>0){ sprintf(filelog,"%s%i.log",FILELOG,getpid()); spyfile = fopen(filelog,"a"); errata (filelog,debug,2); } if ((obj<=0)&&(src<=0)){ errata("Descriptores no validos para osmosis.",debug,1); return -1; }else { do{ /*FD_ZERO(&rfds); FD_SET(obj,&rfds); FD_SET(src,&rfds); tv.tv_sec = 0; tv.tv_sec = 100; retsel=select(2,&rfds,NULL,NULL,&tv); if((retsel)&&(FD_ISSET(obj,&rfds)))*/ cr = read(obj,rbuf,CHUNK_MAX); Total+=cr; cw = write(src,rbuf,cr); if ((SPYMODE>0) && (spyfile != NULL)){ spylog(spyfile,rbuf,cr); } /*if((retsel)&&(FD_ISSET(src,&rfds)))*/ cr = read(src,rbuf,CHUNK_MAX); Total+=cr; cw= write(obj,rbuf,cr); if ((SPYMODE>0) && (spyfile != NULL)){ spylog(spyfile,rbuf,cr); } }while(sigIntReceived == 0); } if (spyfile) fclose(spyfile); realloc(rbuf,50); sprintf(rbuf,"Osmosis dejo pasar : %i bytes.",Total); errata(rbuf,debug,2); return Total; } /* * void spylog(char *logfile,char *buffer, int len) * * Genera en una bitacora todo lo quepasa por la conexion. * */ void spylog(FILE *fd, char *buffer,int len){ char *final; if(len>0){ final = (char *)malloc(len+1); strncpy(final,buffer,len); if (fd != NULL){ fprintf(fd,"%s",final); } } } /* * int do_gate(int fd, char *nombrehost, int puerto, int debug) * * regresa estatus del exito * * fd socket server (non blocking) * nombrehost * puerto * debug * */ int do_gate(int fd,char *nombrehost, int puerto,int debug){ // Recivir socket, abrir camino, y comunicarlos // Intento 1... usar sockets en modo no bloqueante dentro de un loop. int tfd; errata("Crear Gateway",debug,2); if (setNonBlock(fd,debug)<0){ // Hacerlo no Vlokiante : ) errata("Error poniendo en modo O_NONBLOCK el socket server.",debug,1); close(fd); return (-1); // Este hijo ha de morir si setNonBlock falla } // Abrir remoto como cliente if ((tfd = openRemote(nombrehost,puerto,debug))<0){ errata("Error en openRemote.",debug,1); close(tfd); return (-1); }else if (setNonBlock(tfd,debug)<0){ errata("Error poniendo en modo O_NONBLOCK el socket remoto.",debug,1); close(tfd); return(-1); } // Pasar datos del tunnel por osmosis !!! return osmosis(tfd,fd,debug); } /* * int setNoblock (int fd) * * Regresa el resultado de fcntl y de ioctl * La entrada es un socket. * */ int setNonBlock(int fd,int debug){ int flags; errata ("Socket en NON BLOCKING MODE",debug,2); #if defined(O_NONBLOCK) // Ojo con SunOS, O_NONBLOCK ta roto... if((flags=fcntl(fd,F_GETFL,0))==-1) // Leer las banderas flags=0; return fcntl(fd,F_SETFL,flags | O_NONBLOCK);//Agregar las banderas bit a bit #else // Si no esta definido a la antiguita... flags = 1; return ioctl(fd,FIOBIO,&flags); #endif } /* void sigIntManager(int signo) * Called when a sig INT is received */ void sigIntManager(int signo){ /*errata ("Cerrando logs...",debug,2);*/ errata ("Terminando ciclos...",DEFAULTDEBUG,2); sigIntReceived++; if (sigIntReceived >= 2){ exit(1); } } tunnel-1.0/config.h0100664000076400007640000000066010153444320013324 0ustar frezhfrezh /* tunnel.c used */ #define DEFAULTPORT 23 // telnet #define DEFAULTDEBUG 2 /******************/ /* netman.c used */ #define FILELOG "/home/frezh/tesis/tech/kannel_tunnel_spy/tunnel-1.0/tunnelspy" #define CHUNK_MAX 1 #define LOCALPORT 9999 #define BACKLOG 2 // Maximo de conexiones en espera del accept (varia segun kernel) #define SPYMODE 1 /*****************/ /* myerrata.h used */ #define GETHOSTBY 1 /*******************/ tunnel-1.0/tunnel.c0100664000076400007640000000105510153446537013372 0ustar frezhfrezh#include #include #include "netman.h" #include "config.h" int main(int argc, char **argv){ signal(SIGINT, sigIntManager); if (argc<2){ printf("Status del Gateway : %i\n",gateway(NULL,DEFAULTPORT,DEFAULTDEBUG)); }else if (argc < 3){ printf("Status del Gateway : %i\n",gateway(argv[1],DEFAULTPORT,DEFAULTDEBUG)); }else if (argc < 4){ printf("Status del Gateway : %i\n",gateway(argv[1],atoi(argv[2]),DEFAULTDEBUG)); }else if (argc < 5){ printf("Status del Gateway : %i\n",gateway(argv[1],atoi(argv[2]),atoi(argv[3]))); } } tunnel-1.0/README0100664000076400007640000000000010153446775012572 0ustar frezhfrezh