基于xinetd的web服务器

客官°小女子只卖身不卖艺 2022-08-13 15:57 116阅读 0赞

#include <sys/types.h>
    #include <sys/stat.h>
    #include <unistd.h>
    #include <stdlib.h>
    #include <string.h>
    #include <dirent.h>
    #include <ctype.h>
    #include <stdio.h>
    #include <time.h>
    
    #define SERVER_NAME "xhttpd"
    #define PROTOCOL "HTTP/1.1"
    #define SERVER_URL "http://www.akaedu.com/"
    #define	FORMAT_DATE "%a, %d %b %Y %H:%M:%S GMT"
    #define N 4096
    
    #ifdef DEBUG
    
    #define log(info, str)\
    	do{
    		fprintf(fp_tmp, "%s%s", info, str);
    		fflush(fp_tmp);
    	}while(0)
    
    /* put them in the right place.
    
    //fp_tmp = fopen(/home/akaedu/dir/log.text, "a");
    //log("argv[1]", argv[1]);
    //log("line:", line);
    
    */
    #endif
    
    static void send_headers(int status, char *title, char *extra_header, char *mime_type, off_t length, time_t mod);
    static void send_error(int status, char *title, char *extra_header, char *text);
    static void strencode(char *to, size_t tosize, const char *from);
    static void file_infos(char *dir, char *name);
    static void strdecode(char *to, char *from);
    static char *get_mime_type(char *name);
    static int hexit(char c);
    
    int main(int argc, char **argv)
    {
        char line[N*2], method[N*2], path[N*2], protocol[N*2], idx[N*4], location[N*4];
        char *file;
        size_t len;
        int ich, i, n;
        struct stat sb;
        FILE *fp;
        struct dirent **dl;
    
        if (argc != 2)
    		send_error(500, "Internal Error", NULL, "Config error - no dir specified.");
    
    	//xinetd启动时把根路径(xhttpd服务器文档的根目录)传给本程序,这步非常非常重要 
        if (chdir(argv[1]) < 0)
    		send_error(500, "Internal Error", NULL, "Config error - couldn't chdir().");
    
        //http协议第一行	e.g. GET /3.txt HTTP/1.1
        if (fgets(line, sizeof(line), stdin) == NULL)
    		send_error(400, "Bad Request", NULL, "No request found.");
    
        /* "%[^ ] %[^ ] %[^ ]" 将一行字符串按空格切割为三个子串
         应用举例：
    	 GET方法：在浏览器的地址栏中输入网址访问网页时，浏览器采用GET方法向服务器获取资源，
    	 eg:GET /form.html HTTP/1.1 
    	 method   = GET
    	 path     = /form.html
    	 protocol = HTTP/1.1
    	 返回值：成功返回实际读到的字段个数，失败返回-1
    	*/
        if (sscanf(line, "%[^ ] %[^ ] %[^ ]", method, path, protocol) != 3)
    		send_error(400, "Bad Request", NULL, "Can't parse request.");
    
    	//这里是读,直到读完或者空行
        while (fgets(line, sizeof(line), stdin) != NULL) {		//注意stdin被dup2至xinetd管道的读端
    		if (strcmp(line, "\n") == 0 || strcmp(line, "\r\n") == 0)
    			break;
    	}
    
    	//处理get方法，strcasecmp，忽略大小写
        if (strcasecmp(method, "GET") != 0)
    		send_error(501, "Not Implemented", NULL, "That method is not implemented.");
    
    	//path必须从‘/’开始。
        if (path[0] != '/')
    		send_error(400, "Bad Request", NULL, "Bad filename.");
    
    	//搞掉%20之类的东西
        file = &(path[1]);		//file = path+1
        strdecode(file, file);
    
        if (file[0] == '\0')
    		file = "./";
    
        len = strlen(file);
    
    	//检测是否为合法的文件格式
        if (file[0] == '/' || strcmp(file, "..") == 0 
    					   || strncmp(file, "../", 3) == 0 
    					   || strstr(file, "/../") != NULL
    					   || strcmp(&(file[len-3]), "/..") == 0)
    	{
    		send_error(400, "Bad Request", NULL, "Illegal filename.");
    	}
    
        //测试有无请求之文件，stat为获取指定目录位置文件file函数，sb为传出参数。
        if (stat(file, &sb) < 0)
    		send_error(404, "Not Found", NULL, "File not found.");
    		/*
    		 *404页面 当用户输入了错误的链接时,返回的页面,用户无法解决该错误
    		 *标准化可配置HTTP协议错误，定位在400到505之间
    		 *
    		 *1、无法在所请求的端口上访问Web站点
    		 *2、Web服务扩展锁定策略阻止本请求
    		 *3、MIME映射测略阻止本请求
    		 *
    		 */
    
    	//如果请求之路径为目录，则进入如下分支
        if (S_ISDIR(sb.st_mode)) {
    
    		if (file[len-1] != '/') {	//文件是目录类型，但不是以‘/’结尾
    	    	snprintf(location, sizeof(location), "Location: %s/", path); //结尾拼接‘/’
    	    	send_error(302, "Found", location, "Directories must end with a slash.");
    	    }
    	    //有index.html则处理之
    		snprintf(idx, sizeof(idx), "%sindex.html", file);
    		if (stat(idx, &sb) >= 0) {
    	    	file = idx;
    	    	goto do_file;	//如果有index.html则跳到do_file:
    	    }
    	    //否则应给出文件列表
    		send_headers(200, "Ok", NULL, "text/html", -1, sb.st_mtime);
    		
    		printf("<html><head><title>Index of %s</title></head>"
    		               "\n<body bgcolor=\"#99cc99\"><h4>Index of %s</h4>\n<pre>\n"
    		               , file, file);
    		/*
    		 *  int scandir(const char *dirp, 
    		 *				struct dirent ***namelist,
    		 *			    int (*filter)(const struct dirent *),
    		 *			    int (*compar)(const struct dirent **, const struct dirent **)
    		 *			   );
    		 *	依据匹配项目，扫描一个目录
    		 *	扫描dirp目录下(不包括子目录)满足filter过滤模式的文件,
    		 *  返回的结果是compare函数经过排序的，并保存在namelist中。
    		 *  
    		 *	scandir() 函数扫描目录 dirp，对每一个目录项（文件名）调用filter()。
    		 *	把每一个filter() 返回非零项目保存在一个通过malloc(3) 分配的缓存区里，
    		 *	再通过比较函数是compar() 的qsort(3) 函数排序，最后收集在namelist 的数组里，
    		 *	这个数组也是通过malloc(3) 分配的。如果filter 是 NULL，所有项目都被选择
    		 *
    		 *  alphasort和versionsort是使用到的两种排序的函数
    		 *
    		 *	scandir() 函数返回被选择的目录条数，或者如果出错返回 -1。
    		 */
    		n = scandir(file, &dl, NULL, alphasort);
    
    		if (n < 0)
    	    	perror("scandir");
    		else
    	    	for (i = 0; i < n; ++i)
    				file_infos(file, dl[i]->d_name);
    
    		printf("</pre>\n<hr>\n<address><a href=\"%s\">%s</a></address>\n</body></html>\n"
    		               , SERVER_URL, SERVER_NAME);
    	} else {					//所请求非目录而是一个文件
    
    do_file:
    		fp = fopen(file, "r");	//只读方式将文件打开
    		if (fp == (FILE*)0)
    	    	send_error(403, "Forbidden", NULL, "File is protected.");
    
    		//发送http协议头，200表示成功, OK是随便写的
    		send_headers(200, "Ok", NULL, get_mime_type(file), sb.st_size, sb.st_mtime);
    		while ((ich = getc(fp)) != EOF)
    	    	putchar(ich);
    	}
        fflush(stdout);
        exit(0);
    }
    
    //发送文件的详细数据,包括日期和时间
    static void file_infos(char *dir, char *name)
    {
        static char encoded_name[N];
        static char path[N];
        char timestr[16];
        struct stat sb;
    
        strencode(encoded_name, sizeof(encoded_name), name);
        snprintf(path, sizeof(path), "%s/%s", dir, name);
    
        if (lstat(path, &sb) < 0)
    		printf("<a href=\"%s\">%-32.32s</a>    ???\n", encoded_name, name);
        else {
    		strftime(timestr, sizeof(timestr), "%d%b%Y %H:%M", localtime(&sb.st_mtime));
    		printf("<a href=\"%s\">%-32.32s</a>    %15s %14lld\n", encoded_name, name, timestr, (int64_t)sb.st_size);
    	}
    	/*
    	 *size_t strftime(char *s, size_t max, const char *format,
    						const struct tm *tm);
    	 * 将当前系统的绝对时间，按格式输出。
    	 * format以百分号(%)开始的格式命令集合，格式化输出结果放在s中。
    	 *
    	 * %d 十进制表示的日期(01~31)
    	 * %b 月份英文单词的简写
    	 * %Y 带世纪部分的十进制年份
    	 * %H 24小时制的小时
    	 * %M 十进制表示的分钟数(00~59)
    	 */
    }
    /*
     *status:错误号
     *title: 错误名
     *text： 错误描述
     *extra_header:附加描述(特殊情况302时不退出程序，而直接显示正常页面)
     */
    static void send_error(int status, char* title, char* extra_header, char* text)
    {
        send_headers(status, title, extra_header, "text/html", -1, -1);
        printf("<html><head><title>%d %s</title></head>\n<body bgcolor=\"#cc9999\"><h4>%d %s</h4>\n", 
    			status, title, status, title);
    
        printf("%s\n", text);
        printf("<hr>\n<address><a href=\"%s\">%s</a></address>\n</body></html>\n", SERVER_URL, SERVER_NAME);
        fflush(stdout);
    
        exit(1);
    }
    
    /*
     *每个HTTP传送都包含一个首部、一个空行和要发送的数据项。
     *Content-Type:		数据项的类型(必选项)
     *Content-length:	数据项的大小
     *Content-Encoding:	数据项使用的编码方式
     *Content-Language:	数据项使用的语言
     *
     *首部中的每一行都包含一个关键字、一个冒号和信息。
     *e.g.
     *Content-Type: text/html; charset=iso-8859-1		指明属性的首部
     *Content-Length: 508
     *													这是一行空行
     *<html> 文档内容 </html>							数据项
     */
    
    static void
    send_headers(int status, char* title, char* extra_header, char* mime_type, off_t length, time_t mod)
    {
        time_t now;
        char timebuf[100];
    
        printf("%s %d %s\r\n", PROTOCOL, status, title);//HTTP/1.0 200 OK
        printf("Server: %s\r\n", SERVER_NAME);			//Server: xhttpd
        now = time((time_t*)0);
        strftime(timebuf, sizeof(timebuf), FORMAT_DATE, gmtime(&now));
        printf("Date: %s\r\n", timebuf);
    	// Date: Fri, 18 Jul 2014 14:34:26 GMT
    
        if (extra_header != NULL)
    		printf("%s\r\n", extra_header);
    
        if (mime_type != NULL)
    		printf("Content-Type: %s\r\n", mime_type);
    
        if (length >= 0)
    		printf("Content-Length: %lld\r\n", (int64_t)length);
    
        if (mod != (time_t)-1) {	//强转
    		strftime(timebuf, sizeof(timebuf), FORMAT_DATE, gmtime(&mod));
    		printf("Last-Modified: %s\r\n", timebuf);		
    	}
    	printf("Connection: close\r\n");
    	printf("\r\n");
    }
    
    static char *get_mime_type(char *name)
    {
        char* dot;
    
        dot = strrchr(name, '.');	//自右向左查找‘.’字符;如不存在返回NULL
    
    	/*
    	 *charset=iso-8859-1	西欧的编码，说明网站采用的编码是英文；
    	 *charset=gb2312		说明网站采用的编码是简体中文；
    	 *charset=utf-8			代表世界通用的语言编码；
         *						可以用到中文、韩文、日文等世界上所有语言编码上
    	 *charset=euc-kr		说明网站采用的编码是韩文；
    	 *charset=big5			说明网站采用的编码是繁体中文；
    	 *
    	 *以下是依据传递进来的文件名，使用后缀判断是何种文件类型
    	 *将对应的文件类型按照http定义的关键字发送回去
    	 */
        if (dot == (char*)0)
    		return "text/plain; charset=iso-8859-1";
        if (strcmp(dot, ".html") == 0 || strcmp(dot, ".htm") == 0)
    		return "text/html; charset=iso-8859-1";
        if (strcmp(dot, ".jpg") == 0 || strcmp(dot, ".jpeg") == 0)
    		return "image/jpeg";
        if (strcmp(dot, ".gif") == 0)
    		return "image/gif";
        if (strcmp(dot, ".png") == 0)
    		return "image/png";
        if (strcmp(dot, ".css") == 0)	
    		return "text/css";
        if (strcmp(dot, ".au") == 0)	
    		return "audio/basic";
        if (strcmp( dot, ".wav") == 0)
    		return "audio/wav";
        if (strcmp(dot, ".avi") == 0)
    		return "video/x-msvideo";
        if (strcmp(dot, ".mov") == 0 || strcmp(dot, ".qt") == 0)
    		return "video/quicktime";
        if (strcmp(dot, ".mpeg") == 0 || strcmp(dot, ".mpe") == 0)
    		return "video/mpeg";
        if (strcmp(dot, ".vrml") == 0 || strcmp(dot, ".wrl") == 0)	
    		return "model/vrml";
        if (strcmp(dot, ".midi") == 0 || strcmp(dot, ".mid") == 0)	
    		return "audio/midi";
        if (strcmp(dot, ".mp3") == 0)
    		return "audio/mpeg";
        if (strcmp(dot, ".ogg") == 0)	
    		return "application/ogg";
        if (strcmp(dot, ".pac") == 0)	
    		return "application/x-ns-proxy-autoconfig";
    
    	return "text/plain; charset=iso-8859-1";
    }
    
    /*
     * 这里的内容是处理%20之类的东西！是"解码"过程。
     * %20 URL编码中的‘ ’(space)
     * %21 '!' %22 '"' %23 '#' %24 '$'
     * %25 '%' %26 '&' %27 ''' %28 '('......
     *
     * 相关知识:html中的‘ ’(space)是 
     */
    static void strdecode(char *to, char *from)
    {
        for ( ; *from != '\0'; ++to, ++from) {
    	
    		if (from[0] == '%' && isxdigit(from[1]) && isxdigit(from[2])) {
    	    
    	    	*to = hexit(from[1])*16 + hexit(from[2]);
    	    	from += 2;//移过已经处理的两个字符(%21指针指向1),表达式3的++from还会再向后移一个字符
    	    } else
    	    	*to = *from;
    	}
        *to = '\0';
    }
    
    //16进制数转化为10进制, return 0不会出现 
    static int hexit(char c)
    {
        if (c >= '0' && c <= '9')
    		return c - '0';
        if (c >= 'a' && c <= 'f')
    		return c - 'a' + 10;
        if (c >= 'A' && c <= 'F')
    		return c - 'A' + 10;
    
        return 0;		
    }
    
    //"编码"，用作回写浏览器的时候，将除字母数字及/_.-~以外的字符转义后回写。
    //strencode(encoded_name, sizeof(encoded_name), name);
    static void strencode(char* to, size_t tosize, const char* from)
    {
        int tolen;
    
        for (tolen = 0; *from != '\0' && tolen + 4 < tosize; ++from) {
    		if (isalnum(*from) || strchr("/_.-~", *from) != (char*)0) {
    			*to = *from;
    			++to;
    			++tolen;
    		} else {
    			sprintf(to, "%%%02x", (int) *from & 0xff);	
    			to += 3;
    			tolen += 3;
    		}
    	}
        *to = '\0';
    }