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