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>
 *   (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
 */

/**
 ------------
 CVS :        $Id: mcurgrx.c,v 1.1 2003-03-24 10:54:17 pj Exp $

 File:        $File$
 Revision:    $Revision: 1.1 $
 Last update: $Date: 2003-03-24 10:54:17 $
 ------------

 Author:        Massimiliano Giorgi
 Date:  24/Giu/99

**/

/*
 * Copyright (C) 2000 Paolo Gai
 *
 * 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 */

/*---------------*
 * GRX Management*
 *---------------*/

#include <kernel/kern.h>
//#include <sys/sys.h>
//#include <mem.h>
#include <drivers/mouse.h>
#include <drivers/glib.h>
#include "_mouse.h"

static BYTE left_ptr_bits[] = {
   0x00, 0x00, 0x08, 0x00, 0x18, 0x00, 0x38, 0x00, 0x78, 0x00, 0xf8, 0x00,
   0xf8, 0x01, 0xf8, 0x03, 0xf8, 0x07, 0xf8, 0x00, 0xd8, 0x00, 0x88, 0x01,
   0x80, 0x01, 0x00, 0x03, 0x00, 0x03, 0x00, 0x00};


static BYTE left_ptrmsk_bits[] = {
   0x0c, 0x00, 0x1c, 0x00, 0x3c, 0x00, 0x7c, 0x00, 0xfc, 0x00, 0xfc, 0x01,
   0xfc, 0x03, 0xfc, 0x07, 0xfc, 0x0f, 0xfc, 0x0f, 0xfc, 0x01, 0xdc, 0x03,
   0xcc, 0x03, 0x80, 0x07, 0x80, 0x07, 0x00, 0x03};

/* if called with NULL -> retrieve next bit of a bits-stream
 * else                -> initialize the bit stream
 */
static int get_bit(BYTE *p)
{
  static BYTE *ptr;
  static BYTE val;
  static int  c;

  if (p!=NULL) {
    ptr=p;
    val=0;
    c=8;
    return 0;
  }

  if (c==8) {
    c=0;
    val=*ptr;
    ptr++;
  } else
    val>>=1;

  c++;
  return val&1;
}

/* dimensions (16x16) */
#define SHAPE_DX MOUSESHAPEDX
#define SHAPE_DY MOUSESHAPEDY

/* shape hot spot (3,1) */
#define HOTSPOT_X MOUSEHOTSPOTX
#define HOTSPOT_Y MOUSEHOTSPOTY

/* cursor shape */
static BYTE shape[SHAPE_DX*SHAPE_DY*4];
/* cursor mask */
static BYTE mask[SHAPE_DX*SHAPE_DY*4];

/* old memory buffer */
static BYTE saved_shape[SHAPE_DX*SHAPE_DY*4];
/* new memory buffer */
static BYTE new_shape[SHAPE_DX*SHAPE_DY*4];

static BYTE *saved_shapeptr=(void*)DEFAULT;
static BYTE *saved_maskptr=(void*)DEFAULT;

static int bpp; // bytes per pixel

/* show grx cursor */
static void show_grx_cursor(int x, int y)
{
  int i;
  x-=HOTSPOT_X-1;
  y-=HOTSPOT_Y-1;
  grx_getimage(x,y,x+SHAPE_DX-1,y+SHAPE_DY-1,saved_shape);
  for(i=0;i<SHAPE_DX*SHAPE_DY*bpp/4;i++)
    ((DWORD*)new_shape)[i]=(((DWORD*)saved_shape)[i]&((DWORD*)mask)[i])|((DWORD*)shape)[i];
  grx_putimage(x,y,x+SHAPE_DX-1,y+SHAPE_DY-1,new_shape);
}

/* restore grx cursor */
static void restore_grx_cursor(int x, int y)
{
  x-=HOTSPOT_X-1;
  y-=HOTSPOT_Y-1;
  grx_putimage(x,y,x+SHAPE_DX-1,y+SHAPE_DY-1,saved_shape);
}

int mouse_grxcursor(int cmd)
{
  mouse_grxshape(saved_shapeptr,saved_maskptr);
  return _mouse_cursor_init(cmd|GRXCURSOR,show_grx_cursor,restore_grx_cursor);
}

/* compute the shape and mask array */
int mouse_grxshape(BYTE *shapeptr, BYTE *maskptr)
{
  int          result;
  grx_vga_modeinfo info;
  int          nb;
  BYTE         b;
  int          pc;
  int          i,j;
  int          saved_x,saved_y;
  int          cond;
 
  result=gd_getmodeinfo(&info);
  if (result==-1) return -1;
  bpp=nb=info.bytesperpixel;

  cond=(
        ((autocursormode&STATUSMASK)==ENABLE)&&
        ((autocursormode&GRXCURSOR)==GRXCURSOR)
       );

  if (cond) {
    _mouse_getsavedposition(&saved_x,&saved_y);
    restore_grx_cursor(saved_x,saved_y);
  }

  if (shapeptr==(void*)DEFAULT) {
    //int h;

    shapeptr=left_ptr_bits;
    pc=0;
    get_bit(left_ptr_bits);
    for (i=0;i<SHAPE_DX*SHAPE_DY;i++) {
      b=get_bit(NULL)?255:0;
      for (j=0;j<nb;j++) shape[pc++]=b;
      //grx_plot(h+180,i+80,b);
    }
  } else {
    memcpy(shape,shapeptr,SHAPE_DX*SHAPE_DY*nb);
    saved_shapeptr=shapeptr;
  }

  /*
  some test!
 
  pc=0;
  for (i=0;i<16;i++)
    for (j=0;j<16;j++) {
      char s[16];
      sprintf(s,"%c",shape[pc++]==0?'-':'*');
      grx_text(s,200+j*8,200+i*8,255,0);
    }
  grx_putimage(200,80,200+15,80+16,shape);
 
  grx_getimage(180,80,180+16,80+16,shape);

  pc=0;
  for (i=0;i<16;i++)
    for (j=0;j<17;j++) {
      char s[16];
      sprintf(s,"%c",shape[pc++]==0?'-':'*');
      grx_text(s,400+j*8,400+i*8,255,0);
    }
  */

  if (maskptr==(void*)DEFAULT) {
    maskptr=left_ptrmsk_bits;
    pc=0;
    get_bit(left_ptrmsk_bits);
    for (i=0;i<SHAPE_DX*SHAPE_DY;i++) {
      b=get_bit(NULL)?0:255;
      for (j=0;j<nb;j++) mask[pc++]=b;
    }
  }else {
    memcpy(mask,maskptr,SHAPE_DX*SHAPE_DY*nb);
    saved_maskptr=maskptr;
  }

  if (cond)
     show_grx_cursor(saved_x,saved_y);

  return 0;
}