// 1、創(chuàng)建服務(wù)端Channel，綁定端口并配置非阻塞
ServerSocketChannel serverSocketChannel = ServerSocketChannel.open();
serverSocketChannel.socket().bind(new InetSocketAddress(6666));
serverSocketChannel.configureBlocking(false);

// 2、創(chuàng)建多路復(fù)用器selector，并將channel注冊到多路復(fù)用器上
// 不能直接調(diào)用channel的accept方法，因?yàn)閷儆诜亲枞?，直接調(diào)用沒有新連接會直接返回
Selector selector = Selector.open();
serverSocketChannel.register(selector, SelectionKey.OP_ACCEPT);

// 3、循環(huán)處理多路復(fù)用器的IO事件
while(true){

    // 3.1、select屬于阻塞的方法，這里阻塞等待1秒
    // 如果返回0，說明沒有事件處理
    if (selector.select(1000) == 0){
        System.out.println("服務(wù)器等待了1秒，無IO事件");
        continue;
    }
    // 3.2、遍歷事件進(jìn)行處理
    Set<SelectionKey> selectionKeys = selector.selectedKeys();
    Iterator<SelectionKey> iterator = selectionKeys.iterator();
    while(iterator.hasNext()){
        SelectionKey key = iterator.next();
        // accept事件，說明有新的客戶端連接
        if (key.isAcceptable()){
            // 新建一個(gè)socketChannel,注冊到selector,并關(guān)聯(lián)buffer
            SocketChannel socketChannel = serverSocketChannel.accept();
            socketChannel.configureBlocking(false);
            socketChannel.register(selector,SelectionKey.OP_READ, ByteBuffer.allocate(1024));
            System.out.println("客戶端連接:"+socketChannel.getRemoteAddress());
        }
        // read事件 (內(nèi)核緩沖區(qū)的數(shù)據(jù)準(zhǔn)備好了)
        if(key.isReadable()){
            SocketChannel channel = (SocketChannel)key.channel();
            ByteBuffer byteBuffer = (ByteBuffer)key.attachment();
            try {
              // 將數(shù)據(jù)寫進(jìn)buffer
                int readNum = channel.read(byteBuffer);
                if (readNum == -1){
                    System.out.println("讀取-1時(shí),表示IO流已結(jié)束");
                    channel.close();
                    break;
                }
                // 打印buffer
                byteBuffer.flip();
                byte[] bytes = new byte[readNum];
                byteBuffer.get(bytes, 0, readNum);
                System.out.println("讀取到數(shù)據(jù):" + new String(bytes));
            } catch (IOException e) {
                System.out.println("讀取發(fā)生異常，廣播socket");
                channel.close();
            }

        }
        // write事件 (操作系統(tǒng)有內(nèi)存寫出了)
        if (key.isWritable()){
            SocketChannel channel = (SocketChannel)key.channel();
            // 讀取read時(shí)暫存數(shù)據(jù)
            byte[] bytes = (byte[])key.attachment();
            if (bytes != null){
                System.out.println("可寫事件發(fā)生，寫入數(shù)據(jù): " + new String(bytes));
                channel.write(ByteBuffer.wrap(bytes));
            }
            // 清空暫存數(shù)據(jù)，并切換成關(guān)注讀事件
            key.attach(null);
            key.interestOps(SelectionKey.OP_READ);
        }
        iterator.remove();
    }
}

public class EventLoop2 implements Runnable{


    private final Thread thread;
    /**
     * 復(fù)用器，當(dāng)前線程只處理這個(gè)復(fù)用器上的channel
     */
    public Selector selector;
    /**
     * 待處理的注冊任務(wù)
     */
    private final Queue<Runnable> queue = new LinkedBlockingQueue<>();

    /**
     * 初始化復(fù)用器，線程啟動(dòng)
     * @throws IOException
     */
    public EventLoop2() throws IOException {
        this.selector = SelectorProvider.provider().openSelector();
        this.thread = new Thread(this);
        thread.start();
    }

    /**
     * 將通道注冊給當(dāng)前的線程處理
     * @param socketChannel
     * @param keyOps
     */
    public void register(SocketChannel socketChannel,int keyOps){
        // 將注冊新的socketChannel到當(dāng)前selector封裝成一個(gè)任務(wù)
        queue.add(()->{
            try {
                MyChannel myChannel = new MyChannel(socketChannel, this);
                SelectionKey key = socketChannel.register(selector, keyOps);
                key.attach(myChannel);
            } catch (Exception e){
                e.printStackTrace();
            }
        });
        // 喚醒阻塞等待的selector線程
        selector.wakeup();
    }

    /**
     * 循環(huán)地處理 注冊事件、讀寫事件
     */
    @Override
    public void run() {
        while (!thread.isInterrupted()){
            try {
                int select = selector.select(1000);
                // 處理注冊到當(dāng)前selector的事件
                if (select == 0){
                    Runnable task;
                    while ((task = queue.poll()) != null){
                        task.run();
                    }
                    continue;
                }
                // 處理讀寫事件
                System.out.println("服務(wù)器收到讀寫事件,select:" + select);
                processReadWrite();

            }catch (Exception e){
                e.printStackTrace();
            }
        }
    }

    /**
     * 處理讀寫事件
     * @throws Exception
     */
    private void processReadWrite() throws Exception{
        System.out.println(Thread.currentThread() + "開始監(jiān)聽讀寫事件");
        // 3.2、遍歷事件進(jìn)行處理
        Set<SelectionKey> selectionKeys = selector.selectedKeys();
        Iterator<SelectionKey> iterator = selectionKeys.iterator();
        while(iterator.hasNext()){
            SelectionKey key = iterator.next();
            MyChannel myChannel = (MyChannel)key.attachment();
            if(key.isReadable()){
                // 將數(shù)據(jù)讀進(jìn)buffer
                myChannel.doRead(key);
            }
            if (key.isWritable()){
                myChannel.doWrite(key);
            }
            iterator.remove();
        }
    }
}

public class EventLoopGroup {
    private EventLoop2[] children = new EventLoop2[1];

    private AtomicInteger idx = new AtomicInteger(0);

    public EventLoopGroup() throws IOException {
        for (int i = 0; i < children.length; i++){
            children[i] = new EventLoop2();
        }
    }

    public EventLoop2 next(){
        // 輪訓(xùn)每一個(gè)children
        return children[idx.getAndIncrement() & (children.length - 1)];
    }

    public void register(SocketChannel channel,int ops){
        next().register(channel,ops);
    }
}

public class MyChannel {

    private SocketChannel channel;

    private EventLoop2 eventLoop;

    private Queue<ByteBuffer> writeQueue;

    private PipLine pipLine;

    /**
     * 一個(gè)channel關(guān)聯(lián)一個(gè)eventLoop、一個(gè)pipLine、一個(gè)socketChannel、一個(gè)writeQueue
     * @param channel
     * @param eventLoop
     */
    public MyChannel(SocketChannel channel, EventLoop2 eventLoop) {
        this.channel = channel;
        this.eventLoop = eventLoop;
        this.writeQueue = new ArrayDeque<>();
        this.pipLine = new PipLine(this,eventLoop);
        this.pipLine.addLast(new MyHandler1());
        this.pipLine.addLast(new MyHandler2());
    }

    /**
     * 讀事件處理
     * @param key
     * @throws Exception
     */
    public void doRead(SelectionKey key) throws Exception{
        try {
            ByteBuffer buffer = ByteBuffer.allocate(1024);
            int readNum = channel.read(buffer);
            if (readNum == -1){
                System.out.println("讀取-1時(shí),表示IO流已結(jié)束");
                channel.close();
                return;
            }
            // 轉(zhuǎn)成可讀狀態(tài)
            buffer.flip();
            // 消息放入pipLine，交給頭節(jié)點(diǎn), 頭節(jié)點(diǎn)開始傳遞
            pipLine.headContext.fireChannelRead(buffer);

        } catch (IOException e) {
            System.out.println("讀取發(fā)生異常，廣播socket");
            channel.close();
        }
    }

    /**
     * 真正地寫出數(shù)據(jù)，關(guān)注寫事件后，會觸發(fā)
     * @param key
     * @throws IOException
     */
    public void doWrite(SelectionKey key) throws IOException{
        ByteBuffer buffer;
        while ((buffer =writeQueue.poll()) != null){
            channel.write(buffer);
        }
        // 回復(fù)讀取狀態(tài)
        key.interestOps(SelectionKey.OP_READ);

    }

    /**
     * 寫出到隊(duì)列
     * @param msg
     */
    public void doWriteQueue(ByteBuffer msg){
        writeQueue.add(msg);
    }

    /**
     * 從最后一個(gè)節(jié)點(diǎn)進(jìn)行寫出，寫出到頭節(jié)點(diǎn)是調(diào)用doWriteQueue
     * @param msg
     */
    public void write(Object msg){
        this.pipLine.tailContext.write(msg);
    }

    /**
     * 從最后一個(gè)節(jié)點(diǎn)進(jìn)行flush，寫出到頭節(jié)點(diǎn)時(shí)調(diào)用doFlush
     */
    public void flush(){
        this.pipLine.tailContext.flush();
    }

    /**
     * 關(guān)注寫事件，才能進(jìn)行真正地寫出
     */
    public void doFlush(){
        this.channel.keyFor(eventLoop.selector).interestOps(SelectionKey.OP_WRITE);
    }

}

public interface Handler {

    /**
     * 讀取數(shù)據(jù)處理
     * @param ctx
     * @param msg
     */
    void channelRead(HandlerContext ctx,Object msg);

    /**
     * 寫出數(shù)據(jù)
     * @param ctx
     * @param msg
     */
    void write(HandlerContext ctx,Object msg);

    /**
     * 刷下數(shù)據(jù)
     * @param ctx
     */
    void flush(HandlerContext ctx);
}

public class HandlerContext {

    private Handler handler;

    MyChannel channel;

    HandlerContext prev;

    HandlerContext next;

    public HandlerContext(Handler handler, MyChannel channel) {
        this.handler = handler;
        this.channel = channel;
    }

    /**
     * 讀消息的傳遞，從頭節(jié)點(diǎn)開始往后傳
     * @param msg
     */
    public void fireChannelRead(Object msg){
        HandlerContext next = this.next;
        if (next != null){
            next.handler.channelRead(next,msg);
        }
    }

    /**
     * 從尾節(jié)點(diǎn)開始往前傳
     * @param msg
     */
    public void write(Object msg){
        HandlerContext prev = this.prev;
        if (prev != null){
            prev.handler.write(prev,msg);
        }
    }

    /**
     * 從尾節(jié)點(diǎn)開始往前傳
     */
    public void flush(){
        HandlerContext prev = this.prev;
        if (prev != null){
            prev.handler.flush(prev);
        }
    }
}

public class PipLine {

    private MyChannel channel;

    private EventLoop2 eventLoop;

    public HandlerContext headContext;

    public HandlerContext tailContext;

    public PipLine(MyChannel channel, EventLoop2 eventLoop) {
        this.channel = channel;
        this.eventLoop = eventLoop;
        PipHandler headHandler = new PipHandler();
        this.headContext = new HandlerContext(headHandler,channel);
        PipHandler tailHandler = new PipHandler();
        this.tailContext = new HandlerContext(tailHandler,channel);
        // 構(gòu)建鏈表
        this.headContext.next = this.tailContext;
        this.tailContext.prev = this.headContext;
    }

    public void addLast(Handler handler){
        HandlerContext curr = new HandlerContext(handler, channel);

        // 連接在倒數(shù)第二個(gè)后面
        HandlerContext lastButOne = this.tailContext.prev;
        lastButOne.next = curr;
        curr.prev = lastButOne;

        // 連接在最后一個(gè)前面
        curr.next = tailContext;
        tailContext.prev = curr;

    }

    public static class PipHandler implements Handler{

        @Override
        public void channelRead(HandlerContext ctx, Object msg) {
            System.out.println("接收"+(String) msg +"進(jìn)行資源釋放");
        }

        @Override
        public void write(HandlerContext ctx, Object msg) {
            System.out.println("寫出"+msg.toString());
        }

        @Override
        public void flush(HandlerContext ctx) {
            System.out.println("flush");
        }
    }
}