476 lines
		
	
	
		
			14 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			476 lines
		
	
	
		
			14 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
| /*
 | |
|  * tinyhttpd tiny http server
 | |
|  *
 | |
|  * @build    make examples
 | |
|  *
 | |
|  * @server   bin/tinyhttpd 8000
 | |
|  *
 | |
|  * @client   bin/curl -v http://127.0.0.1:8000/
 | |
|  *           bin/curl -v http://127.0.0.1:8000/ping
 | |
|  *           bin/curl -v http://127.0.0.1:8000/echo -d "hello,world!"
 | |
|  *
 | |
|  * @webbench bin/wrk  http://127.0.0.1:8000/ping
 | |
|  *
 | |
|  */
 | |
| 
 | |
| #include "hv.h"
 | |
| #include "hloop.h"
 | |
| 
 | |
| /*
 | |
|  * workflow:
 | |
|  * hloop_new -> hloop_create_tcp_server -> hloop_run ->
 | |
|  * on_accept -> HV_ALLOC(http_conn_t) -> hio_readline ->
 | |
|  * on_recv -> parse_http_request_line -> hio_readline ->
 | |
|  * on_recv -> parse_http_head -> ...  -> hio_readbytes(content_length) ->
 | |
|  * on_recv -> on_request -> http_reply-> hio_write -> hio_close ->
 | |
|  * on_close -> HV_FREE(http_conn_t)
 | |
|  *
 | |
|  */
 | |
| 
 | |
| static const char* host = "0.0.0.0";
 | |
| static int port = 8000;
 | |
| static int thread_num = 1;
 | |
| static hloop_t*  accept_loop = NULL;
 | |
| static hloop_t** worker_loops = NULL;
 | |
| 
 | |
| #define HTTP_KEEPALIVE_TIMEOUT  60000 // ms
 | |
| #define HTTP_MAX_URL_LENGTH     256
 | |
| #define HTTP_MAX_HEAD_LENGTH    1024
 | |
| 
 | |
| #define HTML_TAG_BEGIN  "<html><body><center><h1>"
 | |
| #define HTML_TAG_END    "</h1></center></body></html>"
 | |
| 
 | |
| // status_message
 | |
| #define HTTP_OK         "OK"
 | |
| #define NOT_FOUND       "Not Found"
 | |
| #define NOT_IMPLEMENTED "Not Implemented"
 | |
| 
 | |
| // Content-Type
 | |
| #define TEXT_PLAIN      "text/plain"
 | |
| #define TEXT_HTML       "text/html"
 | |
| 
 | |
| typedef enum {
 | |
|     s_begin,
 | |
|     s_first_line,
 | |
|     s_request_line = s_first_line,
 | |
|     s_status_line = s_first_line,
 | |
|     s_head,
 | |
|     s_head_end,
 | |
|     s_body,
 | |
|     s_end
 | |
| } http_state_e;
 | |
| 
 | |
| typedef struct {
 | |
|     // first line
 | |
|     int             major_version;
 | |
|     int             minor_version;
 | |
|     union {
 | |
|         // request line
 | |
|         struct {
 | |
|             char method[32];
 | |
|             char path[HTTP_MAX_URL_LENGTH];
 | |
|         };
 | |
|         // status line
 | |
|         struct {
 | |
|             int  status_code;
 | |
|             char status_message[64];
 | |
|         };
 | |
|     };
 | |
|     // headers
 | |
|     char        host[64];
 | |
|     int         content_length;
 | |
|     char        content_type[64];
 | |
|     unsigned    keepalive:  1;
 | |
| //  char        head[HTTP_MAX_HEAD_LENGTH];
 | |
| //  int         head_len;
 | |
|     // body
 | |
|     char*       body;
 | |
|     int         body_len; // body_len = content_length
 | |
| } http_msg_t;
 | |
| 
 | |
| typedef struct {
 | |
|     hio_t*          io;
 | |
|     http_state_e    state;
 | |
|     http_msg_t      request;
 | |
|     http_msg_t      response;
 | |
|     // for http_serve_file
 | |
|     FILE*           fp;
 | |
|     hbuf_t          filebuf;
 | |
| } http_conn_t;
 | |
| 
 | |
| static char s_date[32] = {0};
 | |
| static void update_date(htimer_t* timer) {
 | |
|     uint64_t now = hloop_now(hevent_loop(timer));
 | |
|     gmtime_fmt(now, s_date);
 | |
| }
 | |
| 
 | |
| static int http_response_dump(http_msg_t* msg, char* buf, int len) {
 | |
|     int offset = 0;
 | |
|     // status line
 | |
|     offset += snprintf(buf + offset, len - offset, "HTTP/%d.%d %d %s\r\n", msg->major_version, msg->minor_version, msg->status_code, msg->status_message);
 | |
|     // headers
 | |
|     offset += snprintf(buf + offset, len - offset, "Server: libhv/%s\r\n", hv_version());
 | |
|     offset += snprintf(buf + offset, len - offset, "Connection: %s\r\n", msg->keepalive ? "keep-alive" : "close");
 | |
|     if (msg->content_length > 0) {
 | |
|         offset += snprintf(buf + offset, len - offset, "Content-Length: %d\r\n", msg->content_length);
 | |
|     }
 | |
|     if (*msg->content_type) {
 | |
|         offset += snprintf(buf + offset, len - offset, "Content-Type: %s\r\n", msg->content_type);
 | |
|     }
 | |
|     if (*s_date) {
 | |
|         offset += snprintf(buf + offset, len - offset, "Date: %s\r\n", s_date);
 | |
|     }
 | |
|     // TODO: Add your headers
 | |
|     offset += snprintf(buf + offset, len - offset, "\r\n");
 | |
|     // body
 | |
|     if (msg->body && msg->content_length > 0) {
 | |
|         memcpy(buf + offset, msg->body, msg->content_length);
 | |
|         offset += msg->content_length;
 | |
|     }
 | |
|     return offset;
 | |
| }
 | |
| 
 | |
| static int http_reply(http_conn_t* conn,
 | |
|             int status_code, const char* status_message,
 | |
|             const char* content_type,
 | |
|             const char* body, int body_len) {
 | |
|     http_msg_t* req  = &conn->request;
 | |
|     http_msg_t* resp = &conn->response;
 | |
|     resp->major_version = req->major_version;
 | |
|     resp->minor_version = req->minor_version;
 | |
|     resp->status_code = status_code;
 | |
|     if (status_message) strncpy(resp->status_message, status_message, sizeof(req->status_message) - 1);
 | |
|     if (content_type)   strncpy(resp->content_type, content_type, sizeof(req->content_type) - 1);
 | |
|     resp->keepalive = req->keepalive;
 | |
|     if (body) {
 | |
|         if (body_len <= 0) body_len = strlen(body);
 | |
|         resp->content_length = body_len;
 | |
|         resp->body = (char*)body;
 | |
|     }
 | |
|     char* buf = NULL;
 | |
|     STACK_OR_HEAP_ALLOC(buf, HTTP_MAX_HEAD_LENGTH + resp->content_length, HTTP_MAX_HEAD_LENGTH + 1024);
 | |
|     int msglen = http_response_dump(resp, buf, HTTP_MAX_HEAD_LENGTH + resp->content_length);
 | |
|     int nwrite = hio_write(conn->io, buf, msglen);
 | |
|     STACK_OR_HEAP_FREE(buf);
 | |
|     return nwrite < 0 ? nwrite : msglen;
 | |
| }
 | |
| 
 | |
| static void http_send_file(http_conn_t* conn) {
 | |
|     if (!conn || !conn->fp) return;
 | |
|     // alloc filebuf
 | |
|     if (!conn->filebuf.base) {
 | |
|         conn->filebuf.len = 4096;
 | |
|         HV_ALLOC(conn->filebuf, conn->filebuf.len);
 | |
|     }
 | |
|     char* filebuf = conn->filebuf.base;
 | |
|     size_t filebuflen = conn->filebuf.len;
 | |
|     // read file
 | |
|     int nread = fread(filebuf, 1, filebuflen, conn->fp);
 | |
|     if (nread <= 0) {
 | |
|         // eof or error
 | |
|         hio_close(conn->io);
 | |
|         return;
 | |
|     }
 | |
|     // send file
 | |
|     hio_write(conn->io, filebuf, nread);
 | |
| }
 | |
| 
 | |
| static void on_write(hio_t* io, const void* buf, int writebytes) {
 | |
|     if (!io) return;
 | |
|     if (!hio_write_is_complete(io)) return;
 | |
|     http_conn_t* conn = (http_conn_t*)hevent_userdata(io);
 | |
|     http_send_file(conn);
 | |
| }
 | |
| 
 | |
| static int http_serve_file(http_conn_t* conn) {
 | |
|     http_msg_t* req = &conn->request;
 | |
|     http_msg_t* resp = &conn->response;
 | |
|     // GET / HTTP/1.1\r\n
 | |
|     const char* filepath = req->path + 1;
 | |
|     // homepage
 | |
|     if (*filepath == '\0') {
 | |
|         filepath = "index.html";
 | |
|     }
 | |
|     // open file
 | |
|     conn->fp = fopen(filepath, "rb");
 | |
|     if (!conn->fp) {
 | |
|         http_reply(conn, 404, NOT_FOUND, TEXT_HTML, HTML_TAG_BEGIN NOT_FOUND HTML_TAG_END, 0);
 | |
|         return 404;
 | |
|     }
 | |
|     // send head
 | |
|     size_t filesize = hv_filesize(filepath);
 | |
|     resp->content_length = filesize;
 | |
|     const char* suffix = hv_suffixname(filepath);
 | |
|     const char* content_type = NULL;
 | |
|     if (strcmp(suffix, "html") == 0) {
 | |
|         content_type = TEXT_HTML;
 | |
|     } else {
 | |
|         // TODO: set content_type by suffix
 | |
|     }
 | |
|     hio_setcb_write(conn->io, on_write);
 | |
|     int nwrite = http_reply(conn, 200, "OK", content_type, NULL, 0);
 | |
|     if (nwrite < 0) return nwrite; // disconnected
 | |
|     return 200;
 | |
| }
 | |
| 
 | |
| static bool parse_http_request_line(http_conn_t* conn, char* buf, int len) {
 | |
|     // GET / HTTP/1.1
 | |
|     http_msg_t* req = &conn->request;
 | |
|     sscanf(buf, "%s %s HTTP/%d.%d", req->method, req->path, &req->major_version, &req->minor_version);
 | |
|     if (req->major_version != 1) return false;
 | |
|     if (req->minor_version == 1) req->keepalive = 1;
 | |
|     // printf("%s %s HTTP/%d.%d\r\n", req->method, req->path, req->major_version, req->minor_version);
 | |
|     return true;
 | |
| }
 | |
| 
 | |
| static bool parse_http_head(http_conn_t* conn, char* buf, int len) {
 | |
|     http_msg_t* req = &conn->request;
 | |
|     // Content-Type: text/html
 | |
|     const char* key = buf;
 | |
|     const char* val = buf;
 | |
|     char* delim = strchr(buf, ':');
 | |
|     if (!delim) return false;
 | |
|     *delim = '\0';
 | |
|     val = delim + 1;
 | |
|     // trim space
 | |
|     while (*val == ' ') ++val;
 | |
|     // printf("%s: %s\r\n", key, val);
 | |
|     if (stricmp(key, "Content-Length") == 0) {
 | |
|         req->content_length = atoi(val);
 | |
|     } else if (stricmp(key, "Content-Type") == 0) {
 | |
|         strncpy(req->content_type, val, sizeof(req->content_type) - 1);
 | |
|     } else if (stricmp(key, "Connection") == 0) {
 | |
|         if (stricmp(val, "close") == 0) {
 | |
|             req->keepalive = 0;
 | |
|         }
 | |
|     } else {
 | |
|         // TODO: save other head
 | |
|     }
 | |
|     return true;
 | |
| }
 | |
| 
 | |
| static int on_request(http_conn_t* conn) {
 | |
|     http_msg_t* req = &conn->request;
 | |
|     // TODO: router
 | |
|     if (strcmp(req->method, "GET") == 0) {
 | |
|         // GET /ping HTTP/1.1\r\n
 | |
|         if (strcmp(req->path, "/ping") == 0) {
 | |
|             http_reply(conn, 200, "OK", TEXT_PLAIN, "pong", 4);
 | |
|             return 200;
 | |
|         } else {
 | |
|             // TODO: Add handler for your path
 | |
|         }
 | |
|         return http_serve_file(conn);
 | |
|     } else if (strcmp(req->method, "POST") == 0) {
 | |
|         // POST /echo HTTP/1.1\r\n
 | |
|         if (strcmp(req->path, "/echo") == 0) {
 | |
|             http_reply(conn, 200, "OK", req->content_type, req->body, req->content_length);
 | |
|             return 200;
 | |
|         } else {
 | |
|             // TODO: Add handler for your path
 | |
|         }
 | |
|     } else {
 | |
|         // TODO: handle other method
 | |
|     }
 | |
|     http_reply(conn, 501, NOT_IMPLEMENTED, TEXT_HTML, HTML_TAG_BEGIN NOT_IMPLEMENTED HTML_TAG_END, 0);
 | |
|     return 501;
 | |
| }
 | |
| 
 | |
| static void on_close(hio_t* io) {
 | |
|     // printf("on_close fd=%d error=%d\n", hio_fd(io), hio_error(io));
 | |
|     http_conn_t* conn = (http_conn_t*)hevent_userdata(io);
 | |
|     if (conn) {
 | |
|         if (conn->fp) {
 | |
|             // close file
 | |
|             fclose(conn->fp);
 | |
|             conn->fp = NULL;
 | |
|         }
 | |
|         // free filebuf
 | |
|         HV_FREE(conn->filebuf.base);
 | |
|         HV_FREE(conn);
 | |
|         hevent_set_userdata(io, NULL);
 | |
|     }
 | |
| }
 | |
| 
 | |
| static void on_recv(hio_t* io, void* buf, int readbytes) {
 | |
|     char* str = (char*)buf;
 | |
|     // printf("on_recv fd=%d readbytes=%d\n", hio_fd(io), readbytes);
 | |
|     // printf("%.*s", readbytes, str);
 | |
|     http_conn_t* conn = (http_conn_t*)hevent_userdata(io);
 | |
|     http_msg_t* req = &conn->request;
 | |
|     switch (conn->state) {
 | |
|     case s_begin:
 | |
|         // printf("s_begin");
 | |
|         conn->state = s_first_line;
 | |
|     case s_first_line:
 | |
|         // printf("s_first_line\n");
 | |
|         if (readbytes < 2) {
 | |
|             fprintf(stderr, "Not match \r\n!");
 | |
|             hio_close(io);
 | |
|             return;
 | |
|         }
 | |
|         str[readbytes - 2] = '\0';
 | |
|         if (parse_http_request_line(conn, str, readbytes - 2) == false) {
 | |
|             fprintf(stderr, "Failed to parse http request line:\n%s\n", str);
 | |
|             hio_close(io);
 | |
|             return;
 | |
|         }
 | |
|         // start read head
 | |
|         conn->state = s_head;
 | |
|         hio_readline(io);
 | |
|         break;
 | |
|     case s_head:
 | |
|         // printf("s_head\n");
 | |
|         if (readbytes < 2) {
 | |
|             fprintf(stderr, "Not match \r\n!");
 | |
|             hio_close(io);
 | |
|             return;
 | |
|         }
 | |
|         if (readbytes == 2 && str[0] == '\r' && str[1] == '\n') {
 | |
|             conn->state = s_head_end;
 | |
|         } else {
 | |
|             str[readbytes - 2] = '\0';
 | |
|             if (parse_http_head(conn, str, readbytes - 2) == false) {
 | |
|                 fprintf(stderr, "Failed to parse http head:\n%s\n", str);
 | |
|                 hio_close(io);
 | |
|                 return;
 | |
|             }
 | |
|             hio_readline(io);
 | |
|             break;
 | |
|         }
 | |
|     case s_head_end:
 | |
|         // printf("s_head_end\n");
 | |
|         if (req->content_length == 0) {
 | |
|             conn->state = s_end;
 | |
|             goto s_end;
 | |
|         } else {
 | |
|             // start read body
 | |
|             conn->state = s_body;
 | |
|             // WARN: too large content_length should read multiple times!
 | |
|             hio_readbytes(io, req->content_length);
 | |
|             break;
 | |
|         }
 | |
|     case s_body:
 | |
|         // printf("s_body\n");
 | |
|         req->body = str;
 | |
|         req->body_len += readbytes;
 | |
|         if (req->body_len == req->content_length) {
 | |
|             conn->state = s_end;
 | |
|         } else {
 | |
|             // WARN: too large content_length should be handled by streaming!
 | |
|             break;
 | |
|         }
 | |
|     case s_end:
 | |
| s_end:
 | |
|         // printf("s_end\n");
 | |
|         // received complete request
 | |
|         on_request(conn);
 | |
|         if (hio_is_closed(io)) return;
 | |
|         if (req->keepalive) {
 | |
|             // Connection: keep-alive\r\n
 | |
|             // reset and receive next request
 | |
|             memset(&conn->request,  0, sizeof(http_msg_t));
 | |
|             memset(&conn->response, 0, sizeof(http_msg_t));
 | |
|             conn->state = s_first_line;
 | |
|             hio_readline(io);
 | |
|         } else {
 | |
|             // Connection: close\r\n
 | |
|             hio_close(io);
 | |
|         }
 | |
|         break;
 | |
|     default: break;
 | |
|     }
 | |
| }
 | |
| 
 | |
| static void new_conn_event(hevent_t* ev) {
 | |
|     hloop_t* loop = ev->loop;
 | |
|     hio_t* io = (hio_t*)hevent_userdata(ev);
 | |
|     hio_attach(loop, io);
 | |
| 
 | |
|     /*
 | |
|     char localaddrstr[SOCKADDR_STRLEN] = {0};
 | |
|     char peeraddrstr[SOCKADDR_STRLEN] = {0};
 | |
|     printf("tid=%ld connfd=%d [%s] <= [%s]\n",
 | |
|             (long)hv_gettid(),
 | |
|             (int)hio_fd(io),
 | |
|             SOCKADDR_STR(hio_localaddr(io), localaddrstr),
 | |
|             SOCKADDR_STR(hio_peeraddr(io), peeraddrstr));
 | |
|     */
 | |
| 
 | |
|     hio_setcb_close(io, on_close);
 | |
|     hio_setcb_read(io, on_recv);
 | |
|     hio_set_keepalive_timeout(io, HTTP_KEEPALIVE_TIMEOUT);
 | |
| 
 | |
|     http_conn_t* conn = NULL;
 | |
|     HV_ALLOC_SIZEOF(conn);
 | |
|     conn->io = io;
 | |
|     hevent_set_userdata(io, conn);
 | |
|     // start read first line
 | |
|     conn->state = s_first_line;
 | |
|     hio_readline(io);
 | |
| }
 | |
| 
 | |
| static hloop_t* get_next_loop() {
 | |
|     static int s_cur_index = 0;
 | |
|     if (s_cur_index == thread_num) {
 | |
|         s_cur_index = 0;
 | |
|     }
 | |
|     return worker_loops[s_cur_index++];
 | |
| }
 | |
| 
 | |
| static void on_accept(hio_t* io) {
 | |
|     hio_detach(io);
 | |
| 
 | |
|     hloop_t* worker_loop = get_next_loop();
 | |
|     hevent_t ev;
 | |
|     memset(&ev, 0, sizeof(ev));
 | |
|     ev.loop = worker_loop;
 | |
|     ev.cb = new_conn_event;
 | |
|     ev.userdata = io;
 | |
|     hloop_post_event(worker_loop, &ev);
 | |
| }
 | |
| 
 | |
| static HTHREAD_ROUTINE(worker_thread) {
 | |
|     hloop_t* loop = (hloop_t*)userdata;
 | |
|     hloop_run(loop);
 | |
|     return 0;
 | |
| }
 | |
| 
 | |
| static HTHREAD_ROUTINE(accept_thread) {
 | |
|     hloop_t* loop = (hloop_t*)userdata;
 | |
|     hio_t* listenio = hloop_create_tcp_server(loop, host, port, on_accept);
 | |
|     if (listenio == NULL) {
 | |
|         exit(1);
 | |
|     }
 | |
|     printf("tinyhttpd listening on %s:%d, listenfd=%d, thread_num=%d\n",
 | |
|             host, port, hio_fd(listenio), thread_num);
 | |
|     // NOTE: add timer to update date every 1s
 | |
|     htimer_add(loop, update_date, 1000, INFINITE);
 | |
|     hloop_run(loop);
 | |
|     return 0;
 | |
| }
 | |
| 
 | |
| int main(int argc, char** argv) {
 | |
|     if (argc < 2) {
 | |
|         printf("Usage: %s port [thread_num]\n", argv[0]);
 | |
|         return -10;
 | |
|     }
 | |
|     port = atoi(argv[1]);
 | |
|     if (argc > 2) {
 | |
|         thread_num = atoi(argv[2]);
 | |
|     } else {
 | |
|         thread_num = get_ncpu();
 | |
|     }
 | |
|     if (thread_num == 0) thread_num = 1;
 | |
| 
 | |
|     worker_loops = (hloop_t**)malloc(sizeof(hloop_t*) * thread_num);
 | |
|     for (int i = 0; i < thread_num; ++i) {
 | |
|         worker_loops[i] = hloop_new(HLOOP_FLAG_AUTO_FREE);
 | |
|         hthread_create(worker_thread, worker_loops[i]);
 | |
|     }
 | |
| 
 | |
|     accept_loop = hloop_new(HLOOP_FLAG_AUTO_FREE);
 | |
|     accept_thread(accept_loop);
 | |
|     return 0;
 | |
| }
 | 
