/*
    SDL - Simple DirectMedia Layer
    Copyright (C) 1997-2006 Sam Lantinga

    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Lesser General Public
    License as published by the Free Software Foundation; either
    version 2.1 of the License, or (at your option) any later version.

    This library 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
    Lesser General Public License for more details.

    You should have received a copy of the GNU Lesser General Public
    License along with this library; if not, write to the Free Software
    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

    Sam Lantinga
    slouken@libsdl.org
*/
#include "SDL_config.h"

#if defined(__APPLE__) && defined(__MACH__)
#include <Carbon/Carbon.h>
#elif TARGET_API_MAC_CARBON && (UNIVERSAL_INTERFACES_VERSION > 0x0335)
#include <Carbon.h>
#else
#include <Quickdraw.h>
#endif

/* Routines that are not supported by the Carbon API... */
#if !TARGET_API_MAC_CARBON
#include <CursorDevices.h>
#endif

#include "SDL_mouse.h"
#include "SDL_macmouse_c.h"


/* The implementation dependent data for the window manager cursor */
struct WMcursor
{
    Cursor curs;
};


void
Mac_FreeWMCursor (_THIS, WMcursor * cursor)
{
    SDL_free (cursor);
}

WMcursor *
Mac_CreateWMCursor (_THIS,
                    Uint8 * data, Uint8 * mask, int w, int h, int hot_x,
                    int hot_y)
{
    WMcursor *cursor;
    int row, bytes;

    /* Allocate the cursor memory */
    cursor = (WMcursor *) SDL_malloc (sizeof (WMcursor));
    if (cursor == NULL) {
        SDL_OutOfMemory ();
        return (NULL);
    }
    SDL_memset (cursor, 0, sizeof (*cursor));

    if (w > 16)
        w = 16;

    if (h > 16)
        h = 16;

    bytes = (w + 7) / 8;

    for (row = 0; row < h; ++row) {
        SDL_memcpy (&cursor->curs.data[row], data, bytes);
        data += bytes;
    }
    for (row = 0; row < h; ++row) {
        SDL_memcpy (&cursor->curs.mask[row], mask, bytes);
        mask += bytes;
    }
    cursor->curs.hotSpot.h = hot_x;
    cursor->curs.hotSpot.v = hot_y;

    /* That was easy. :) */
    return (cursor);
}

int Mac_cursor_showing = 1;

int
Mac_ShowWMCursor (_THIS, WMcursor * cursor)
{
    if (cursor == NULL) {
        if (Mac_cursor_showing) {
            HideCursor ();
            Mac_cursor_showing = 0;
        }
    } else {
        SetCursor (&cursor->curs);
        if (!Mac_cursor_showing) {
            ShowCursor ();
            Mac_cursor_showing = 1;
        }
    }
    return (1);
}

void
Mac_WarpWMCursor (_THIS, Uint16 x, Uint16 y)
{
#if !TARGET_API_MAC_CARBON
    CursorDevice *cursordevice;

    cursordevice = nil;
    CursorDeviceNextDevice (&cursordevice);
    if (cursordevice != nil) {
        WindowPtr saveport;
        Point where;

        GetPort (&saveport);
        SetPort (SDL_Window);
        where.h = x;
        where.v = y;
        LocalToGlobal (&where);
        SetPort (saveport);
        CursorDeviceMoveTo (cursordevice, where.h, where.v);
    }
#endif /* !TARGET_API_MAC_CARBON */
}

/* vi: set ts=4 sw=4 expandtab: */