Subversion Repositories shark

/*
 * Project: S.Ha.R.K.
 *
 * Coordinators:
 *   Giorgio Buttazzo    <giorgio@sssup.it>
 *   Paolo Gai           <pj@gandalf.sssup.it>
 *
 * Authors     :
 *   Paolo Gai           <pj@gandalf.sssup.it>
 *   Massimiliano Giorgi <massy@gandalf.sssup.it>
 *   Luca Abeni          <luca@gandalf.sssup.it>
 *   Mauro Marinoni      <mauro.marinoni@unipv.it>
 *   (see the web pages for full authors list)
 *
 * ReTiS Lab (Scuola Superiore S.Anna - Pisa - Italy)
 *
 * http://www.sssup.it
 * http://retis.sssup.it
 * http://shark.sssup.it
 */

/*
 *
 * Auto Pointer management
 *
 */

#include <kernel/kern.h>
#include <modules/sem.h>

#include "../include/drivers/shark_input26.h"
#include "../include/drivers/shark_mouse26.h"

//#define CURTXT_DEBUG

/* these variables are managed by this module but MUST be declared
 * into shark_mouse.c to prevent implicit inclusion of this module
 * when a user link the mouse library
 */
extern MOUSE_HANDLER show_mouse_handler;
extern MOUSE_HANDLER user_mouse_handler;

/* a mutex semaphore */
static sem_t mutex=-1;

/* Setup function */
int _mouse_cursor_init(int cmd, void(*my_show_cursor)(int, int), void(*my_restore_cursor)(int, int));

/*
 *
 * autocursor mouse handler
 *
 */

/* >=0 hide cursor; <0 show cursor */
static int mouse_cursor_state = 0;

/* mouse status */
int autocursormode = 0;

/* saved mouse_position */
static int  saved_x, saved_y;

static void dummy(int x,int y){}

static void (*show_cursor)(int x, int y) = dummy;
static void (*restore_cursor)(int x, int y) = dummy;

/* those are the 4 mouse handlers */
/* AUTOOFF    -> call the user handler with no mouse displayed */
/* WITHOUTSEM -> does not use a mutex semaphore */

/* with no flags */
static void autocursor_mouse_handler_1(MOUSE_EVT *event)
{
#ifdef CURTXT_DEBUG
        printk(KERN_DEBUG "mcurtxt.c: autocursor_mouse_handler_1\n");
#endif

        if (user_mouse_handler != NULL)
                user_mouse_handler(event);

        sem_wait(&mutex);
        if ( (mouse_cursor_state < 0) && (event->x != saved_x || event->y != saved_y)) {
                restore_cursor(saved_x, saved_y);
                saved_x = event->x;
                saved_y = event->y;
                show_cursor(saved_x, saved_y);
        }
        sem_post(&mutex);
}

/* with WITHOUTSEM flag*/
static void autocursor_mouse_handler_2(MOUSE_EVT *event)
{
#ifdef CURTXT_DEBUG
        printk(KERN_DEBUG "mcurtxt.c: autocursor_mouse_handler_2\n");
#endif
        if (user_mouse_handler != NULL)
                user_mouse_handler(event);

        if ( (mouse_cursor_state < 0) && (event->x != saved_x || event->y != saved_y)) {
                restore_cursor(saved_x, saved_y);
                saved_x = event->x;
                saved_y = event->y;
                show_cursor(saved_x, saved_y);
        }
}

/* with AUTOOFF flag*/
static void autocursor_mouse_handler_3(MOUSE_EVT *event)
{
#ifdef CURTXT_DEBUG
        printk(KERN_DEBUG "mcurtxt.c: autocursor_mouse_handler_3\n");
#endif
        sem_wait(&mutex);

        if (mouse_cursor_state < 0) {
                restore_cursor(saved_x, saved_y);
                saved_x = event->x;
                saved_y = event->y;
                if (user_mouse_handler != NULL)
                        user_mouse_handler(event);      
                show_cursor(saved_x, saved_y);
        } else if (user_mouse_handler != NULL)
                user_mouse_handler(event);

        sem_post(&mutex);
}

/* with WITHOUTSEM & AUTOOFF flags */
static void autocursor_mouse_handler_4(MOUSE_EVT *event)
{
#ifdef CURTXT_DEBUG
        printk(KERN_DEBUG "mcurtxt.c: autocursor_mouse_handler_4\n");
#endif
        if (mouse_cursor_state < 0) {
                restore_cursor(saved_x, saved_y);
                saved_x = event->x;
                saved_y = event->y;
                if (user_mouse_handler != NULL)
                        user_mouse_handler(event);      
                show_cursor(saved_x, saved_y);
        } else if (user_mouse_handler != NULL)
                user_mouse_handler(event);
}

/* --------------
 * TXT management
 * --------------
 */

/* text cursor shape */
#define DEFAULTTXTSHAPE 0x7700ffff
static DWORD saved_txtshape = DEFAULTTXTSHAPE;
static BYTE attr_andmask, attr_xormask;
static BYTE c_andmask, c_xormask;

/* saved values */
static BYTE saved_attr, saved_c;

/* show txt cursor */
void show_txt_cursor(int x, int y)
{
        int attr,c;

        getc_xy(x, y, &saved_attr, &saved_c);
        attr = (saved_attr & attr_andmask) ^ attr_xormask;
        c = (saved_c & c_andmask) ^ c_xormask;
        putc_xy(x, y, attr, c);
}

/* restore txt cursor */
static void restore_txt_cursor(int x, int y)
{
        putc_xy(x, y, saved_attr, saved_c);
}

/* define text shape */
int mouse_txtshape(DWORD img)
{
        int cond;

        if (img == DEFAULT)
                img = DEFAULTTXTSHAPE;

        cond = ( (autocursormode & STATUSMASK) == ENABLE && (autocursormode & TXTCURSOR) == TXTCURSOR );
 
        if (cond)
                restore_txt_cursor(saved_x, saved_y);

        saved_txtshape = img;
        c_andmask = img & 0xff;
        attr_andmask = (img & 0xff00) >> 8;
        c_xormask = (img & 0xff0000) >> 16;
        attr_xormask = (img & 0xff000000) >> 24;
       
#ifdef CURTXT_DEBUG
        printk(KERN_DEBUG "MouseTxt_Shape: %x %x %x %x\n", c_andmask, attr_andmask, c_xormask, attr_xormask);
#endif
        if (cond)
                show_txt_cursor(saved_x, saved_y);

        return 0;
}

/*
 * User interface to autocursor functions
 */

/* display the cursor */
#define MOUSE_ON() { \
        int unused; \
        unsigned long lunused; \
        mouse_cursor_state--; \
        if (mouse_cursor_state == -1) { \
                mouse_getposition(&saved_x, &saved_y, &unused, &lunused); \
                show_cursor(saved_x, saved_y); \
        } \
}

static void mouse_on_sem(void)
{
        sem_wait(&mutex);
        MOUSE_ON();
        sem_post(&mutex);
}

static void mouse_on_nosem(void)
{
        MOUSE_ON();
}

void (*mouse_on)(void)=mouse_on_nosem;

/* hide the cursor */
#define MOUSE_OFF() { \
        mouse_cursor_state++; \
        if (mouse_cursor_state == 0) \
                restore_cursor(saved_x, saved_y); \
}

void mouse_off_sem(void)
{
        sem_wait(&mutex);
        MOUSE_OFF();
        sem_post(&mutex);
}

void mouse_off_nosem(void)
{
        MOUSE_OFF();
}

void (*mouse_off)(void) = mouse_off_nosem;

static MOUSE_HANDLER wich_handler(int cmd)
{
        if ( ((cmd & WITHOUTSEM) == WITHOUTSEM) && ((cmd & AUTOOFF) == AUTOOFF) )
                return autocursor_mouse_handler_4;
        if ((cmd & WITHOUTSEM) == WITHOUTSEM)
                return autocursor_mouse_handler_2;
        if ((cmd & AUTOOFF) == AUTOOFF)
                return autocursor_mouse_handler_3;
        return autocursor_mouse_handler_1;
}

int mouse_txtcursor(int cmd)
{
        mouse_txtshape(saved_txtshape);  
        return _mouse_cursor_init(cmd|TXTCURSOR, show_txt_cursor, restore_txt_cursor);
}

/* Generic functions, both for text & graphics mode */

int _mouse_cursor_init(int cmd, void(*my_show_cursor)(int, int), void(*my_restore_cursor)(int, int))
{
        if (mutex == -1) {
                if (sem_init(&mutex, 0, 1) == -1)
                        return -1;
        }

#ifdef CURTXT_DEBUG
        printk(KERN_DEBUG "mouse_cursor_init: command %x\n", cmd);
#endif

        switch (cmd & STATUSMASK) {
                case DISABLE:
                        //show_mouse_handler = user_mouse_handler;
                        show_mouse_handler = NULL;
                        restore_cursor(saved_x, saved_y);
                        show_cursor = dummy;
                        restore_cursor = dummy;
                        mouse_cursor_state = 0;
                        break;
                case ENABLE:
                        restore_cursor(saved_x, saved_y);
                        restore_cursor = my_restore_cursor;
                        show_cursor = my_show_cursor;      
                        if ((autocursormode & STATUSMASK) == DISABLE) {
                                //user_mouse_handler = show_mouse_handler;
                                show_mouse_handler = wich_handler(cmd);
                        }
                        mouse_cursor_state = -1;
                        break;
                default:
                        return -1;
        }  

        autocursormode = cmd;
 
        if ((autocursormode & STATUSMASK) == ENABLE) {
                if ((cmd & WITHOUTSEM) == WITHOUTSEM) {
                        mouse_on = mouse_on_nosem;
                        mouse_off = mouse_off_nosem;
                } else {
                        mouse_on = mouse_on_sem;
                        mouse_off = mouse_off_sem;
                }
        }
 
        return 0;
}

void _mouse_cursor_getposition(int *xptr, int *yptr)
{
        *xptr = saved_x;
        *yptr = saved_y;
}