package mayton.web;

import javax.servlet.ServletException;
import javax.servlet.http.HttpServlet;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;

import java.io.IOException;
import java.io.OutputStream;
import java.io.DataOutputStream;

import static org.apache.commons.io.EndianUtils.swapShort;

/**
 * GifChessPlayer
 *
 * Links:
 *
 *      http://www.gif4j.com/download.htm
 *      https://github.com/rtyley/animated-gif-lib-for-java
 *
 * Articles:
 *
 *      http://habrahabr.ru/post/127083/
 *
 * RFCs, standards:
 *
 *      http://www.w3.org/Graphics/GIF/spec-gif89a.txt
 *
 */
public class GifChessPlayer extends HttpServlet {

    static int[] GIF_LZW_COMPRESSIONS = {3,4,5,6,7,8,9,10,11,12};

    @Override
    protected void doGet(HttpServletRequest req, HttpServletResponse response) throws ServletException, IOException {
        response.setContentType("image/gif");
        response.setStatus(HttpServletResponse.SC_OK);
        OutputStream os = response.getOutputStream();
        DataOutputStream dos = new DataOutputStream(os);

        // ============ Header ==================

        dos.writeInt(0x47494638); // 47 49 46 38    - "GIF8"
        dos.writeShort(0x3761);   // 37 61          - "7a"

        // ============== Logical Screen Descriptor =================

        final int GIF_IMAGE_DESCRIPTOR           = 0x2c;
        final int GIF_USE_GLOBAL_COLOR_TABLE     = 0b10000000; // Локальная таблица цветов
        final int GIF_COLOR_RESOLUTION_MASK      = 0b01110000; // Цветовое разрешение. Количество цветов равно 2n+1, в нашем случае 4.
        final int GIF_SORTED_COLORS              = 0b00001000; // Цвета не отсортированы.
        final int GIF_COLOR_TABLE_SIZE           = 0b00000111; // Размер таблицы цветов. Занимает 3*2n+1 байт. У нас 12.
        final int GIF_TERMINATOR                 = 0x3b;

        // [04 00] [04 00] 4x4 (размеры logical screen)

        short width  = 4;
        short height = 4;

        dos.writeShort(swapShort(width));
        dos.writeShort(swapShort(height));

        int mask = 0; // 10010001

        mask |= GIF_USE_GLOBAL_COLOR_TABLE;
        mask |= (1 << 4) & GIF_COLOR_RESOLUTION_MASK;
        //mask |= GIF_SORTED_COLORS;
        mask |= 1 & GIF_COLOR_TABLE_SIZE;

        assert mask == 91;

        dos.writeByte(mask); // 91
        dos.writeByte(0x00); // 00
        dos.writeByte(0x00); // 00

        // ============== Global Color Table =========================

        // Near GREEN
        dos.writeByte(0x00); // 04
        dos.writeByte(0xFF); // 02
        dos.writeByte(0x00); // 04

        // Near WHITE
        dos.writeByte(0xFF);
        dos.writeByte(0xFF);
        dos.writeByte(0xFF);

        // Near RED
        dos.writeByte(0xFF);
        dos.writeByte(0x00);
        dos.writeByte(0x00);

        // Not used
        dos.writeByte(0x00);
        dos.writeByte(0x00);
        dos.writeByte(0x00);

        // ============== Image Descriptor [2c] ===================



        dos.writeByte(GIF_IMAGE_DESCRIPTOR);

        short imageX = 0;
        short imageY = 0;
        dos.writeShort(swapShort(imageX));
        dos.writeShort(swapShort(imageY));
        short imageWidth  = 4;
        short imageHeight = 4;
        dos.writeShort(swapShort(imageWidth));
        dos.writeShort(swapShort(imageHeight));
        mask = 0;
        // mask |= LOCAL_COLOR_TABLE; // Локальная таблица цветов не используется.
        // mask |= SORTED_COLORS;
        // mask |= INTERLACE;
        // mask |= RESERVED_MASK;
        // mask |= COLOR_RESOLUTION_MASK;
        dos.writeByte(mask);

        int lzwCodeLength = 2;
        dos.writeByte(lzwCodeLength); // Минимальная длина кода LZW в битах (+1).
        int sectionLength = 7;
        dos.writeByte(sectionLength); // Длина секции с данными.
        // Вы спросите: «Как! Тут же всего один байт,
        // то есть максимальная длина 255?». Верно, но таких
        // секций неограниченное число. Если файл еще не
        // закончился, то после окончания секции опять
        // встретится байт с длиной следующей секции.
        // Код может оказаться разрезанным этим байтом.
        // Нужно запоминать его, чтобы вычислить расположение следующего.

        dos.writeByte(0x84); //  10 000 100
        dos.writeByte(0x62); // 0 110 001 0
        dos.writeByte(0x18); //  000 110 00
        dos.writeByte(0x2A); // 0 010 101 0
        dos.writeByte(0x10); //  000 100 00
        dos.writeByte(0x5D); //  01 011 101
        dos.writeByte(0x00); // 0 000 000 0

        // Это коды, просто записанные подряд друг за другом. Но справа налево! Просто
        // отсчитываем нужное количество бит справа и берем это число. А если байт
        // закончился, то к уже частично полученному значению спереди дописываем число
        // (с оставшимся количеством битов) из второго байта. На практике будет понятнее.
        // Мы узнали, что минимальная длина кода LZW в битах равна 2. Но нужно прибавлять
        // еще 1, т.е. 3. Это означает, что текущий размер кода равен 3 и изначально
        // именно по столько битов будем читать.

        // === END ====
        dos.writeByte(0x00);
        // === END of file ===



        dos.writeByte(GIF_TERMINATOR);

        // LZW encoded image data.

        // Extensions

        os.flush();
    }
}