2c6ed5e3dc56ea1e28b690509e57c5d65fe62afa
[freeglut] / src / freeglut_font.c
1 /*
2  * freeglut_font.c
3  *
4  * Bitmap and stroke fonts displaying.
5  *
6  * Copyright (c) 1999-2000 Pawel W. Olszta. All Rights Reserved.
7  * Written by Pawel W. Olszta, <olszta@sourceforge.net>
8  * Creation date: Thu Dec 16 1999
9  *
10  * Permission is hereby granted, free of charge, to any person obtaining a
11  * copy of this software and associated documentation files (the "Software"),
12  * to deal in the Software without restriction, including without limitation
13  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
14  * and/or sell copies of the Software, and to permit persons to whom the
15  * Software is furnished to do so, subject to the following conditions:
16  *
17  * The above copyright notice and this permission notice shall be included
18  * in all copies or substantial portions of the Software.
19  *
20  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
21  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
22  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
23  * PAWEL W. OLSZTA BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
24  * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
25  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
26  */
27
28 #ifdef HAVE_CONFIG_H
29 #include "config.h"
30 #endif
31
32 #include <GL/freeglut.h>
33 #include "freeglut_internal.h"
34
35 /*
36  * TODO BEFORE THE STABLE RELEASE:
37  *
38  *  Test things out ...
39  */
40
41 /* -- IMPORT DECLARATIONS -------------------------------------------------- */
42
43 /*
44  * These are the font faces defined in freeglut_font_data.c file:
45  */
46 extern SFG_Font fgFontFixed8x13;
47 extern SFG_Font fgFontFixed9x15;
48 extern SFG_Font fgFontHelvetica10;
49 extern SFG_Font fgFontHelvetica12;
50 extern SFG_Font fgFontHelvetica18;
51 extern SFG_Font fgFontTimesRoman10;
52 extern SFG_Font fgFontTimesRoman24;
53 extern SFG_StrokeFont fgStrokeRoman;
54 extern SFG_StrokeFont fgStrokeMonoRoman;
55
56
57 /* -- PRIVATE FUNCTIONS ---------------------------------------------------- */
58
59 /*
60  * Matches a font ID with a SFG_Font structure pointer.
61  * This was changed to match the GLUT header style.
62  */
63 static SFG_Font* fghFontByID( void* font )
64 {
65     if( font == GLUT_BITMAP_8_BY_13        )
66         return &fgFontFixed8x13;
67     if( font == GLUT_BITMAP_9_BY_15        )
68         return &fgFontFixed9x15;
69     if( font == GLUT_BITMAP_HELVETICA_10   )
70         return &fgFontHelvetica10;
71     if( font == GLUT_BITMAP_HELVETICA_12   )
72         return &fgFontHelvetica12;
73     if( font == GLUT_BITMAP_HELVETICA_18   )
74         return &fgFontHelvetica18;
75     if( font == GLUT_BITMAP_TIMES_ROMAN_10 )
76         return &fgFontTimesRoman10;
77     if( font == GLUT_BITMAP_TIMES_ROMAN_24 )
78         return &fgFontTimesRoman24;
79
80     fgWarning( "font 0x%08x not found", font );
81     return 0;
82 }
83
84 /*
85  * Matches a font ID with a SFG_StrokeFont structure pointer.
86  * This was changed to match the GLUT header style.
87  */
88 static SFG_StrokeFont* fghStrokeByID( void* font )
89 {
90     if( font == GLUT_STROKE_ROMAN      )
91         return &fgStrokeRoman;
92     if( font == GLUT_STROKE_MONO_ROMAN )
93         return &fgStrokeMonoRoman;
94
95     fgWarning( "stroke font 0x%08x not found", font );
96     return 0;
97 }
98
99
100 /* -- INTERFACE FUNCTIONS -------------------------------------------------- */
101
102 /*
103  * Draw a bitmap character
104  */
105 void FGAPIENTRY glutBitmapCharacter( void* fontID, int character )
106 {
107     const GLubyte* face;
108     SFG_Font* font;
109     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutBitmapCharacter" );
110     font = fghFontByID( fontID );
111     freeglut_return_if_fail( ( character >= 1 )&&( character < 256 ) );
112     freeglut_return_if_fail( font );
113
114     /*
115      * Find the character we want to draw (???)
116      */
117     face = font->Characters[ character ];
118
119     glPushClientAttrib( GL_CLIENT_PIXEL_STORE_BIT );
120     glPixelStorei( GL_UNPACK_SWAP_BYTES,  GL_FALSE );
121     glPixelStorei( GL_UNPACK_LSB_FIRST,   GL_FALSE );
122     glPixelStorei( GL_UNPACK_ROW_LENGTH,  0        );
123     glPixelStorei( GL_UNPACK_SKIP_ROWS,   0        );
124     glPixelStorei( GL_UNPACK_SKIP_PIXELS, 0        );
125     glPixelStorei( GL_UNPACK_ALIGNMENT,   1        );
126     glBitmap(
127         face[ 0 ], font->Height,      /* The bitmap's width and height  */
128         font->xorig, font->yorig,     /* The origin in the font glyph   */
129         ( float )( face[ 0 ] ), 0.0,  /* The raster advance -- inc. x,y */
130         ( face + 1 )                  /* The packed bitmap data...      */
131     );
132     glPopClientAttrib( );
133 }
134
135 void FGAPIENTRY glutBitmapString( void* fontID, const unsigned char *string )
136 {
137     unsigned char c;
138     float x = 0.0f ;
139     SFG_Font* font;
140     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutBitmapString" );
141     font = fghFontByID( fontID );
142     freeglut_return_if_fail( font );
143     if ( !string || ! *string )
144         return;
145
146     glPushClientAttrib( GL_CLIENT_PIXEL_STORE_BIT );
147     glPixelStorei( GL_UNPACK_SWAP_BYTES,  GL_FALSE );
148     glPixelStorei( GL_UNPACK_LSB_FIRST,   GL_FALSE );
149     glPixelStorei( GL_UNPACK_ROW_LENGTH,  0        );
150     glPixelStorei( GL_UNPACK_SKIP_ROWS,   0        );
151     glPixelStorei( GL_UNPACK_SKIP_PIXELS, 0        );
152     glPixelStorei( GL_UNPACK_ALIGNMENT,   1        );
153
154     /*
155      * Step through the string, drawing each character.
156      * A newline will simply translate the next character's insertion
157      * point back to the start of the line and down one line.
158      */
159     while( c = *string++ )
160         if( string[c] == '\n' )
161         {
162             glBitmap ( 0, 0, 0, 0, -x, (float) -font->Height, NULL );
163             x = 0.0f;
164         }
165         else  /* Not an EOL, draw the bitmap character */
166         {
167             const GLubyte* face = font->Characters[ c ];
168
169             glBitmap(
170                 face[ 0 ], font->Height,     /* Bitmap's width and height    */
171                 font->xorig, font->yorig,    /* The origin in the font glyph */
172                 ( float )( face[ 0 ] ), 0.0, /* The raster advance; inc. x,y */
173                 ( face + 1 )                 /* The packed bitmap data...    */
174             );
175
176             x += ( float )( face[ 0 ] );
177         }
178
179     glPopClientAttrib( );
180 }
181
182 /*
183  * Returns the width in pixels of a font's character
184  */
185 int FGAPIENTRY glutBitmapWidth( void* fontID, int character )
186 {
187     SFG_Font* font;
188     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutBitmapWidth" );
189     font = fghFontByID( fontID );
190     freeglut_return_val_if_fail( character > 0 && character < 256, 0 );
191     freeglut_return_val_if_fail( font, 0 );
192     return *( font->Characters[ character ] );
193 }
194
195 /*
196  * Return the width of a string drawn using a bitmap font
197  */
198 int FGAPIENTRY glutBitmapLength( void* fontID, const unsigned char* string )
199 {
200     unsigned char c;
201     int length = 0, this_line_length = 0;
202     SFG_Font* font;
203     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutBitmapLength" );
204     font = fghFontByID( fontID );
205     freeglut_return_val_if_fail( font, 0 );
206     if ( !string || ! *string )
207         return 0;
208
209     while( c = *string++ )
210     {
211         if( c != '\n' )/* Not an EOL, increment length of line */
212             this_line_length += *( font->Characters[ c ]);
213         else  /* EOL; reset the length of this line */
214         {
215             if( length < this_line_length )
216                 length = this_line_length;
217             this_line_length = 0;
218         }
219     }
220     if ( length < this_line_length )
221         length = this_line_length;
222
223     return length;
224 }
225
226 /*
227  * Returns the height of a bitmap font
228  */
229 int FGAPIENTRY glutBitmapHeight( void* fontID )
230 {
231     SFG_Font* font;
232     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutBitmapHeight" );
233     font = fghFontByID( fontID );
234     freeglut_return_val_if_fail( font, 0 );
235     return font->Height;
236 }
237
238 /*
239  * Draw a stroke character
240  */
241 void FGAPIENTRY glutStrokeCharacter( void* fontID, int character )
242 {
243     const SFG_StrokeChar *schar;
244     const SFG_StrokeStrip *strip;
245     int i, j;
246     SFG_StrokeFont* font;
247     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutStrokeCharacter" );
248     font = fghStrokeByID( fontID );
249     freeglut_return_if_fail( character >= 0 );
250     freeglut_return_if_fail( character < font->Quantity );
251     freeglut_return_if_fail( font );
252
253     schar = font->Characters[ character ];
254     freeglut_return_if_fail( schar );
255     strip = schar->Strips;
256
257     for( i = 0; i < schar->Number; i++, strip++ )
258     {
259         glBegin( GL_LINE_STRIP );
260         for( j = 0; j < strip->Number; j++ )
261             glVertex2f( strip->Vertices[ j ].X, strip->Vertices[ j ].Y );
262         glEnd( );
263     }
264     glTranslatef( schar->Right, 0.0, 0.0 );
265 }
266
267 void FGAPIENTRY glutStrokeString( void* fontID, const unsigned char *string )
268 {
269     unsigned char c;
270     int i, j;
271     float length = 0.0;
272     SFG_StrokeFont* font;
273     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutStrokeString" );
274     font = fghStrokeByID( fontID );
275     freeglut_return_if_fail( font );
276     if ( !string || ! *string )
277         return;
278
279     /*
280      * Step through the string, drawing each character.
281      * A newline will simply translate the next character's insertion
282      * point back to the start of the line and down one line.
283      */
284     while( c = *string++ )
285         if( c < font->Quantity )
286         {
287             if( c == '\n' )
288             {
289                 glTranslatef ( -length, -( float )( font->Height ), 0.0 );
290                 length = 0.0;
291             }
292             else  /* Not an EOL, draw the bitmap character */
293             {
294                 const SFG_StrokeChar *schar = font->Characters[ c ];
295                 if( schar )
296                 {
297                     const SFG_StrokeStrip *strip = schar->Strips;
298
299                     for( i = 0; i < schar->Number; i++, strip++ )
300                     {
301                         glBegin( GL_LINE_STRIP );
302                         for( j = 0; j < strip->Number; j++ )
303                             glVertex2f( strip->Vertices[ j ].X,
304                                         strip->Vertices[ j ].Y);
305
306                         glEnd( );
307                     }
308
309                     length += schar->Right;
310                     glTranslatef( schar->Right, 0.0, 0.0 );
311                 }
312             }
313         }
314 }
315
316 /*
317  * Return the width in pixels of a stroke character
318  */
319 int FGAPIENTRY glutStrokeWidth( void* fontID, int character )
320 {
321     const SFG_StrokeChar *schar;
322     SFG_StrokeFont* font;
323     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutStrokeWidth" );
324     font = fghStrokeByID( fontID );
325     freeglut_return_val_if_fail( ( character >= 0 ) &&
326                                  ( character < font->Quantity ),
327                                  0
328     );
329     freeglut_return_val_if_fail( font, 0 );
330     schar = font->Characters[ character ];
331     freeglut_return_val_if_fail( schar, 0 );
332
333     return ( int )( schar->Right + 0.5 );
334 }
335
336 /*
337  * Return the width of a string drawn using a stroke font
338  */
339 int FGAPIENTRY glutStrokeLength( void* fontID, const unsigned char* string )
340 {
341     unsigned char c;
342     float length = 0.0;
343     float this_line_length = 0.0;
344     SFG_StrokeFont* font;
345     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutStrokeLength" );
346     font = fghStrokeByID( fontID );
347     freeglut_return_val_if_fail( font, 0 );
348     if ( !string || ! *string )
349         return 0;
350
351     while( c = *string++ )
352         if( c < font->Quantity )
353         {
354             if( c == '\n' ) /* EOL; reset the length of this line */
355             {
356                 if( length < this_line_length )
357                     length = this_line_length;
358                 this_line_length = 0.0;
359             }
360             else  /* Not an EOL, increment the length of this line */
361             {
362                 const SFG_StrokeChar *schar = font->Characters[ c ];
363                 if( schar )
364                     this_line_length += schar->Right;
365             }
366         }
367     if( length < this_line_length )
368         length = this_line_length;
369     return( int )( length + 0.5 );
370 }
371
372 /*
373  * Returns the height of a stroke font
374  */
375 GLfloat FGAPIENTRY glutStrokeHeight( void* fontID )
376 {
377     SFG_StrokeFont* font;
378     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutStrokeHeight" );
379     font = fghStrokeByID( fontID );
380     freeglut_return_val_if_fail( font, 0.0 );
381     return font->Height;
382 }
383
384 /*** END OF FILE ***/