11ab64890Smrg/* 21ab64890Smrg 31ab64890SmrgCopyright 1987, 1998 The Open Group 41ab64890Smrg 51ab64890SmrgPermission to use, copy, modify, distribute, and sell this software and its 61ab64890Smrgdocumentation for any purpose is hereby granted without fee, provided that 71ab64890Smrgthe above copyright notice appear in all copies and that both that 81ab64890Smrgcopyright notice and this permission notice appear in supporting 91ab64890Smrgdocumentation. 101ab64890Smrg 111ab64890SmrgThe above copyright notice and this permission notice shall be included in 121ab64890Smrgall copies or substantial portions of the Software. 131ab64890Smrg 141ab64890SmrgTHE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 151ab64890SmrgIMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 161ab64890SmrgFITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE 171ab64890SmrgOPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN 181ab64890SmrgAN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN 191ab64890SmrgCONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. 201ab64890Smrg 211ab64890SmrgExcept as contained in this notice, the name of The Open Group shall not be 221ab64890Smrgused in advertising or otherwise to promote the sale, use or other dealings 231ab64890Smrgin this Software without prior written authorization from The Open Group. 241ab64890Smrg 251ab64890Smrg*/ 261ab64890Smrg 271ab64890Smrg#ifdef HAVE_CONFIG_H 281ab64890Smrg#include <config.h> 291ab64890Smrg#endif 301ab64890Smrg#include "Xlibint.h" 311ab64890Smrgstatic XColor _Xconst foreground = { 0, 0, 0, 0 }; /* black */ 321ab64890Smrgstatic XColor _Xconst background = { 0, 65535, 65535, 65535 }; /* white */ 331ab64890Smrg 341ab64890SmrgCursor XCreateFontCursor( 351ab64890Smrg Display *dpy, 361ab64890Smrg unsigned int which) 371ab64890Smrg{ 3861b2299dSmrg /* 391ab64890Smrg * the cursor font contains the shape glyph followed by the mask 401ab64890Smrg * glyph; so character position 0 contains a shape, 1 the mask for 0, 411ab64890Smrg * 2 a shape, etc. <X11/cursorfont.h> contains hash define names 421ab64890Smrg * for all of these. 431ab64890Smrg */ 441ab64890Smrg 451ab64890Smrg if (dpy->cursor_font == None) { 461ab64890Smrg dpy->cursor_font = XLoadFont (dpy, CURSORFONT); 471ab64890Smrg if (dpy->cursor_font == None) return None; 481ab64890Smrg } 491ab64890Smrg 5061b2299dSmrg return XCreateGlyphCursor (dpy, dpy->cursor_font, dpy->cursor_font, 511ab64890Smrg which, which + 1, &foreground, &background); 521ab64890Smrg} 531ab64890Smrg 54