// Copyright (C) 2010, 2011, 2012, 2013 GlavSoft LLC.
// All rights reserved.
//
//-------------------------------------------------------------------------
// This file is part of the TightVNC software.  Please visit our Web site:
//
//                       http://www.tightvnc.com/
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License along
// with this program; if not, write to the Free Software Foundation, Inc.,
// 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
//-------------------------------------------------------------------------
//

package com.glavsoft.rfb.encoding.decoder;

import jp.ac.u_ryukyu.ie.cr.DecodeInfomation;
import alice.datasegment.DataSegment;
import alice.datasegment.ReceiveData;

import com.glavsoft.drawing.Renderer;
import com.glavsoft.exceptions.TransportException;
import com.glavsoft.transport.Reader;

/**
 * Decoder for RichCursor pseudo encoding
 */
public class RichCursorDecoder extends Decoder {
	private static RichCursorDecoder instance = new RichCursorDecoder();

	private RichCursorDecoder() { /*empty*/ }

	public static RichCursorDecoder getInstance() {
		return instance;
	}

	@Override
	public void decode(Reader reader, Renderer renderer,
			FramebufferUpdateRectangle rect) throws TransportException {
		int bytesPerPixel = renderer.getBytesPerPixel();
		int length = rect.width * rect.height * bytesPerPixel;
		if (0 == length)
			return;
		byte[] buffer = ByteBuffer.getInstance().getBuffer(length);
		reader.readBytes(buffer, 0, length);		
		
		StringBuilder sb = new StringBuilder(" ");
		for (int i=0; i<length; ++i) {
			sb.append(Integer.toHexString(buffer[i]&0xff)).append(" ");
		}
		int scanLine = (int) Math.floor((rect.width + 7) / 8);
		byte[] bitmask = new byte[scanLine * rect.height];
		reader.readBytes(bitmask, 0, bitmask.length);

		DecodeInfomation message = new DecodeInfomation();
        message.setRectangle(rect);
        message.bitmask = bitmask.clone();
        
        ReceiveData rData = new ReceiveData(buffer.clone());
        DataSegment.getLocal().put("pixelData", rData, false);
        rData = new ReceiveData(message);
        DataSegment.getLocal().put("updateRectangle", rData, false);
		
		sb = new StringBuilder(" ");
		for (int i=0; i<bitmask.length; ++i) {
			sb.append(Integer.toHexString(bitmask[i]&0xff)).append(" ");
		}
		int[] cursorPixels = new int[rect.width * rect.height];
		for (int y = 0; y < rect.height; ++y) {
			for (int x = 0; x < rect.width; ++x) {
				int offset = y * rect.width + x;
				cursorPixels[offset] = isBitSet(bitmask[y * scanLine + x / 8], x % 8) ?
					0xFF000000 | renderer.getPixelColor(buffer, offset * bytesPerPixel) :
					0; // transparent
			}
		}
		renderer.createCursor(cursorPixels, rect);
	}

	private boolean isBitSet(byte aByte, int index) {
		return (aByte & 1 << 7 - index) > 0;
	}

	public void decode(Renderer renderer, DecodeInfomation message, byte[] buffer)
	        throws TransportException {
	    FramebufferUpdateRectangle rect = message.getFramebufferUpdateRectangle();
        int bytesPerPixel = renderer.getBytesPerPixel();
        int length = rect.width * rect.height * bytesPerPixel;
        if (0 == length)
            return;        
        byte[] bitmask = message.bitmask;

        StringBuilder sb = new StringBuilder(" ");
        int scanLine = (int) Math.floor((rect.width + 7) / 8);
        
        for (int i=0; i<bitmask.length; ++i) {
            sb.append(Integer.toHexString(bitmask[i]&0xff)).append(" ");
        }
        int[] cursorPixels = new int[rect.width * rect.height];
        for (int y = 0; y < rect.height; ++y) {
            for (int x = 0; x < rect.width; ++x) {
                int offset = y * rect.width + x;
                cursorPixels[offset] = isBitSet(bitmask[y * scanLine + x / 8], x % 8) ?
                    0xFF000000 | renderer.getPixelColor(buffer, offset * bytesPerPixel) :
                    0; // transparent
            }
        }
        renderer.createCursor(cursorPixels, rect);
    }
}