select
#include <stdio.h>
#include <sys/socket.h>
#include <stdlib.h>
#include <unistd.h>
#include <ctype.h>
#include <arpa/inet.h>
#include "warp_socket.h"
#define PORT 8080
int main() {
int lfd, cfd, maxfd;
int n, nready, client[FD_SETSIZE], i;
char buf[BUFSIZ], str[INET_ADDRSTRLEN];
struct sockaddr_in srv_addr, cli_addr;
socklen_t cli_addr_len = sizeof(cli_addr);
create_ipv4_for_localhost(&srv_addr, PORT);
lfd = default_my_socket_ipv4_tcp();
my_bind(lfd, (struct sockaddr *) &srv_addr, sizeof(srv_addr));
my_listen(lfd, 128);
maxfd = lfd;
int maxi = -1;
for (i = 0; i < FD_SETSIZE; i++) {
client[i] = -1;
}
fd_set rset, allset;
FD_ZERO(&allset);
FD_SET(lfd, &allset);
while (1) {
rset = allset;
nready = select(maxfd + 1, &rset, NULL, NULL, NULL);
check(nready, "select error");
if (FD_ISSET(lfd, &rset)) {
cfd = my_accept(lfd, (struct sockaddr *) &cli_addr, &cli_addr_len);
printf("received from %s at PORT %d \n", inet_ntop(AF_INET, &cli_addr.sin_addr, str, INET_ADDRSTRLEN),
ntohs(cli_addr.sin_port));
for (i = 0; i < FD_SETSIZE; i++) {
if (client[i] == -1) {
client[i] = cfd;
break;
}
}
if (i == FD_SETSIZE) {
fputs("too many clients \n", stderr);
exit(1);
}
FD_SET(cfd, &allset);
if (maxfd < cfd) {
maxfd = cfd;
}
if (maxi < i) {
maxi = i;
}
if (0 == --nready)continue;
}
for (i = 0; i <= maxi; i++) {
if (client[i] < 0)continue;
if (FD_ISSET(client[i], &rset)) {
if ((n = my_read(client[i], buf, BUFSIZ)) <= 0) {
close(client[i]);
FD_CLR(client[i], &allset);
client[i] = -1;
} else {
my_write(STDOUT_FILENO, buf, n);
for (int j = 0; j < n; j++) {
buf[j] = toupper(buf[j]);
}
my_write(client[i], buf, n);
}
if (--nready == 0)break;
}
}
}
close(lfd);
return 0;
}
poll
#include <stdio.h>
#include <sys/socket.h>
#include <stdlib.h>
#include <unistd.h>
#include <ctype.h>
#include <arpa/inet.h>
#include "warp_socket.h"
#include <poll.h>
#include <errno.h>
#define PORT 8080
#define OPEN_MAX 1024
int main() {
int lfd, cfd;
int n, nready, i;
char buf[OPEN_MAX], str[INET_ADDRSTRLEN];
struct pollfd client[OPEN_MAX];
struct sockaddr_in srv_addr, cli_addr;
socklen_t cli_addr_len = sizeof(cli_addr);
create_ipv4_for_localhost(&srv_addr, PORT);
lfd = default_my_socket_ipv4_tcp();
my_bind(lfd, (struct sockaddr *) &srv_addr, sizeof(srv_addr));
my_listen(lfd, 128);
client[0].fd = lfd;
client[0].events = POLLIN;
for (i = 1; i < FD_SETSIZE; i++) {
client[i].fd = -1;
}
int maxi = 0;
while (1) {
nready = poll(client, maxi + 1, -1);
check(nready, "select error");
if (client[0].revents & POLLIN) {
cfd = my_accept(lfd, (struct sockaddr *) &cli_addr, &cli_addr_len);
printf("received from %s at PORT %d \n", inet_ntop(AF_INET, &cli_addr.sin_addr, str, INET_ADDRSTRLEN),
ntohs(cli_addr.sin_port));
for (i = 1; i < OPEN_MAX; i++) {
if (client[i].fd == -1) {
client[i].fd = cfd;
break;
}
}
if (i == OPEN_MAX) {
fputs("too many clients \n", stderr);
exit(1);
}
client[i].events = POLLIN;
if (maxi < i) {
maxi = i;
}
if (0 == --nready)continue;
}
for (i = 1; i <= maxi; i++) {
if (client[i].fd < 0)continue;
if (client[i].revents & POLLIN) {
if ((n = my_read(client[i].fd, buf, OPEN_MAX)) < 0) {
if (errno == ECONNRESET) {
printf("client %d \n", i);
close(client[i].fd);
client[i].fd = -1;
} else {
fputs("read error \n", stderr);
}
} else if (n == 0) {
close(client[i].fd);
client[i].fd = -1;
} else {
my_write(STDOUT_FILENO, buf, n);
for (int j = 0; j < n; j++) {
buf[j] = toupper(buf[j]);
}
my_write(client[i].fd, buf, n);
}
if (--nready == 0)break;
}
}
}
close(lfd);
return 0;
}
epoll
#include <stdio.h>
#include <sys/socket.h>
#include <stdlib.h>
#include <unistd.h>
#include <ctype.h>
#include <arpa/inet.h>
#include "../warp_socket.h"
#include <errno.h>
#include <sys/epoll.h>
#define PORT 8080
#define OPEN_MAX 1024
int main() {
int efd, lfd, cfd, handle_cfd;
int n, nready, i;
char buf[OPEN_MAX], str[INET_ADDRSTRLEN];
struct sockaddr_in srv_addr, cli_addr;
socklen_t cli_addr_len = sizeof(cli_addr);
create_ipv4_for_localhost(&srv_addr, PORT);
lfd = default_my_socket_ipv4_tcp();
my_bind(lfd, (struct sockaddr *) &srv_addr, sizeof(srv_addr));
my_listen(lfd, 128);
efd = epoll_create(OPEN_MAX);
check(efd, "epoll_create error");
struct epoll_event tep, ep[OPEN_MAX];
tep.events = EPOLLIN;
tep.data.fd = lfd;
int res = epoll_ctl(efd, EPOLL_CTL_ADD, lfd, &tep);
check(res, "epoll_create error");
while (1) {
nready = epoll_wait(efd, ep, OPEN_MAX, -1);
check(nready, "select error");
for (i = 0; i < nready; i++) {
if (!ep[i].events & EPOLLIN) {
continue;
}
if (ep[i].data.fd == lfd) {
cfd = my_accept(lfd, (struct sockaddr *) &cli_addr, &cli_addr_len);
printf("received from %s at PORT %d \n", inet_ntop(AF_INET, &cli_addr.sin_addr, str, INET_ADDRSTRLEN),
ntohs(cli_addr.sin_port));
tep.events = EPOLLIN;
tep.data.fd = cfd;
res = epoll_ctl(efd, EPOLL_CTL_ADD, cfd, &tep);
check(res, "epoll_create error");
} else {
handle_cfd = ep[i].data.fd;
if ((n = my_read(handle_cfd, buf, OPEN_MAX)) <= 0) {
res = epoll_ctl(efd, EPOLL_CTL_DEL, handle_cfd, NULL);
check(res, "epoll_create error");
perror("close con \n");
close(handle_cfd);
} else {
my_write(STDOUT_FILENO, buf, n);
for (int j = 0; j < n; j++) {
buf[j] = toupper(buf[j]);
}
my_write(handle_cfd, buf, n);
}
}
}
}
close(lfd);
close(efd);
return 0;
}
反应堆
#include <stdio.h>
#include <sys/socket.h>
#include <sys/epoll.h>
#include <arpa/inet.h>
#include <fcntl.h>
#include <unistd.h>
#include <errno.h>
#include <string.h>
#include <stdlib.h>
#include <time.h>
#define MAX_EVENTS 1024
#define BUFLEN 4096
#define SERV_PORT 8080
void recvdata(int fd, int events, void *arg);
void senddata(int fd, int events, void *arg);
struct myevent_s {
int fd;
int events;
void *arg;
void (*call_back)(int fd, int events, void *arg);
int status;
char buf[BUFLEN];
int len;
long last_active;
};
int g_efd;
struct myevent_s g_events[MAX_EVENTS + 1];
void eventset(struct myevent_s *ev, int fd, void (*call_back)(int, int, void *), void *arg) {
ev->fd = fd;
ev->call_back = call_back;
ev->events = 0;
ev->arg = arg;
ev->status = 0;
ev->last_active = time(NULL);
return;
}
void eventadd(int efd, int events, struct myevent_s *ev) {
struct epoll_event epv = {0, {0}};
int op;
epv.data.ptr = ev;
epv.events = ev->events = events;
if (ev->status == 1) {
op = EPOLL_CTL_MOD;
} else {
op = EPOLL_CTL_ADD;
ev->status = 1;
}
if (epoll_ctl(efd, op, ev->fd, &epv) < 0)
printf("event add failed [fd=%d], events[%d]\n", ev->fd, events);
else
printf("event add OK [fd=%d], op=%d, events[%0X]\n", ev->fd, op, events);
return;
}
void eventdel(int efd, struct myevent_s *ev) {
struct epoll_event epv = {0, {0}};
if (ev->status != 1)
return;
epv.data.ptr = ev;
ev->status = 0;
epoll_ctl(efd, EPOLL_CTL_DEL, ev->fd, &epv);
return;
}
void acceptconn(int lfd, int events, void *arg) {
struct sockaddr_in cin;
socklen_t len = sizeof(cin);
int cfd, i;
if ((cfd = accept(lfd, (struct sockaddr *) &cin, &len)) == -1) {
if (errno != EAGAIN && errno != EINTR) {
}
printf("%s: accept, %s\n", __func__, strerror(errno));
return;
}
do {
for (i = 0; i < MAX_EVENTS; i++)
if (g_events[i].status == 0)
break;
if (i == MAX_EVENTS) {
printf("%s: max connect limit[%d]\n", __func__, MAX_EVENTS);
break;
}
int flag = 0;
if ((flag = fcntl(cfd, F_SETFL, O_NONBLOCK)) < 0) {
printf("%s: fcntl nonblocking failed, %s\n", __func__, strerror(errno));
break;
}
eventset(&g_events[i], cfd, recvdata, &g_events[i]);
eventadd(g_efd, EPOLLIN, &g_events[i]);
} while (0);
printf("new connect [%s:%d][time:%ld], pos[%d]\n",
inet_ntoa(cin.sin_addr), ntohs(cin.sin_port), g_events[i].last_active, i);
return;
}
void recvdata(int fd, int events, void *arg) {
struct myevent_s *ev = (struct myevent_s *) arg;
int len;
len = recv(fd, ev->buf, sizeof(ev->buf), 0);
eventdel(g_efd, ev);
if (len > 0) {
ev->len = len;
ev->buf[len] = '\0';
printf("C[%d]:%s\n", fd, ev->buf);
eventset(ev, fd, senddata, ev);
eventadd(g_efd, EPOLLOUT, ev);
} else if (len == 0) {
close(ev->fd);
printf("[fd=%d] pos[%ld], closed\n", fd, ev - g_events);
} else {
close(ev->fd);
printf("recv[fd=%d] error[%d]:%s\n", fd, errno, strerror(errno));
}
return;
}
void senddata(int fd, int events, void *arg) {
struct myevent_s *ev = (struct myevent_s *) arg;
int len;
len = send(fd, ev->buf, ev->len, 0);
if (len > 0) {
printf("send[fd=%d], [%d]%s\n", fd, len, ev->buf);
eventdel(g_efd, ev);
eventset(ev, fd, recvdata, ev);
eventadd(g_efd, EPOLLIN, ev);
} else {
close(ev->fd);
eventdel(g_efd, ev);
printf("send[fd=%d] error %s\n", fd, strerror(errno));
}
return;
}
void initlistensocket(int efd, short port) {
int lfd = socket(AF_INET, SOCK_STREAM, 0);
fcntl(lfd, F_SETFL, O_NONBLOCK);
eventset(&g_events[MAX_EVENTS], lfd, acceptconn, &g_events[MAX_EVENTS]);
eventadd(efd, EPOLLIN, &g_events[MAX_EVENTS]);
struct sockaddr_in sin;
memset(&sin, 0, sizeof(sin));
sin.sin_family = AF_INET;
sin.sin_addr.s_addr = INADDR_ANY;
sin.sin_port = htons(port);
bind(lfd, (struct sockaddr *) &sin, sizeof(sin));
listen(lfd, 20);
return;
}
int main(int argc, char *argv[]) {
unsigned short port = SERV_PORT;
if (argc == 2)
port = atoi(argv[1]);
g_efd = epoll_create(MAX_EVENTS + 1);
if (g_efd <= 0)
printf("create efd in %s err %s\n", __func__, strerror(errno));
initlistensocket(g_efd, port);
struct epoll_event events[MAX_EVENTS + 1];
printf("server running:port[%d]\n", port);
int checkpos = 0, i;
while (1) {
long now = time(NULL);
for (i = 0; i < 100; i++, checkpos++) {
if (checkpos == MAX_EVENTS)
checkpos = 0;
if (g_events[checkpos].status != 1)
continue;
long duration = now - g_events[checkpos].last_active;
if (duration >= 60) {
close(g_events[checkpos].fd);
printf("[fd=%d] timeout\n", g_events[checkpos].fd);
eventdel(g_efd, &g_events[checkpos]);
}
}
int nfd = epoll_wait(g_efd, events, MAX_EVENTS + 1, 1000);
if (nfd < 0) {
printf("epoll_wait error, exit\n");
break;
}
for (i = 0; i < nfd; i++) {
struct myevent_s *ev = (struct myevent_s *) events[i].data.ptr;
if ((events[i].events & EPOLLIN) && (ev->events & EPOLLIN) ||
((events[i].events & EPOLLOUT) && (ev->events & EPOLLOUT))) {
ev->call_back(ev->fd, events[i].events, ev->arg);
}
}
}
return 0;
}