xref: /freebsd/lib/libvgl/text.c (revision 40a8ac8f62b535d30349faf28cf47106b7041b83)
1 /*-
2  * Copyright (c) 1991-1997 Søren Schmidt
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer
10  *    in this position and unchanged.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. The name of the author may not be used to endorse or promote products
15  *    derived from this software without specific prior written permission
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  */
28 
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
31 
32 #include <stdio.h>
33 #include <sys/fbio.h>
34 #include "vgl.h"
35 
36 static VGLText		*VGLTextFont = 0;
37 
38 extern byte VGLFont[];
39 
40 int
41 VGLTextSetFontFile(char *filename)
42 {
43 FILE *fd;
44 
45   if (VGLTextFont) {
46     if (VGLTextFont->BitmapArray != VGLFont)
47       free (VGLTextFont->BitmapArray);
48     free(VGLTextFont);
49   }
50 
51   if ((VGLTextFont=(VGLText*)malloc(sizeof(VGLText))) == (VGLText*)0)
52 	return 1;
53 
54   if (filename==NULL) {
55     VGLTextFont->Width = 8;
56     VGLTextFont->Height = 8;
57     VGLTextFont->BitmapArray = VGLFont;
58   }
59   else {
60     if ((fd=fopen(filename, "r"))==(FILE*)0)
61       return 1;
62     fread(&VGLTextFont->Width, 1 , 1, fd);
63     fread(&VGLTextFont->Height, 1 , 1, fd);
64     VGLTextFont->BitmapArray =
65       (byte*)malloc(256*((VGLTextFont->Width + 7)/8)*VGLTextFont->Height);
66     fread(VGLTextFont->BitmapArray, 1,
67       (256*VGLTextFont->Width* VGLTextFont->Height), fd);
68     fclose(fd);
69   }
70   return 0;
71 }
72 
73 void
74 VGLBitmapPutChar(VGLBitmap *Object, int x, int y, byte ch,
75 		 byte fgcol, byte bgcol, int fill, int dir)
76 {
77   int lin, bit;
78 
79   for(lin = 0; lin < VGLTextFont->Height; lin++) {
80     for(bit = 0; bit < VGLTextFont->Width; bit++) {
81       if (VGLTextFont->BitmapArray[((ch*VGLTextFont->Height)+lin)]&(1<<bit))
82         switch (dir) {
83           case 0:
84             VGLSetXY(Object, (x+7-bit), (y+lin), fgcol);
85 	    break;
86           case 1:
87             VGLSetXY(Object, (x+lin), (y-7+bit), fgcol);
88 	    break;
89           case 2:
90             VGLSetXY(Object, (x-7+bit), (y-lin), fgcol);
91 	    break;
92           case 3:
93             VGLSetXY(Object, (x-lin), (y+7-bit), fgcol);
94 	    break;
95           case 4:
96             VGLSetXY(Object, (x+lin+7-bit), (y+lin+bit), fgcol);
97 	    break;
98         }
99       else if (fill)
100         switch (dir) {
101           case 0:
102             VGLSetXY(Object, (x+7-bit), (y+lin), bgcol);
103 	    break;
104           case 1:
105             VGLSetXY(Object, (x+lin), (y-7+bit), bgcol);
106 	    break;
107           case 2:
108             VGLSetXY(Object, (x-7+bit), (y-lin), bgcol);
109 	    break;
110           case 3:
111             VGLSetXY(Object, (x-lin), (y+7-bit), bgcol);
112 	    break;
113           case 4:
114             VGLSetXY(Object, (x+lin+7-bit), (y+lin+bit), bgcol);
115 	    break;
116         }
117     }
118   }
119 }
120 
121 void
122 VGLBitmapString(VGLBitmap *Object, int x, int y, char *str,
123 		byte fgcol, byte bgcol, int fill, int dir)
124 {
125   int pos;
126 
127   for (pos=0; pos<strlen(str); pos++) {
128     switch (dir) {
129       case 0:
130         VGLBitmapPutChar(Object, x+(pos*VGLTextFont->Width), y,
131                          str[pos], fgcol, bgcol, fill, dir);
132 	break;
133       case 1:
134         VGLBitmapPutChar(Object, x, y-(pos*VGLTextFont->Width),
135 		         str[pos], fgcol, bgcol, fill, dir);
136 	break;
137       case 2:
138         VGLBitmapPutChar(Object, x-(pos*VGLTextFont->Width), y,
139 		         str[pos], fgcol, bgcol, fill, dir);
140 	break;
141       case 3:
142         VGLBitmapPutChar(Object, x, y+(pos*VGLTextFont->Width),
143 		         str[pos], fgcol, bgcol, fill, dir);
144 	break;
145       case 4:
146         VGLBitmapPutChar(Object, x+(pos*VGLTextFont->Width),
147                          y-(pos*VGLTextFont->Width),
148 		         str[pos], fgcol, bgcol, fill, dir);
149 	break;
150     }
151   }
152 }
153 
154 byte VGLFont[] = {
155 0,0,0,0,0,0,0,0,126,129,165,129,189,153,129,126,126,255,219,255,195,231,
156 255,126,108,254,254,254,124,56,16,0,16,56,124,254,124,56,16,0,56,124,56,
157 254,254,124,56,124,16,16,56,124,254,124,56,124,0,0,24,60,60,24,0,0,255,
158 255,231,195,195,231,255,255,0,60,102,66,66,102,60,0,255,195,153,189,189,
159 153,195,255,15,7,15,125,204,204,204,120,60,102,102,102,60,24,126,24,63,
160 51,63,48,48,112,240,224,127,99,127,99,99,103,230,192,153,90,60,231,231,
161 60,90,153,128,224,248,254,248,224,128,0,2,14,62,254,62,14,2,0,24,60,126,
162 24,24,126,60,24,102,102,102,102,102,0,102,0,127,219,219,123,27,27,27,0,
163 62,99,56,108,108,56,204,120,0,0,0,0,126,126,126,0,24,60,126,24,126,60,24,
164 255,24,60,126,24,24,24,24,0,24,24,24,24,126,60,24,0,0,24,12,254,12,24,0,
165 0,0,48,96,254,96,48,0,0,0,0,192,192,192,254,0,0,0,36,102,255,102,36,0,0,
166 0,24,60,126,255,255,0,0,0,255,255,126,60,24,0,0,0,0,0,0,0,0,0,0,48,120,
167 120,48,48,0,48,0,108,108,108,0,0,0,0,0,108,108,254,108,254,108,108,0,48,
168 124,192,120,12,248,48,0,0,198,204,24,48,102,198,0,56,108,56,118,220,204,
169 118,0,96,96,192,0,0,0,0,0,24,48,96,96,96,48,24,0,96,48,24,24,24,48,96,0,
170 0,102,60,255,60,102,0,0,0,48,48,252,48,48,0,0,0,0,0,0,0,48,48,96,0,0,0,
171 252,0,0,0,0,0,0,0,0,0,48,48,0,6,12,24,48,96,192,128,0,124,198,206,222,246,
172 230,124,0,48,112,48,48,48,48,252,0,120,204,12,56,96,204,252,0,120,204,12,
173 56,12,204,120,0,28,60,108,204,254,12,30,0,252,192,248,12,12,204,120,0,56,
174 96,192,248,204,204,120,0,252,204,12,24,48,48,48,0,120,204,204,120,204,204,
175 120,0,120,204,204,124,12,24,112,0,0,48,48,0,0,48,48,0,0,48,48,0,0,48,48,
176 96,24,48,96,192,96,48,24,0,0,0,252,0,0,252,0,0,96,48,24,12,24,48,96,0,120,
177 204,12,24,48,0,48,0,124,198,222,222,222,192,120,0,48,120,204,204,252,204,
178 204,0,252,102,102,124,102,102,252,0,60,102,192,192,192,102,60,0,248,108,
179 102,102,102,108,248,0,254,98,104,120,104,98,254,0,254,98,104,120,104,96,
180 240,0,60,102,192,192,206,102,62,0,204,204,204,252,204,204,204,0,120,48,
181 48,48,48,48,120,0,30,12,12,12,204,204,120,0,230,102,108,120,108,102,230,
182 0,240,96,96,96,98,102,254,0,198,238,254,254,214,198,198,0,198,230,246,222,
183 206,198,198,0,56,108,198,198,198,108,56,0,252,102,102,124,96,96,240,0,120,
184 204,204,204,220,120,28,0,252,102,102,124,108,102,230,0,120,204,224,112,
185 28,204,120,0,252,180,48,48,48,48,120,0,204,204,204,204,204,204,252,0,204,
186 204,204,204,204,120,48,0,198,198,198,214,254,238,198,0,198,198,108,56,56,
187 108,198,0,204,204,204,120,48,48,120,0,254,198,140,24,50,102,254,0,120,96,
188 96,96,96,96,120,0,192,96,48,24,12,6,2,0,120,24,24,24,24,24,120,0,16,56,
189 108,198,0,0,0,0,0,0,0,0,0,0,0,255,48,48,24,0,0,0,0,0,0,0,120,12,124,204,
190 118,0,224,96,96,124,102,102,220,0,0,0,120,204,192,204,120,0,28,12,12,124,
191 204,204,118,0,0,0,120,204,252,192,120,0,56,108,96,240,96,96,240,0,0,0,118,
192 204,204,124,12,248,224,96,108,118,102,102,230,0,48,0,112,48,48,48,120,0,
193 12,0,12,12,12,204,204,120,224,96,102,108,120,108,230,0,112,48,48,48,48,
194 48,120,0,0,0,204,254,254,214,198,0,0,0,248,204,204,204,204,0,0,0,120,204,
195 204,204,120,0,0,0,220,102,102,124,96,240,0,0,118,204,204,124,12,30,0,0,
196 220,118,102,96,240,0,0,0,124,192,120,12,248,0,16,48,124,48,48,52,24,0,0,
197 0,204,204,204,204,118,0,0,0,204,204,204,120,48,0,0,0,198,214,254,254,108,
198 0,0,0,198,108,56,108,198,0,0,0,204,204,204,124,12,248,0,0,252,152,48,100,
199 252,0,28,48,48,224,48,48,28,0,24,24,24,0,24,24,24,0,224,48,48,28,48,48,
200 224,0,118,220,0,0,0,0,0,0,0,16,56,108,198,198,254,0,0,0,0,0,0,0,0,0,0,0,
201 60,126,255,126,24,0,170,85,85,170,170,85,85,170,68,68,68,68,31,4,4,4,124,
202 64,64,64,31,16,16,16,56,68,68,56,30,17,20,19,64,64,64,124,31,16,16,16,56,
203 108,56,0,0,0,0,0,0,0,24,24,24,24,126,0,68,100,76,68,16,16,16,31,68,68,40,
204 16,31,4,4,4,24,24,24,24,248,0,0,0,0,0,0,0,248,24,24,24,0,0,0,0,31,24,24,
205 24,24,24,24,24,31,0,0,0,24,24,24,24,255,24,24,24,0,0,0,0,0,0,0,0,0,0,0,
206 0,0,0,0,0,0,0,0,0,255,0,0,0,0,0,0,0,0,0,255,0,0,0,0,0,0,0,0,0,24,24,24,
207 24,31,24,24,24,24,24,24,24,248,24,24,24,24,24,24,24,255,0,0,0,0,0,0,0,255,
208 24,24,24,24,24,24,24,24,24,24,24,0,12,48,96,24,12,126,0,0,48,12,6,24,48,
209 126,0,0,0,3,62,54,54,108,0,0,0,4,126,16,126,64,0,0,28,48,48,48,48,126,0,
210 0,0,0,24,0,0,0,0,0,0,0,0,0,0,0,0,48,0,48,48,120,120,48,0,0,0,16,124,192,
211 192,124,16,0,56,96,96,240,96,252,0,0,195,60,102,102,60,195,0,0,204,204,
212 120,48,252,48,0,24,24,24,0,24,24,24,0,126,192,124,198,124,6,252,0,198,0,
213 0,0,0,0,0,0,124,130,186,162,186,130,124,0,28,6,30,34,31,63,0,0,0,51,102,
214 204,102,51,0,0,0,254,6,0,0,0,0,0,0,0,0,0,0,0,0,0,124,130,186,178,170,130,
215 124,0,254,0,0,0,0,0,0,0,56,108,56,0,0,0,0,0,0,16,124,16,0,124,0,0,28,54,
216 6,24,62,0,0,0,30,2,14,2,30,0,0,0,24,48,0,0,0,0,0,0,0,0,204,204,204,204,
217 118,192,126,202,202,126,10,10,10,0,0,0,0,24,0,0,0,0,0,0,0,0,0,0,24,48,6,
218 14,6,6,6,0,0,0,14,17,17,17,14,31,0,0,0,204,102,51,102,204,0,0,96,224,102,
219 108,51,103,15,3,96,224,102,108,54,106,4,14,240,32,150,108,51,103,15,3,48,
220 0,48,96,192,204,120,0,24,12,48,120,204,252,204,0,96,192,48,120,204,252,
221 204,0,120,132,48,120,204,252,204,0,102,152,48,120,204,252,204,0,204,0,48,
222 120,204,252,204,0,48,72,48,120,204,252,204,0,62,120,152,156,248,152,158,
223 0,60,102,192,192,192,102,28,48,48,24,254,98,120,98,254,0,24,48,254,98,120,
224 98,254,0,56,68,254,98,120,98,254,0,102,0,254,98,120,98,254,0,96,48,120,
225 48,48,48,120,0,24,48,120,48,48,48,120,0,120,132,120,48,48,48,120,0,204,
226 0,120,48,48,48,120,0,120,108,102,246,102,108,120,0,102,152,230,246,222,
227 206,198,0,48,24,124,198,198,198,124,0,24,48,124,198,198,198,124,0,56,68,
228 124,198,198,198,124,0,102,152,124,198,198,198,124,0,198,0,124,198,198,198,
229 124,0,0,198,108,56,56,108,198,0,6,124,206,154,178,230,120,192,96,48,204,
230 204,204,204,252,0,24,48,204,204,204,204,252,0,120,132,204,204,204,204,252,
231 0,204,0,204,204,204,204,252,0,24,48,204,204,120,48,120,0,96,120,108,120,
232 96,96,96,0,120,204,196,220,198,198,220,192,48,24,120,12,124,204,118,0,24,
233 48,120,12,124,204,118,0,120,132,120,12,124,204,118,0,102,152,120,12,124,
234 204,118,0,204,0,120,12,124,204,118,0,48,72,56,12,124,204,118,0,0,0,236,
235 50,126,176,110,0,0,0,60,102,192,102,28,48,48,24,120,204,252,192,120,0,24,
236 48,120,204,252,192,120,0,120,132,120,204,252,192,120,0,204,0,120,204,252,
237 192,120,0,96,48,0,112,48,48,120,0,24,48,0,112,48,48,120,0,112,136,0,112,
238 48,48,120,0,204,0,0,112,48,48,120,0,108,56,108,12,108,204,120,0,102,152,
239 248,204,204,204,204,0,96,48,0,124,198,198,124,0,24,48,0,124,198,198,124,
240 0,56,68,0,124,198,198,124,0,102,152,0,124,198,198,124,0,198,0,0,124,198,
241 198,124,0,0,0,24,0,126,0,24,0,0,0,6,124,222,246,124,192,96,48,0,204,204,
242 204,118,0,24,48,0,204,204,204,118,0,48,72,0,204,204,204,118,0,204,0,0,204,
243 204,204,118,0,24,48,204,204,204,124,12,248,224,120,108,102,108,120,224,
244 0,204,0,204,204,204,124,12,248
245 };
246