/******* http客戶端程序 httpclient.c ************/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <errno.h>
#include <unistd.h>
#include <netinet/in.h>
#include <limits.h>
#include <netdb.h>
#include <arpa/inet.h>
#include <ctype.h>

//////////////////////////////httpclient.c 開始///////////////////////////////////////////

/********************************************
功能：搜索字符串右邊起的第一個匹配字符
********************************************/
char * Rstrchr(char * s, char x)   {
   int i = strlen(s);
   if(!(*s))   return 0;
   while(s[i-1]) if(strchr(s + (i - 1), x))   return (s + (i - 1));   else i--;
   return 0;
}

/*********************************************************************
*********************************************************************/
int main(int argc, char *argv[])
{
   int sockfd;//創建客戶端套接字
   char buffer[1024];
   
   struct sockaddr_in server_addr;//服務器地址 
   struct hostent *host; //服務器主機信息 
   
   int portnumber,nbytes;
   
   char host_addr[256]="192.168.0.138";
   char host_file[1024]="2.htm";
   char local_file[256];
   FILE * fp;
   
   char request[1024];
   int send, totalsend;
   
   int i;
   char * pt;
   portnumber = 80; 
   
   printf("webhost:%s\n", host_addr);
   printf("hostfile:%s\n", host_file);
   printf("portnumber:%d\n\n", portnumber);



   if((host=gethostbyname(host_addr))==NULL)/*取得給定服務器主機的信息*/
   {
     fprintf(stderr,"Gethostname error, %s\n", strerror(errno));
     exit(1);
   }
//

   /* 客戶程序開始建立 sockfd描述符 */
   if((sockfd=socket(AF_INET,SOCK_STREAM,0))==-1)/*建立SOCKET連接*/
   {
     fprintf(stderr,"Socket Error:%s\a\n",strerror(errno));
     exit(1);
   }

   /* 客戶程序填充服務端的資料 */
   bzero(&server_addr,sizeof(server_addr));
   server_addr.sin_family=AF_INET;
   server_addr.sin_port=htons(portnumber);
   server_addr.sin_addr=*((struct in_addr *)host->h_addr);//服務器端地址 

   /* 客戶程序發起連接請求 */
   if(connect(sockfd,(struct sockaddr *)(&server_addr),sizeof(struct sockaddr))==-1)/*連接網站*/
   {
     fprintf(stderr,"Connect Error:%s\a\n",strerror(errno));
     exit(1);
   }

//填寫HTTP請求報文內容 
   sprintf(request, "GET /%s HTTP/1.1\r\nAccept: */*\r\nAccept-Language: zh-cn\r\n\
User-Agent: Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)\r\n\
Host: %s:%d\r\nConnection: Close\r\n\r\n", host_file/*請求的網頁文件名*/, host_addr/*主機域名*/, portnumber/*端口號*/);
//

   printf("%s", request);/*準備request，將要發送給主機*/

   /*取得真實的文件名*/
   if(host_file && *host_file)   pt = Rstrchr(host_file, '/');
   else pt = 0;

   memset(local_file, 0, sizeof(local_file));
   if(pt && *pt)   {
     if((pt + 1) && *(pt+1))   strcpy(local_file, pt + 1);
     else   memcpy(local_file, host_file, strlen(host_file) - 1);
   }
   else if(host_file && *host_file)   strcpy(local_file, host_file);
   else   strcpy(local_file, "index.html");
   printf("local filename to write:%s\n\n", local_file);//保存在本地文件 local_file中 

   /*發送http請求request*/
   send = 0;totalsend = 0;
   nbytes=strlen(request);
   while(totalsend < nbytes) {
     send = write(sockfd, request + totalsend, nbytes - totalsend);
     if(send==-1)   {printf("send error!%s\n", strerror(errno));exit(0);}
     totalsend+=send;
     printf("%d bytes send OK!\n", totalsend);
   }

   fp = fopen(local_file, "a");
   if(!fp)   {
     printf("create file error! %s\n", strerror(errno));
     return 0;
   }
   printf("\nThe following is the response header:\n");
   i=0;
   /* 連接成功了，接收http響應，response */
   while((nbytes=read(sockfd,buffer,1))==1)
   {
     if(i < 4)   {            //因為只有在HTTP響應結束的時候，才有出現連著4個回車換行的情況。
       if(buffer[0] == '\r' || buffer[0] == '\n')   i++;
       else i = 0;
       printf("%c", buffer[0]);/*把http頭信息打印在屏幕上*/
     }
     else   {
       fwrite(buffer, 1, 1, fp);/*將http主體信息寫入文件*/
       i++;
       if(i%1024 == 0)   fflush(fp);/*每1K時存盤一次*/
     }
   }
   fclose(fp);
   /* 結束通訊 */
   close(sockfd);
   exit(0);
}
//////////////////////////////httpclient.c 結束///////////////////////////////////////////