tftp服务器文件的上传与下载

#include <stdio.h>                       
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <string.h>
#include <unistd.h>
#include <sys/stat.h>
#include <fcntl.h>
#define ERR_MSG(msg) do{\
    fprintf(stderr,"line:%d",__LINE__);\
    perror(msg);\
}while(0)
#define PORT 69      //1026~49151
#define ip "192.168.31.213"  //本机IP

int do_download(int sfd,struct sockaddr_in sin);


int do_upload(int sfd,struct sockaddr_in sin);

int main(int argc, const char *argv[])
{
	if(argc<2)
	{
		fprintf(stderr,"请输入IP地址\n");
		return -1;
	}
	//创建报式套接字
	int sfd=socket(AF_INET,SOCK_DGRAM,0);
	if(sfd<0)
	{
		ERR_MSG("socket");
		return -1;
	}
	printf("socket create success sfd=%d\n",sfd); 

	//填充服务器的地址信息结构体
	//真是的地址信息结构体根据地址族执行，AF_INET:man 7 ip
	struct sockaddr_in sin;
	sin.sin_family =AF_INET;//必须填AF_INET
	sin.sin_port = htons(PORT);//端口号的网络字节序 1024~49151
	sin.sin_addr.s_addr = inet_addr(argv[1]);         //IP地址的网络字节序,ifconfig查
	
	char choose=0;
	while(1)
	{
		printf("----------------------------\n");
		printf("-----------1.下载-----------\n");
		printf("-----------2.上传-----------\n");
		printf("-----------3.退出-----------\n");
		printf("----------------------------\n");
		printf("请选择>>>");
		choose=getchar();
		while(getchar()!=10);

		switch(choose)
		{
		case '1':
			do_download(sfd,sin);
			break;
		case '2':
			do_upload(sfd,sin);
			break;
		case '3':
			goto END;
			break;
		default:
			printf("输入错误\n");
			break;
		}
	}
END:
	close(sfd);

	return 0;
}
//上传
int do_upload(int sfd,struct sockaddr_in sin)
{
	char buf[128]="";
	char filename[20]="";
	printf("请输入要上传的文件名>>>");
	scanf("%s",filename);
	while(getchar()!=10);
	//发送请求
	int size=sprintf(buf,"%c%c%s%c%s%c",0,2,filename,0,"octet",0);

	printf("__%d__\n",__LINE__);
	if(sendto(sfd,buf,size,0,(struct sockaddr*)&sin,sizeof(sin))<0)
	{
		ERR_MSG("sendto");
		return -1;
	}
	char cuf[516]="";
	struct sockaddr_in temp;
	socklen_t addrlen=sizeof(temp);
	ssize_t res=0;
	unsigned short num=0;
	recvfrom(sfd,cuf,sizeof(cuf),0,(struct sockaddr*)&temp,&addrlen);
	//	printf("%d %d",ntohs(*(unsigned short*)(test)),ntohs(*(unsigned short*)(test+2)));

	//向服务器上传文件
	int fd=-1;
	while(1)
	{
		if(4==cuf[1])
		{
			if(htons(num)==*(unsigned short*)(cuf+2))
			{
				num++;
				if(-1==fd)
				{
					fd=open(filename,O_RDONLY);
					if(fd<0)
					{
						ERR_MSG("open");
						return -1;
					}
				}
				bzero(cuf,sizeof(cuf));
				cuf[1]=3;
				*(unsigned short*)(cuf+2)=htons(num);
				//将文件中的数据读入字符串中
				res=read(fd,cuf+4,sizeof(cuf)-4);
				printf("%ld\n",res);
				if(res<0)
				{
					ERR_MSG("read");
					return -1;
				}
				//向服务器发送数据
				if(sendto(sfd,cuf,res+4,0,(struct sockaddr*)&temp,sizeof(temp))<0)
				{
					ERR_MSG("sendto");
					return -1;
				}

				for(int i=0;i<5;i++)
				{
					bzero(cuf,sizeof(cuf));
					if(recvfrom(sfd,cuf,sizeof(cuf),0,(struct sockaddr*)&temp,&addrlen)>0)
					{
						break;
					}
					sleep(1);
					read(fd,cuf+4,sizeof(cuf));
					sendto(sfd,cuf,res,0,(struct sockaddr*)&temp,sizeof(temp));
				}

				if(res<512)
				{
					printf("文件上传完毕\n");
					break;
				}
			}	

		}
		else if(5==cuf[1])//错误包
		{
			printf("MSG_ERR:code[%d] msg[%s] __%d__\n",ntohs(*(unsigned short*)(cuf+2)),cuf+4,__LINE__);
			return -1;

		}
	}
	close(fd);
	return 0;
}

int do_download(int sfd,struct sockaddr_in sin)
{

	char buf[128]="";
	char filename[20]="";
	printf("请输入要下载的文件名>>>");
	scanf("%s",filename);
	while(getchar()!=10);


	/*	unsigned short* p1=(unsigned short*)buf;
	 *p1=htons(1);
	 char* p2=buf+2;
	 strcpy(p2,"2.png");
	 char* p3=p2+strlen(p2);
	 *p3=0;
	 char* p4=p3+1;
	 strcpy(p4,"octet");
	 int size=2+strlen(p2)+1+strlen(p4)+1;
	 */
	//发送请求
	int size=sprintf(buf,"%c%c%s%c%s%c",0,1,filename,0,"octet",0);

	if(sendto(sfd,buf,size,0,(struct sockaddr*)&sin,sizeof(sin))<0)
	{
		ERR_MSG("sendto");
		return -1;
	}
	//本地需要打开一个文件下载
	int fd=-1;
	ssize_t res=0;
	unsigned short num=0;
	struct sockaddr_in temp;
	socklen_t addrlen=sizeof(temp);
	char cuf[516]="";
	//循环接收数据包，回复ACK；
	while(1)
	{
		bzero(cuf,sizeof(cuf));
		//读取服务器发送的协议
		//解析协议

		res=recvfrom(sfd,cuf,sizeof(cuf),0,(struct sockaddr*)&temp,&addrlen);
		if(res<0)
		{
			ERR_MSG("recvfrom");
			return -1;
		}

		//操作码占两个字节的无符号整数，所以传输以大端传输
		//所有有效差错码，会存储在高地址上，即存储在buf[1]位置，buf[0]中存储是0

		if(3==cuf[1])//数据包
		{
			//UDP可能会出现数据重复，为了防止重复收包
			//本地记录一个服务器回过来的快编号，每次处理，先判断快编号是否正确
			if(htons(num+1)==*(unsigned short*)(cuf+2))
			{
				num++;
				if(-1==fd)
				{
					fd=open(filename,O_RDWR|O_CREAT|O_TRUNC,0664);
					if(fd<0)
					{
						ERR_MSG("open");
						return -1;
					}
				}
				//将数据写到文件中
				if(write(fd,cuf+4,res-4)<0)
				{
					ERR_MSG("write");
					return -1;
				}
				//回复ACK，数据包前四个字节与ACK包基本一致
				//操作码不同，直接将buf[1]改成4

				cuf[1]=4;
				if(sendto(sfd,cuf,4,0,(struct sockaddr*)&temp,sizeof(temp))<0)
				{
					ERR_MSG("sendto");
					return -1;
				}
				if(res-4<512)
				{
					printf("-----文件下载完毕-----\n");
					break;
				}
			}
		}
		else if(5==cuf[1])//错误包
		{
			printf("MSG_ERR:code[%d] msg[%s] __%d__\n",ntohs(*(unsigned short*)(cuf+2)),cuf+4,__LINE__);
			return -1;
		}
	}
	close(fd);
	return 0;
}