/*
 * Copyright 1989 Massachusetts Institute of Technology
 *
 * Permission to use, copy, modify, and distribute this software and its
 * documentation for any purpose and without fee is hereby granted, provided
 * that the above copyright notice appear in all copies and that both that
 * copyright notice and this permission notice appear in supporting
 * documentation, and that the name of M.I.T. not be used in advertising
 * or publicity pertaining to distribution of the software without specific,
 * written prior permission.  M.I.T. makes no representations about the
 * suitability of this software for any purpose.  It is provided "as is"
 * without express or implied warranty.
 *
 * M.I.T. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL M.I.T.
 * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
 * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
 * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

/***********************************************************************
 *
 * $XConsortium: cursor.c,v 1.10 89/12/14 14:52:23 jim Exp $
 *
 * cursor creation code
 *
 * 05-Apr-89 Thomas E. LaStrange	File created
 *
 ***********************************************************************/

#include <stdio.h>
#include "twm.h"
#include <X11/Xos.h>
#include "screen.h"
#include "image_formats.h"
#include "util.h"
#include "prototypes.h"

static struct _CursorName
{
  char *name;
  unsigned int shape;
  Cursor cursor;
} cursor_names[] =
{

  {
  "X_cursor", XC_X_cursor, None},
  {
  "arrow", XC_arrow, None},
  {
  "based_arrow_down", XC_based_arrow_down, None},
  {
  "based_arrow_up", XC_based_arrow_up, None},
  {
  "boat", XC_boat, None},
  {
  "bogosity", XC_bogosity, None},
  {
  "bottom_left_corner", XC_bottom_left_corner, None},
  {
  "bottom_right_corner", XC_bottom_right_corner, None},
  {
  "bottom_side", XC_bottom_side, None},
  {
  "bottom_tee", XC_bottom_tee, None},
  {
  "box_spiral", XC_box_spiral, None},
  {
  "center_ptr", XC_center_ptr, None},
  {
  "circle", XC_circle, None},
  {
  "clock", XC_clock, None},
  {
  "coffee_mug", XC_coffee_mug, None},
  {
  "cross", XC_cross, None},
  {
  "cross_reverse", XC_cross_reverse, None},
  {
  "crosshair", XC_crosshair, None},
  {
  "diamond_cross", XC_diamond_cross, None},
  {
  "dot", XC_dot, None},
  {
  "dotbox", XC_dotbox, None},
  {
  "double_arrow", XC_double_arrow, None},
  {
  "draft_large", XC_draft_large, None},
  {
  "draft_small", XC_draft_small, None},
  {
  "draped_box", XC_draped_box, None},
  {
  "exchange", XC_exchange, None},
  {
  "fleur", XC_fleur, None},
  {
  "gobbler", XC_gobbler, None},
  {
  "gumby", XC_gumby, None},
  {
  "hand1", XC_hand1, None},
  {
  "hand2", XC_hand2, None},
  {
  "heart", XC_heart, None},
  {
  "icon", XC_icon, None},
  {
  "iron_cross", XC_iron_cross, None},
  {
  "left_ptr", XC_left_ptr, None},
  {
  "left_side", XC_left_side, None},
  {
  "left_tee", XC_left_tee, None},
  {
  "leftbutton", XC_leftbutton, None},
  {
  "ll_angle", XC_ll_angle, None},
  {
  "lr_angle", XC_lr_angle, None},
  {
  "man", XC_man, None},
  {
  "middlebutton", XC_middlebutton, None},
  {
  "mouse", XC_mouse, None},
  {
  "pencil", XC_pencil, None},
  {
  "pirate", XC_pirate, None},
  {
  "plus", XC_plus, None},
  {
  "question_arrow", XC_question_arrow, None},
  {
  "right_ptr", XC_right_ptr, None},
  {
  "right_side", XC_right_side, None},
  {
  "right_tee", XC_right_tee, None},
  {
  "rightbutton", XC_rightbutton, None},
  {
  "rtl_logo", XC_rtl_logo, None},
  {
  "sailboat", XC_sailboat, None},
  {
  "sb_down_arrow", XC_sb_down_arrow, None},
  {
  "sb_h_double_arrow", XC_sb_h_double_arrow, None},
  {
  "sb_left_arrow", XC_sb_left_arrow, None},
  {
  "sb_right_arrow", XC_sb_right_arrow, None},
  {
  "sb_up_arrow", XC_sb_up_arrow, None},
  {
  "sb_v_double_arrow", XC_sb_v_double_arrow, None},
  {
  "shuttle", XC_shuttle, None},
  {
  "sizing", XC_sizing, None},
  {
  "spider", XC_spider, None},
  {
  "spraycan", XC_spraycan, None},
  {
  "star", XC_star, None},
  {
  "target", XC_target, None},
  {
  "tcross", XC_tcross, None},
  {
  "top_left_arrow", XC_top_left_arrow, None},
  {
  "top_left_corner", XC_top_left_corner, None},
  {
  "top_right_corner", XC_top_right_corner, None},
  {
  "top_side", XC_top_side, None},
  {
  "top_tee", XC_top_tee, None},
  {
  "trek", XC_trek, None},
  {
  "ul_angle", XC_ul_angle, None},
  {
  "umbrella", XC_umbrella, None},
  {
  "ur_angle", XC_ur_angle, None},
  {
  "watch", XC_watch, None},
  {
"xterm", XC_xterm, None},};

void
NewFontCursor(Cursor * cp, char *str)
{
  int i;

  for (i = 0; i < sizeof(cursor_names) / sizeof(struct _CursorName); i++)
  {
    if (strcmp(str, cursor_names[i].name) == 0)
    {
      if (cursor_names[i].cursor == None)
	cursor_names[i].cursor = XCreateFontCursor(dpy, cursor_names[i].shape);
      *cp = cursor_names[i].cursor;
      return;
    }
  }
  fprintf(stderr, "%s:  unable to find font cursor \"%s\"\n", ProgramName, str);
}

void
NewBitmapCursor(Cursor * cp, char *source, char *mask)
{
  XColor fore, back;
  int hotx, hoty;
  int sx, sy, mx, my;
  unsigned int sw, sh, mw, mh;
  Pixmap spm, mpm;
  Colormap cmap = Scr->TwmRoot.cmaps.cwins[0]->colormap->c;

  fore.pixel = Scr->Black;
  XQueryColor(dpy, cmap, &fore);
  back.pixel = Scr->White;
  XQueryColor(dpy, cmap, &back);

  spm = GetBitmap(source);
  if ((hotx = HotX) < 0)
    hotx = 0;
  if ((hoty = HotY) < 0)
    hoty = 0;
  mpm = GetBitmap(mask);

  /* make sure they are the same size */

  XGetGeometry(dpy, spm, &JunkRoot, &sx, &sy, &sw, &sh, &JunkBW, &JunkDepth);
  XGetGeometry(dpy, mpm, &JunkRoot, &mx, &my, &mw, &mh, &JunkBW, &JunkDepth);
  if (sw != mw || sh != mh)
  {
    fprintf(stderr, "%s:  cursor bitmaps \"%s\" and \"%s\" not the same size\n", ProgramName, source, mask);
    return;
  }
  *cp = XCreatePixmapCursor(dpy, spm, mpm, &fore, &back, hotx, hoty);
}


/*
  Local Variables:
  mode:c
  c-file-style:"GNU"
  c-file-offsets:((substatement-open 0)(brace-list-open 0)(c-hanging-comment-ender-p . nil)(c-hanging-comment-beginner-p . nil)(comment-start . "// ")(comment-end . "")(comment-column . 48))
  End:
*/
/* vim: sw=2
*/