/*
 * Copyright 2001-2009, Haiku.
 * Distributed under the terms of the MIT License.
 *
 * Authors:
 *              DarkWyrm <bpmagic@columbus.rr.com>
 *              Stephan Aßmus <superstippi@gmx.de>
 *              Axel Dörfler, axeld@pinc-software.de
 */


/*!     Although descended from ServerBitmaps, ServerCursors are not handled by
        the BitmapManager, but the CursorManager instead. Until they have been
        attached to a CursorManager, you can delete cursors like any other object.

        Unlike BeOS, cursors can be any size or color space, and this class
        accomodates and expands the BeOS API.
*/


#include "CursorManager.h"
#include "ServerCursor.h"

#include <ByteOrder.h>

#include <new>
#include <stdio.h>


using std::nothrow;


/*!     \brief Constructor

        \param r Size of the cursor
        \param cspace Color space of the cursor
        \param flags ServerBitmap flags. See Bitmap.h.
        \param hotspot Hotspot of the cursor
        \param bytesperline Bytes per row for the cursor. See
                ServerBitmap::ServerBitmap()

*/
ServerCursor::ServerCursor(BRect r, color_space format, int32 flags,
                BPoint hotspot, int32 bytesPerRow, screen_id screen)
        :
        ServerBitmap(r, format, flags, bytesPerRow, screen),
        fHotSpot(hotspot),
        fOwningTeam(-1),
        fCursorData(NULL),
        fManager(NULL)
{
        fHotSpot.ConstrainTo(Bounds());
        AllocateBuffer();
}


/*!     \brief Constructor
        \param data Pointer to 68-byte cursor data array. See BeBook entry for
                BCursor for details
*/
ServerCursor::ServerCursor(const uint8* data)
        :
        ServerBitmap(BRect(0, 0, 15, 15), B_RGBA32, 0),
        fHotSpot(0, 0),
        fOwningTeam(-1),
        fCursorData(NULL),
        fManager(NULL)
{
        // 68-byte array used in BeOS for holding cursors.
        // This API has serious problems and should be deprecated (but supported)
        // in R2

        // Now that we have all the setup, we're going to map (for now) the cursor
        // to RGBA32 (little endian). Eventually, there will be support for 16 and
        // 8-bit depths
        // NOTE: review this once we have working PPC graphics cards (big endian).
        if (data) {
                AllocateBuffer();
                uint8* buffer = Bits();
                if (!buffer)
                        return;

                uint16* cursorBits = (uint16*)(data + 4);
                uint16* transparencyBits = (uint16*)(data + 36);
                fHotSpot.Set(data[3], data[2]);

                // for each row in the cursor data
                for (int32 j = 0; j < 16; j++) {
                        uint32* bits = (uint32*)(buffer + (j * BytesPerRow()));

                        // On intel, our bytes end up swapped, so we must swap them back
                        uint16 cursorLine = __swap_int16(cursorBits[j]);
                        uint16 transparencyLine = __swap_int16(transparencyBits[j]);

                        uint16 mask = 1 << 15;

                        // for each column in each row of cursor data
                        for (int32 i = 0; i < 16; i++, mask >>= 1) {
                                // Get the values and dump them to the bitmap
                                if (cursorLine & mask)
                                        bits[i] = 0xff000000; // black
                                else if (transparencyLine & mask)
                                        bits[i] = 0xffffffff; // white
                                else
                                        bits[i] = 0x00000000; // transparent
                        }
                }

                // remember cursor data for later
                fCursorData = new (nothrow) uint8[68];
                if (fCursorData)
                        memcpy(fCursorData, data, 68);

        } else {
                fWidth = 0;
                fHeight = 0;
                fBytesPerRow = 0;
                fSpace = B_NO_COLOR_SPACE;
        }
}


/*!     \brief Constructor
        \param data Pointer to bitmap data in memory,
        the padding bytes should be contained when format less than 32 bpp.
*/
ServerCursor::ServerCursor(const uint8* alreadyPaddedData, uint32 width,
                uint32 height, color_space format)
        :
        ServerBitmap(BRect(0, 0, width - 1, height - 1), format, 0),
        fHotSpot(0, 0),
        fOwningTeam(-1),
        fCursorData(NULL),
        fManager(NULL)
{
        AllocateBuffer();
        if (Bits())
                memcpy(Bits(), alreadyPaddedData, BitsLength());
}


/*!     \brief Copy constructor
        \param cursor cursor to copy
*/
ServerCursor::ServerCursor(const ServerCursor* cursor)
        :
        ServerBitmap(cursor),
        fHotSpot(0, 0),
        fOwningTeam(-1),
        fCursorData(NULL),
        fManager(NULL)
{
        // TODO: Hm. I don't move this into the if clause,
        // because it might break code elsewhere.
        AllocateBuffer();

        if (cursor) {
                if (Bits() && cursor->Bits())
                        memcpy(Bits(), cursor->Bits(), BitsLength());
                fHotSpot = cursor->fHotSpot;
                if (cursor->fCursorData) {
                        fCursorData = new (nothrow) uint8[68];
                        if (fCursorData)
                                memcpy(fCursorData, cursor->fCursorData, 68);
                }
        }
}


//!     Frees the heap space allocated for the cursor's image data
ServerCursor::~ServerCursor()
{
        delete[] fCursorData;
}


/*!     \brief Sets the cursor's hotspot
        \param pt New location of hotspot, constrained to the cursor's boundaries.
*/
void
ServerCursor::SetHotSpot(BPoint hotSpot)
{
        fHotSpot = hotSpot;
        fHotSpot.ConstrainTo(Bounds());
}


void
ServerCursor::AttachedToManager(CursorManager* manager)
{
        fManager = manager;
}