Return to Cursors.c CVS log

Up to [Research Unix] / researchv9 / X11 / src / X.V11R1 / lib / oldXtk

researchv9-SUN3(old)

/* $Header: /var/lib/cvsd/repos/research/researchv9/X11/src/X.V11R1/lib/oldXtk/Cursors.c,v 1.1.1.1 2018/04/24 17:22:00 root Exp $ */
#ifndef lint
static char *sccsid = "@(#)Cursors.c	1.4	2/25/87";
#endif lint

/*
 * Copyright 1987 by Digital Equipment Corporation, Maynard, Massachusetts.
 * 
 *                         All Rights Reserved
 * 
 * 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 Digital Equipment
 * Corporation not be used in advertising or publicity pertaining to
 * distribution of the software without specific, written prior permission.  
 * 
 * 
 * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
 * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
 * DIGITAL 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.
 */


#include "Xlib.h"
#include "Intrinsic.h"

static Cursor 	*cursorarray = NULL;
static int 	numcursors = 0;

static Boolean initialized = FALSE;


void CursorsInitialize()
{
    if (initialized)
    	return;
    initialized = TRUE;
    numcursors = 1;
    cursorarray = (Cursor *) XtMalloc(sizeof(Cursor));
    *cursorarray = NULL;
}

Cursor XtGetCursor(dpy, num)
    Display *dpy;
    int num;
{
    if (num >= numcursors) {
	cursorarray = (Cursor *) XtRealloc((char *)cursorarray,
					(unsigned) (num + 1) * sizeof(Cursor));
	for (; numcursors <= num ; numcursors++)
	    cursorarray[numcursors] = NULL;
    }
    if (cursorarray[num] == NULL)
	cursorarray[num] = XCreateFontCursor(dpy, (unsigned) num);
    return cursorarray[num];
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.