epoll的echo程序（待修改）

#include <stdio.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <errno.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <iostream>
#include <sys/epoll.h>
#include <string.h>
#include <stdlib.h>
using namespace std;

#define MAX_EVENTS 500

int g_epollFd;

struct myevent_s
{
    friend ostream& operator<<(ostream& os,const myevent_s &myev);
    int fd;
    void (*call_back)(int fd, int events, void *arg);
    int events;
    void *arg;
    int status;
    char buff[128];
    int len, s_offset;
    long last_active;
};

ostream& operator<<(ostream& os, const myevent_s &myev)
{
    os << "buff " << myev.buff
       << " s_offset " << myev.s_offset
       << " len " << myev.len << endl;
    return os;
}

myevent_s g_Events[MAX_EVENTS+1];

//set event
void EventSet(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;
    bzero(ev->buff, sizeof(ev->buff));
    ev->s_offset = 0;
    ev->len = 0;
    ev->last_active = time(NULL);
}

void EventSet_Callback(myevent_s *ev, int fd, void (*call_back)(int, int, void*), void *arg)
{
    ev->call_back = call_back;
    ev->arg = arg;
}
//add/mod an event to epoll
void EventAdd(int epollFd, int events, 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(epollFd, op, ev->fd, &epv) < 0)
        fprintf(stderr, "Event Add Fail[fd=%d], events[%d]\n", ev->fd, events);
    else
        fprintf(stdout, "Event Add OK[fd=%d], op=%d, events[%0x]\n",ev->fd, op, events);
}

void EventDel(int epollFd, myevent_s *ev)
{
    cout << *ev << endl;
    struct epoll_event epv = {0, {0}};
    if(ev->status != 1)
        return ;
    epv.data.ptr = ev;
    ev->status = 0;
    if(epoll_ctl(epollFd, EPOLL_CTL_DEL, ev->fd, &epv) < 0)
    {
        fprintf(stderr, "Event DEL Fail[fd=%d] errno%s\n", ev->fd, strerror(errno));
    }else
    {
        fprintf(stdout, "Event DEL Success[fd=%d]\n", ev->fd);
    }
    return;
}


void RecvData(int fd, int events, void *arg);
void SendData(int fd, int events, void *arg);

void AcceptConn(int fd, int events, void *arg)
{
    cout << "conn" << endl;
    struct sockaddr_in sin;
    socklen_t len = sizeof(struct sockaddr_in);
    int nfd, i;
    //accept
    if( (nfd = accept(fd, (struct sockaddr*)&sin, &len)) == -1)
    {
        if(errno != EAGAIN && errno != EINTR)
        {
            fprintf(stderr, "%s accept,%d", __func__, errno);
            return;
        }
    }
    
    do
    {
        for (i = 0; i < MAX_EVENTS; i++) 
        {
            if(g_Events[i].status == 0)
            {
                break;
            }
        }
       
        if(i == MAX_EVENTS)
        {
            fprintf(stderr, "%s max connection limit[%d].", __func__, MAX_EVENTS);
            break;
        }
       
    //set nonblocking
        int iret = 0;
        if( (iret = fcntl(nfd, F_SETFL, O_NONBLOCK)) < 0)
        {
            fprintf(stderr, "%s: fcntl nonblocking failed:%d", __func__, iret);
            break;
        }
    
        EventSet(&g_Events[i], nfd, RecvData, &g_Events[i]);
        EventAdd(g_epollFd, EPOLLIN, &g_Events[i]);
    }while(0);

    printf("new conn[%s:%d][time:%d],pos[%d]\n", 
            inet_ntoa(sin.sin_addr), 
            ntohs(sin.sin_port),
            g_Events[i].last_active, i);
}

void RecvData(int fd, int events, void *arg)
{
    struct myevent_s *ev = (struct myevent_s*)arg;
    cout << "RecvDate:" << *ev <<endl;
    int len = recv(fd, ev->buff + ev->len, sizeof(ev->buff)- 1 - ev->len, 0);
    EventDel(g_epollFd, ev);
    if(len > 0)
    {
        ev->len += len;
        ev->buff[ev->len] = '\0';
        printf("C[%d]:%s ev->len:%d\n", fd, ev->buff, ev->len);
        //change to send
        EventSet_Callback(ev, fd, SendData, ev);
        EventAdd(g_epollFd, EPOLLOUT, ev);
                
/*      struct epoll_event epv;
        epv.data.ptr = ev;
        epv.events = EPOLLOUT;
        epoll_ctl(g_epollFd, EPOLL_CTL_MOD, ev->fd, &epv);       
  */  }else if(len == 0)
    {
        close(ev->fd);
        printf("[fd=%d] pos[%d], close gracefully.\n", fd, ev - g_Events);
    }else
    {
        close(ev->fd);
        fprintf(stderr, "recv[fd=%d] err[%d]:%s\n", fd, errno, strerror(errno));
    }

}
//send data
void SendData(int fd, int events, void *arg)
{
    cout << "Send Data" << endl;
    struct myevent_s *ev = (struct myevent_s*)arg;
    int len = send(fd, ev->buff + ev->s_offset, (ev->len) - (ev->s_offset), 0 );
    if(len > 0)
    {
       fprintf(stdout, "send[fd=%d], [%d<->%d]%s\n", fd, len, ev->len, ev->buff);
       ev->s_offset += len;
       if(ev->s_offset == ev->len)
       {
           //change to recv
           EventDel(g_epollFd, ev);
           EventSet_Callback(ev, fd, RecvData, ev);
           EventAdd(g_epollFd, EPOLLIN, ev); 
      
   /*   struct epoll_event epv;
        epv.data.ptr = ev;
        epv.events = EPOLLIN;
        epoll_ctl(g_epollFd, EPOLL_CTL_MOD, ev->fd, &epv);       
*/    }
    }
    else
    {
        close(ev->fd);
        EventDel(g_epollFd, ev);
        fprintf(stderr, "send[fd=%d] error[%d]:%s\n", fd, errno, strerror(errno));
    }
}

void InitListenSocket(int epollFd, short port)
{
    int listenFd = socket(AF_INET, SOCK_STREAM, 0);
    cout << "listenfd " << listenFd << endl;
    fcntl(listenFd, F_SETFL, O_NONBLOCK);
    fprintf(stdout, "server listenfd=%d\n", listenFd);
    //add listen socket
    //bind & listen
    struct sockaddr_in sin;
    bzero(&sin, sizeof(sin));
    sin.sin_family = AF_INET;
    sin.sin_addr.s_addr = htonl(INADDR_ANY);
    sin.sin_port = htons(port);
    bind(listenFd, (const struct sockaddr*)&sin, sizeof(sin));
    listen(listenFd, 5);
   
    EventSet(&g_Events[MAX_EVENTS], listenFd, AcceptConn, &g_Events[MAX_EVENTS]);
    EventAdd(epollFd, EPOLLIN, &g_Events[MAX_EVENTS]);
    
 /*   struct epoll_event ev;
    ev.data.fd = listenFd;
    ev.events = EPOLLIN;
    epoll_ctl(g_epollFd, EPOLL_CTL_ADD, listenFd, &ev);
*/
    }

int main(int argc, const char *argv[])
{
    unsigned short port = 8888;
    if(argc == 2){
        port = atoi(argv[1]);
    }
    struct epoll_event events[MAX_EVENTS];
    
    g_epollFd = epoll_create(MAX_EVENTS);
    if(g_epollFd <= 0)
    {
        fprintf(stderr, "epoll_create Fail:%d\n", g_epollFd);
        exit(-1);
    }
   
    InitListenSocket(g_epollFd, port);
    printf("server running:port[%d]\n", port);
    int checkPos = 0;
    while(1)
    {
        long now = time(NULL);
        for (int 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);
                fprintf(stderr, "[fd=%d] timeout[%l--%l].\n",
                        g_Events[checkPos].fd, 
                        g_Events[checkPos].last_active, now);
                EventDel(g_epollFd, &g_Events[checkPos]);
            }
        }
      
        //wait for events
            
        int fds = epoll_wait(g_epollFd, events, MAX_EVENTS , -1);

        if(fds < 0){
            fprintf(stderr, "epoll_wait error, exit");
            break;
        }

        for (int i = 0; i < fds; i++) {
            myevent_s *ev = (struct myevent_s*)events[i].data.ptr;
            if( (events[i].events&EPOLLIN) && (ev->events&EPOLLIN))
            {
                cout << "in" << endl;
                ev->call_back(ev->fd, events[i].events, ev->arg);
            }

            if( (events[i].events&EPOLLOUT) && (ev->events&EPOLLOUT))
            {
                cout << "out " << endl;
                ev->call_back(ev->fd, events[i].events, ev->arg);
            }
        }
    }
    return 0;
}