1 /* $XFree86: xc/lib/GL/glx/xfont.c,v 1.6 2001/05/02 15:06:02 dawes Exp $ */
3 * Mesa 3-D graphics library
6 * Copyright (C) 1999 Brian Paul All Rights Reserved.
8 * Permission is hereby granted, free of charge, to any person obtaining a
9 * copy of this software and associated documentation files (the "Software"),
10 * to deal in the Software without restriction, including without limitation
11 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
12 * and/or sell copies of the Software, and to permit persons to whom the
13 * Software is furnished to do so, subject to the following conditions:
15 * The above copyright notice and this permission notice shall be included
16 * in all copies or substantial portions of the Software.
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
21 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
22 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
23 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27 /* xfonts.c -- glXUseXFont() for Mesa written by
28 * Copyright (C) 1995 Thorsten.Ohl @ Physik.TH-Darmstadt.de
32 This was take from Mesa and modified to work in the real GLX structure.
33 It provides a fully client side implementation of glXUseXFont and is
34 called by that routine when direct rendering is enabled.
37 #ifdef GLX_DIRECT_RENDERING
39 #include "glxclient.h"
41 /* Some debugging info. */
52 dump_char_struct (XCharStruct
*ch
, char *prefix
)
54 printf ("%slbearing = %d, rbearing = %d, width = %d\n",
55 prefix
, ch
->lbearing
, ch
->rbearing
, ch
->width
);
56 printf ("%sascent = %d, descent = %d, attributes = %u\n",
57 prefix
, ch
->ascent
, ch
->descent
, (unsigned int) ch
->attributes
);
61 dump_font_struct (XFontStruct
*font
)
63 printf ("ascent = %d, descent = %d\n", font
->ascent
, font
->descent
);
64 printf ("char_or_byte2 = (%u,%u)\n",
65 font
->min_char_or_byte2
, font
->max_char_or_byte2
);
66 printf ("byte1 = (%u,%u)\n", font
->min_byte1
, font
->max_byte1
);
67 printf ("all_chars_exist = %s\n", font
->all_chars_exist
? "True" :
69 printf ("default_char = %c (\\%03o)\n",
70 (char) (isprint (font
->default_char
) ? font
->default_char
: ' '),
72 dump_char_struct (&font
->min_bounds
, "min> ");
73 dump_char_struct (&font
->max_bounds
, "max> ");
75 for (c
= font
->min_char_or_byte2
; c
<= font
->max_char_or_byte2
; c
++)
78 sprintf (prefix
, "%d> ", c
);
79 dump_char_struct (&font
->per_char
[c
], prefix
);
85 dump_bitmap (unsigned int width
, unsigned int height
, GLubyte
*bitmap
)
90 for (x
= 0; x
< 8*width
; x
++)
91 printf ("%o", 7 - (x
% 8));
93 for (y
= 0; y
< height
; y
++)
96 for (x
= 0; x
< 8*width
; x
++)
97 putchar ((bitmap
[width
*(height
- y
- 1) + x
/8] & (1 << (7 - (x
%
101 for (x
= 0; x
< width
; x
++)
102 printf ("0x%02x, ", bitmap
[width
*(height
- y
- 1) + x
]);
109 /* Implementation. */
111 /* Fill a BITMAP with a character C from thew current font
112 in the graphics context GC. WIDTH is the width in bytes
113 and HEIGHT is the height in bits.
115 Note that the generated bitmaps must be used with
117 glPixelStorei (GL_UNPACK_SWAP_BYTES, GL_FALSE);
118 glPixelStorei (GL_UNPACK_LSB_FIRST, GL_FALSE);
119 glPixelStorei (GL_UNPACK_ROW_LENGTH, 0);
120 glPixelStorei (GL_UNPACK_SKIP_ROWS, 0);
121 glPixelStorei (GL_UNPACK_SKIP_PIXELS, 0);
122 glPixelStorei (GL_UNPACK_ALIGNMENT, 1);
124 Possible optimizations:
126 * use only one reusable pixmap with the maximum dimensions.
127 * draw the entire font into a single pixmap (careful with
128 proportional fonts!).
133 * Generate OpenGL-compatible bitmap.
136 fill_bitmap (Display
*dpy
, Window win
, GC gc
,
137 unsigned int width
, unsigned int height
,
138 int x0
, int y0
, unsigned int c
, GLubyte
*bitmap
)
145 pixmap
= XCreatePixmap (dpy
, win
, 8*width
, height
, 1);
146 XSetForeground(dpy
, gc
, 0);
147 XFillRectangle (dpy
, pixmap
, gc
, 0, 0, 8*width
, height
);
148 XSetForeground(dpy
, gc
, 1);
150 char2b
.byte1
= (c
>> 8) & 0xff;
151 char2b
.byte2
= (c
& 0xff);
153 XDrawString16 (dpy
, pixmap
, gc
, x0
, y0
, &char2b
, 1);
155 image
= XGetImage (dpy
, pixmap
, 0, 0, 8*width
, height
, 1, XYPixmap
);
157 /* Fill the bitmap (X11 and OpenGL are upside down wrt each other). */
158 for (y
= 0; y
< height
; y
++)
159 for (x
= 0; x
< 8*width
; x
++)
160 if (XGetPixel (image
, x
, y
))
161 bitmap
[width
*(height
- y
- 1) + x
/8] |= (1 << (7 - (x
% 8)));
162 XDestroyImage (image
);
165 XFreePixmap (dpy
, pixmap
);
169 * determine if a given glyph is valid and return the
170 * corresponding XCharStruct.
172 static XCharStruct
*isvalid(XFontStruct
*fs
, int which
)
174 unsigned int rows
,pages
;
175 int byte1
= 0, byte2
= 0;
178 rows
= fs
->max_byte1
- fs
->min_byte1
+ 1;
179 pages
= fs
->max_char_or_byte2
- fs
->min_char_or_byte2
+ 1;
183 if ((fs
->min_char_or_byte2
> which
) ||
184 (fs
->max_char_or_byte2
< which
)) valid
= 0;
187 byte2
= which
& 0xff;
189 if ((fs
->min_char_or_byte2
> byte2
) ||
190 (fs
->max_char_or_byte2
< byte2
) ||
191 (fs
->min_byte1
> byte1
) ||
192 (fs
->max_byte1
< byte1
)) valid
= 0;
199 return(fs
->per_char
+ (which
-fs
->min_char_or_byte2
) );
202 i
= ((byte1
- fs
->min_byte1
) * pages
) +
203 (byte2
- fs
->min_char_or_byte2
);
204 return(fs
->per_char
+ i
);
207 return(&fs
->min_bounds
);
213 void DRI_glXUseXFont( Font font
, int first
, int count
, int listbase
)
221 unsigned long valuemask
;
224 GLint swapbytes
, lsbfirst
, rowlength
;
225 GLint skiprows
, skippixels
, alignment
;
227 unsigned int max_width
, max_height
, max_bm_width
, max_bm_height
;
232 CC
= __glXGetCurrentContext();
233 dpy
= CC
->currentDpy
;
234 win
= CC
->currentDrawable
;
236 fs
= XQueryFont (dpy
, font
);
239 __glXSetError(CC
, GL_INVALID_VALUE
);
243 /* Allocate a bitmap that can fit all characters. */
244 max_width
= fs
->max_bounds
.rbearing
- fs
->min_bounds
.lbearing
;
245 max_height
= fs
->max_bounds
.ascent
+ fs
->max_bounds
.descent
;
246 max_bm_width
= (max_width
+ 7) / 8;
247 max_bm_height
= max_height
;
249 bm
= (GLubyte
*) Xmalloc((max_bm_width
* max_bm_height
) * sizeof
252 XFreeFontInfo( NULL
, fs
, 1 );
253 __glXSetError(CC
, GL_OUT_OF_MEMORY
);
258 /* get the page info */
259 pages
= fs
->max_char_or_byte2
- fs
->min_char_or_byte2
+ 1;
260 firstchar
= (fs
->min_byte1
<< 8) + fs
->min_char_or_byte2
;
261 lastchar
= (fs
->max_byte1
<< 8) + fs
->max_char_or_byte2
;
262 rows
= fs
->max_byte1
- fs
->min_byte1
+ 1;
263 unsigned int first_char
, last_char
, pages
, rows
;
266 /* Save the current packing mode for bitmaps. */
267 glGetIntegerv (GL_UNPACK_SWAP_BYTES
, &swapbytes
);
268 glGetIntegerv (GL_UNPACK_LSB_FIRST
, &lsbfirst
);
269 glGetIntegerv (GL_UNPACK_ROW_LENGTH
, &rowlength
);
270 glGetIntegerv (GL_UNPACK_SKIP_ROWS
, &skiprows
);
271 glGetIntegerv (GL_UNPACK_SKIP_PIXELS
, &skippixels
);
272 glGetIntegerv (GL_UNPACK_ALIGNMENT
, &alignment
);
274 /* Enforce a standard packing mode which is compatible with
275 fill_bitmap() from above. This is actually the default mode,
276 except for the (non)alignment. */
277 glPixelStorei (GL_UNPACK_SWAP_BYTES
, GL_FALSE
);
278 glPixelStorei (GL_UNPACK_LSB_FIRST
, GL_FALSE
);
279 glPixelStorei (GL_UNPACK_ROW_LENGTH
, 0);
280 glPixelStorei (GL_UNPACK_SKIP_ROWS
, 0);
281 glPixelStorei (GL_UNPACK_SKIP_PIXELS
, 0);
282 glPixelStorei (GL_UNPACK_ALIGNMENT
, 1);
284 pixmap
= XCreatePixmap (dpy
, win
, 10, 10, 1);
285 values
.foreground
= BlackPixel (dpy
, DefaultScreen (dpy
));
286 values
.background
= WhitePixel (dpy
, DefaultScreen (dpy
));
287 values
.font
= fs
->fid
;
288 valuemask
= GCForeground
| GCBackground
| GCFont
;
289 gc
= XCreateGC (dpy
, pixmap
, valuemask
, &values
);
290 XFreePixmap (dpy
, pixmap
);
294 dump_font_struct (fs
);
297 for (i
= 0; i
< count
; i
++)
299 unsigned int width
, height
, bm_width
, bm_height
;
300 GLfloat x0
, y0
, dx
, dy
;
303 unsigned int c
= first
+ i
;
304 int list
= listbase
+ i
;
307 /* check on index validity and get the bounds */
310 ch
= &fs
->max_bounds
;
319 sprintf (s
, isprint (c
) ? "%c> " : "\\%03o> ", c
);
320 dump_char_struct (ch
, s
);
324 /* glBitmap()' parameters:
325 straight from the glXUseXFont(3) manpage. */
326 width
= ch
->rbearing
- ch
->lbearing
;
327 height
= ch
->ascent
+ ch
->descent
;
329 y0
= ch
->descent
- 1;
333 /* X11's starting point. */
337 /* Round the width to a multiple of eight. We will use this also
338 for the pixmap for capturing the X11 font. This is slightly
339 inefficient, but it makes the OpenGL part real easy. */
340 bm_width
= (width
+ 7) / 8;
343 glNewList (list
, GL_COMPILE
);
344 if (valid
&& (bm_width
> 0) && (bm_height
> 0)) {
346 memset (bm
, '\0', bm_width
* bm_height
);
347 fill_bitmap (dpy
, win
, gc
, bm_width
, bm_height
, x
, y
, c
, bm
);
349 glBitmap (width
, height
, x0
, y0
, dx
, dy
, bm
);
352 printf ("width/height = %u/%u\n", width
, height
);
353 printf ("bm_width/bm_height = %u/%u\n", bm_width
,
355 dump_bitmap (bm_width
, bm_height
, bm
);
359 glBitmap (0, 0, 0.0, 0.0, dx
, dy
, NULL
);
365 XFreeFontInfo( NULL
, fs
, 1 );
368 /* Restore saved packing modes. */
369 glPixelStorei(GL_UNPACK_SWAP_BYTES
, swapbytes
);
370 glPixelStorei(GL_UNPACK_LSB_FIRST
, lsbfirst
);
371 glPixelStorei(GL_UNPACK_ROW_LENGTH
, rowlength
);
372 glPixelStorei(GL_UNPACK_SKIP_ROWS
, skiprows
);
373 glPixelStorei(GL_UNPACK_SKIP_PIXELS
, skippixels
);
374 glPixelStorei(GL_UNPACK_ALIGNMENT
, alignment
);