#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/socket.h>
#include <sys/epoll.h>
#include <arpa/inet.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <unistd.h>
#include <errno.h>
#include <sys/time.h>
#include <sys/sendfile.h>
#define BUFFER_LENGTH 1024
#define MAX_EPOLL_EVENTS 1024
#define RESOURCE_LENGTH 1024
#define SERVER_PORT 8888
#define PORT_COUNT 1
typedef int NCALLBACK(int ,int, void*);
#define HTTP_METHOD_GET 0
#define HTTP_METHOD_POST 1
int curfds = 0;
#define TIME_SUB_MS(tv1, tv2) ((tv1.tv_sec - tv2.tv_sec) * 1000 + (tv1.tv_usec - tv2.tv_usec) / 1000)
struct timeval tv_begin;
#define HTTP_WEB_ROOT "/home/0Voice/practice/2_1_1_multi-io/index.html"
struct ntyevent {<!-- -->
int fd;
int events;
void *arg;
int (*callback)(int fd, int events, void *arg);
\t
int status;
char buffer[BUFFER_LENGTH];
\t
char wbuffer[BUFFER_LENGTH];
\t
int length;
int wlength;
//long last_active;
\t
// http reqeust
int method;
char resource[RESOURCE_LENGTH];
};
struct eventblock {<!-- -->
\t
struct eventblock *next;
struct ntyevent *events;
};
struct ntyreactor {<!-- -->
int epfd;
int blkcnt;
struct eventblock *evblks;
};
int recv_cb(int fd, int events, void *arg);
int send_cb(int fd, int events, void *arg);
struct ntyevent *ntyreactor_idx(struct ntyreactor *reactor, int sockfd);
void nty_event_set(struct ntyevent *ev, int fd, NCALLBACK callback, void *arg)
{<!-- -->
ev->fd = fd;
ev->callback = callback;
ev->events = 0;
ev->arg = arg;
//ev->last_active = time(NULL);
\t
return;
}
\t
int nty_event_add(int epfd, int events, struct ntyevent *ev)
{<!-- -->
struct epoll_event ep_ev = {<!-- -->0, {<!-- -->0}};
ep_ev.data.ptr = ev;
ep_ev.events = ev->events = events;
\t
int op;
if (ev->status == 1) {<!-- -->
op = EPOLL_CTL_MOD;
} else {<!-- -->
op = EPOLL_CTL_ADD;
ev->status = 1;
}
\t
if (epoll_ctl(epfd, op, ev->fd, &ep_ev) < 0) {<!-- -->
printf("event add failed [fd=%d], events[%d]\
", ev->fd, events);
return -1;
}
\t
return 0;
}
\t
int nty_event_del(int epfd, struct ntyevent *ev)
{<!-- -->
struct epoll_event ep_ev = {<!-- -->0, {<!-- -->0}};
if (ev->status != 1)
{<!-- -->
return -1;
}
\t
ep_ev.data.ptr = ev;
ev->status = 0;
epoll_ctl(epfd, EPOLL_CTL_DEL, ev->fd, &ep_ev);
\t
return 0;
}
// request
// location /0voice/king/index.html HTTP/1.1
int readline(char* allbuf, int idx, char* linebuf)
{<!-- -->
int len = strlen(allbuf);
\t
for (;idx < len; + + idx)
{<!-- -->
if(allbuf[idx]=='\r' & amp; & amp; allbuf[idx + 1]=='\
')
return idx + 2;
else
*(linebuf++) = allbuf[idx];
}
\t
return -1;
}
int nty_http_request(struct ntyevent *ev) {<!-- -->
char linebuffer[1024] = {<!-- -->0};
\t
int idx = readline(ev->buffer, 0, linebuffer);
if (strstr(linebuffer, "GET"))
{<!-- -->
ev->method = HTTP_METHOD_GET;
\t\t
int i = 0;
while(linebuffer[sizeof("GET") + i] != ' ')
i + + ;
linebuffer[sizeof("GET") + i] = '\0';
\t\t
//sprintf(ev->resource, "%s/%s", HTTP_WEB_ROOT, linebuffer + sizeof("GET "));
sprintf(ev->resource, "%s", HTTP_WEB_ROOT);
printf("resource: %s\
", ev->resource);
\t\t
}
else if (strstr(linebuffer, "POST"))
{<!-- -->
ev->method = HTTP_METHOD_POST;
}
}
int nty_http_response_get_method(struct ntyevent *ev)
{<!-- -->
int filefd = open(ev->resource, O_RDONLY);
int len = 0;
if (filefd == -1) //fail
{<!-- -->
int len = sprintf(ev->wbuffer,
"HTTP/1.1 200 OK\r\
"
"Accept-Ranges: bytes\r\
"
"Content-Length: 78\r\
"
"Content-Type: text/html\r\
"
"Date: Sat, 06 Aug 2022 13:16:46 GMT\r\
\r\
"
"<html><head><title>qq.com</title></head><body><h1>Com</h1><body/></html>");
ev->wlength = len;
}
else
{<!-- -->
printf("open resource ok \
");
struct stat stat_buf;
fstat(filefd, &stat_buf);
close(filefd);
\t\t
int len = sprintf(ev->wbuffer,
"HTTP/1.1 200 OK\r\
"
"Accept-Ranges: bytes\r\
"
"Content-Length: %ld\r\
"
"Content-Type: text/html\r\
"
"Date: Sat, 06 Aug 2022 13:16:46 GMT\r\
\r\
", stat_buf.st_size);
ev->wlength = len;
}
return len;
}
int nty_http_response(struct ntyevent *ev)
{<!-- -->
// ev->method, ev->resouces
if (ev->method == HTTP_METHOD_GET)
{<!-- -->
return nty_http_response_get_method(ev);
}
else if (ev->method == HTTP_METHOD_POST)
{<!-- -->
\t\t
}
}
\t
// connection
// sock_item --> fd, rbuffer, wbuffer, clientaddr
int recv_cb(int fd, int events, void *arg)
{<!-- -->
struct ntyreactor *reactor = (struct ntyreactor*)arg;
struct ntyevent *ev = ntyreactor_idx(reactor, fd);
\t
if (ev == NULL) return -1;
int len = recv(fd, ev->buffer, BUFFER_LENGTH, 0);
nty_event_del(reactor->epfd, ev);
\t
if (len > 0)
{<!-- -->
ev->length = len;
ev->buffer[len] = '\0';
\t\t
printf("recv [%d]:%s\
", fd, ev->buffer);
\t\t
nty_http_request(ev); // parser http hdr
\t\t
nty_event_set(ev, fd, send_cb, reactor);
nty_event_add(reactor->epfd, EPOLLOUT, ev);
}
else if (len == 0)
{<!-- -->
nty_event_del(reactor->epfd, ev);
printf("recv_cb --> disconnect\
");
close(ev->fd);
}
else
{<!-- -->
if (errno == EAGAIN & & errno == EWOULDBLOCK)
{<!-- -->
\t\t\t
}
else if (errno == ECONNRESET)
{<!-- -->
nty_event_del(reactor->epfd, ev);
close(ev->fd);
}
printf("recv[fd=%d] error[%d]:%s\
", fd, errno, strerror(errno));
}
\t\t
return len;
}
\t
int send_cb(int fd, int events, void *arg)
{<!-- -->
struct ntyreactor *reactor = (struct ntyreactor*)arg;
struct ntyevent *ev = ntyreactor_idx(reactor, fd);
\t
if (ev == NULL) return -1;
\t
nty_http_response(ev); //encode
\t
int len = send(fd, ev->wbuffer, ev->wlength, 0); //send header
if (len > 0)
{<!-- -->
int filefd = open(ev->resource, O_RDONLY);
if (filefd < 0) return -1;
\t\t
struct stat stat_buf;
fstat(filefd, &stat_buf);
\t\t
int flag = fcntl(fd, F_GETFL, 0);
flag & amp;= ~O_NONBLOCK;
fcntl(fd, F_SETFL, flag);
\t\t\t
int ret = sendfile(fd, filefd, NULL, stat_buf.st_size); //sendbody
if (ret == -1)
{<!-- -->
printf("sendfile: errno: %d\
", errno);
}
\t\t
flag |= O_NONBLOCK;
fcntl(fd, F_SETFL, flag);
\t\t
close(filefd);
\t\t
send(fd, "\r\
", 2, 0);
\t\t
nty_event_del(reactor->epfd, ev);
nty_event_set(ev, fd, recv_cb, reactor);
nty_event_add(reactor->epfd, EPOLLIN, ev);
}
else
{<!-- -->
nty_event_del(reactor->epfd, ev);
close(ev->fd);
printf("send[fd=%d] error %s\
", fd, strerror(errno));
}
return len;
}
int accept_cb(int fd, int events, void *arg)
{<!-- -->
struct ntyreactor *reactor = (struct ntyreactor*)arg;
if (reactor == NULL) return -1;
\t
struct sockaddr_in client_addr;
socklen_t len = sizeof(client_addr);
int clientfd = -1;
if ((clientfd = accept(fd, (struct sockaddr*) &client_addr, &len)) == -1)
{<!-- -->
if (errno != EAGAIN & amp; & amp; errno != EINTR) {<!-- -->
\t\t\t
}
printf("accept: %s\
", strerror(errno));
return -1;
}
int flag = -1;
if ((flag = fcntl(clientfd, F_SETFL, O_NONBLOCK)) < 0) {<!-- -->
printf("%s: fcntl nonblocking failed, %d\
", __func__, MAX_EPOLL_EVENTS);
return -1;
}
\t
struct ntyevent *event = ntyreactor_idx(reactor, clientfd);
\t
if (event == NULL) return -1;
\t
nty_event_set(event, clientfd, recv_cb, reactor);
nty_event_add(reactor->epfd, EPOLLIN, event);
if (curfds + + % 1000 == 999) {<!-- -->
struct timeval tv_cur;
memcpy( &tv_cur, &tv_begin, sizeof(struct timeval));
\t\t
gettimeofday( &tv_begin, NULL);
\t\t
int time_used = TIME_SUB_MS(tv_begin, tv_cur);
printf("connections: %d, sockfd:%d, time_used:%d\
", curfds, clientfd, time_used);
}
\t
printf("new connect [%s:%d], pos[%d]\
",
inet_ntoa(client_addr. sin_addr), ntohs(client_addr. sin_port), clientfd);
\t
return 0;
}
int init_sock(short port)
{<!-- -->
int fd = socket(AF_INET, SOCK_STREAM, 0);
fcntl(fd, F_SETFL, O_NONBLOCK);
\t
struct sockaddr_in server_addr;
memset( & server_addr, 0, sizeof(server_addr));
server_addr.sin_family = AF_INET;
server_addr.sin_addr.s_addr = htonl(INADDR_ANY);
server_addr.sin_port = htons(port);
\t
bind(fd, (struct sockaddr*) & server_addr, sizeof(server_addr));
\t
if (listen(fd, 20) < 0) {<!-- -->
printf("listen failed : %s\
", strerror(errno));
return -1;
}
\t
printf("listen server port : %d\
", port);
gettimeofday( &tv_begin, NULL);
\t
return fd;
}
\t
int ntyreactor_alloc(struct ntyreactor *reactor)
{<!-- -->
if (reactor == NULL) return -1;
if (reactor->evblks == NULL) return -1;
\t
struct eventblock *blk = reactor->evblks;
\t
while (blk->next != NULL) {<!-- -->
blk = blk->next;
}
\t
struct ntyevent* evs = (struct ntyevent*)malloc((MAX_EPOLL_EVENTS) * sizeof(struct ntyevent));
if (evs == NULL) {<!-- -->
printf("ntyreactor_alloc ntyevent failed\
");
return -2;
}
memset(evs, 0, (MAX_EPOLL_EVENTS) * sizeof(struct ntyevent));
\t
struct eventblock *block = malloc(sizeof(struct eventblock));
if (block == NULL) {<!-- -->
printf("ntyreactor_alloc eventblock failed\
");
return -3;
}
block->events = evs;
block->next = NULL;
\t
blk->next = block;
reactor->blkcnt + + ;
\t
return 0;
}
\t
struct ntyevent *ntyreactor_idx(struct ntyreactor *reactor, int sockfd)
{<!-- -->
if (reactor == NULL) return NULL;
if (reactor->evblks == NULL) return NULL;
\t
int blkidx = sockfd / MAX_EPOLL_EVENTS;
while (blkidx >= reactor->blkcnt) {<!-- -->
ntyreactor_alloc(reactor);
}
\t
int i = 0;
struct eventblock *blk = reactor->evblks;
while (i + + != blkidx & amp; & amp; blk != NULL) {<!-- -->
blk = blk->next;
}
\t
return & blk->events[sockfd % MAX_EPOLL_EVENTS];
}
\t
int ntyreactor_init(struct ntyreactor *reactor)
{<!-- -->
if (reactor == NULL) return -1;
memset(reactor, 0, sizeof(struct ntyreactor));
\t
reactor->epfd = epoll_create(1);
if (reactor->epfd <= 0) {<!-- -->
printf("create epfd in %s err %s\
", __func__, strerror(errno));
return -2;
}
\t
struct ntyevent* evs = (struct ntyevent*)malloc((MAX_EPOLL_EVENTS) * sizeof(struct ntyevent));
if (evs == NULL) {<!-- -->
printf("create epfd in %s err %s\
", __func__, strerror(errno));
close(reactor->epfd);
return -3;
}
memset(evs, 0, (MAX_EPOLL_EVENTS) * sizeof(struct ntyevent));
\t
struct eventblock *block = malloc(sizeof(struct eventblock));
if (block == NULL) {<!-- -->
free(evs);
close(reactor->epfd);
return -3;
}
block->events = evs;
block->next = NULL;
\t
reactor->evblks = block;
reactor->blkcnt = 1;
\t
return 0;
}
int ntyreactor_destory(struct ntyreactor *reactor)
{<!-- -->
close(reactor->epfd);
\t
struct eventblock *blk = reactor->evblks;
struct eventblock *blk_next;
while (blk != NULL) {<!-- -->
blk_next = blk->next;
\t\t
free(blk->events);
free(blk);
\t\t
blk = blk_next;
}
\t\t
return 0;
}
int ntyreactor_addlistener(struct ntyreactor *reactor, int sockfd, NCALLBACK *acceptor)
{<!-- -->
if (reactor == NULL) return -1;
if (reactor->evblks == NULL) return -1;
\t
struct ntyevent *event = ntyreactor_idx(reactor, sockfd);
if (event == NULL) return -1;
\t
nty_event_set(event, sockfd, acceptor, reactor);
nty_event_add(reactor->epfd, EPOLLIN, event);
\t
return 0;
}
\t
int ntyreactor_run(struct ntyreactor *reactor)
{<!-- -->
if (reactor == NULL) return -1;
if (reactor->epfd < 0) return -1;
if (reactor->evblks == NULL) return -1;
\t
struct epoll_event events[MAX_EPOLL_EVENTS + 1];
\t
int checkpos = 0, i;
\t
while (1)
{<!-- -->
int nready = epoll_wait(reactor->epfd, events, MAX_EPOLL_EVENTS, 1000);
if (nready < 0) {<!-- -->
printf("epoll_wait error, exit\
");
continue;
}
\t\t
for (i = 0;i < nready;i ++ ) {<!-- -->
\t\t\t
struct ntyevent *ev = (struct ntyevent*)events[i].data.ptr;
\t\t\t
if ((events[i].events & amp; EPOLLIN) & amp; & amp; (ev->events & amp; EPOLLIN)) {<!-- -->
ev->callback(ev->fd, events[i].events, ev->arg);
}
if ((events[i].events & amp; EPOLLOUT) & amp; & amp; (ev->events & amp; EPOLLOUT)) {<!-- -->
ev->callback(ev->fd, events[i].events, ev->arg);
}
\t\t\t
}
}
}
int main(int argc, char *argv[])
{<!-- -->
struct ntyreactor *reactor = (struct ntyreactor*)malloc(sizeof(struct ntyreactor));
ntyreactor_init(reactor);
\t
unsigned short port = SERVER_PORT;
if (argc == 2) {<!-- -->
port = atoi(argv[1]);
}
\t
int i = 0;
int sockfds[PORT_COUNT] = {<!-- -->0};
\t
for (i = 0;i < PORT_COUNT;i ++ ) {<!-- -->
sockfds[i] = init_sock(port + i);
ntyreactor_addlistener(reactor, sockfds[i], accept_cb);
}
\t
ntyreactor_run(reactor);
\t
ntyreactor_destory(reactor);
\t
for (i = 0;i < PORT_COUNT;i ++ ) {<!-- -->
close(sockfds[i]);
}
free(reactor);
\t
return 0;
}
