Home | History | Annotate | Line # | Download | only in hpc 
      1 /*	$NetBSD: fontconv.c,v 1.3 2001/11/13 12:47:56 lukem Exp $	*/
      2 
      3 #include <sys/cdefs.h>
      4 __KERNEL_RCSID(0, "$NetBSD: fontconv.c,v 1.3 2001/11/13 12:47:56 lukem Exp $");
      5 
      6 #include <stdio.h>
      7 
      8 
      9 int width, height, ascent;
     10 char *fontname;
     11 FILE *ifp;
     12 FILE *ofp;
     13 
     14 
     15 void fc_rcons(int ac, char* av[]);
     16 void fc_rasops(int ac, char* av[]);
     17 
     18 
     19 main(int ac, char* av[])
     20 {
     21 	ifp = stdin;
     22 	ofp = stdout;
     23 	width = 8;
     24 	height = 8;
     25 	ascent = 8;
     26 	fontname = "vt220l";
     27 
     28 	/*
     29 	  fc_rcons(ac, av);
     30 	*/
     31 	fc_rasops(ac, av);
     32 }
     33 
     34 
     35 void
     36 fc_rasops(int ac, char* av[])
     37 {
     38 	int code;
     39 	int width_in_bytes;
     40 	long code_min = 0x10000;
     41 	long code_max = -1;
     42 
     43 	width_in_bytes = (width + 7) / 8;
     44 
     45 	code = 0;
     46 	fprintf(ofp, "static u_char %s%dx%d_data[] = {\n",
     47 	    fontname, width, height, code);
     48 	while (1) {
     49 		int n;
     50 		int i, j, k;
     51 		unsigned char buf[200];
     52 
     53 		n = fread(buf, width_in_bytes, height, ifp);
     54 		if (n != height) {
     55 			if (!feof(ifp)) {
     56 				perror("fread()");
     57 				exit(1);
     58 			} else {
     59 				break;
     60 			}
     61 		}
     62 
     63 		k = 0;
     64 		fprintf(ofp, "    /* code %d */\n", code);
     65 		for (i = 0; i < height; i++) {
     66 			unsigned long d = 0, m;
     67 			fprintf(ofp, "    ");
     68 			for (j = 0; j < width_in_bytes; j++) {
     69 				d |= (((unsigned long)buf[k]) << (24 - 8*j));
     70 				fprintf(ofp, "0x%02x,", (buf[k] & 0xff));
     71 				k++;
     72 			}
     73 			fprintf(ofp, " /* ");
     74 			for (m = 0x80000000, j = 0; j < width; j++, m >>= 1) {
     75 				printf((m & d) ? "##" : "..");
     76 			}
     77 			fprintf(ofp, " */\n");
     78 		}
     79 		fprintf(ofp, "\n");
     80 		if (code < code_min) {
     81 			code_min = code;
     82 		}
     83 		if (code_max < code) {
     84 			code_max = code;
     85 		}
     86 		code++;
     87 	}
     88 	fprintf(ofp, "};\n");
     89 
     90 	fprintf(ofp, "struct wsdisplay_font %s%dx%d = {\n",
     91 	    fontname, width, height);
     92 	fprintf(ofp, "    \"%s\",\t\t\t/* typeface name */\n", fontname);
     93 	fprintf(ofp, "    0x%02x,\t\t\t/* firstchar */\n", code_min);
     94 	fprintf(ofp, "    %d,\t\t\t/* numchars */\n", code_max - code_min + 1);
     95 	fprintf(ofp, "    WSDISPLAY_FONTENC_ISO,\t/* encoding */\n");
     96 	fprintf(ofp, "    %d,\t\t\t\t/* width */\n", width);
     97 	fprintf(ofp, "    %d,\t\t\t\t/* height */\n", height);
     98 	fprintf(ofp, "    %d,\t\t\t\t/* stride */\n", width_in_bytes);
     99 	fprintf(ofp, "    WSDISPLAY_FONTENC_L2R,\t/* bit order */\n");
    100 	fprintf(ofp, "    WSDISPLAY_FONTENC_L2R,\t/* byte order */\n");
    101 	fprintf(ofp, "    %s%dx%d_data\t\t/* data */\n",
    102 	    fontname, width, height);
    103 	fprintf(ofp, "};\n");
    104 }
    105 
    106 
    107 void
    108 fc_rcons(int ac, char* av[])
    109 {
    110 	int code;
    111 	int width_in_bytes;
    112 	long code_min = 0x10000;
    113 	long code_max = -1;
    114 
    115 	width_in_bytes = (width + 7) / 8;
    116 
    117 	code = 0;
    118 	while (1) {
    119 		int n;
    120 		int i, j, k;
    121 		unsigned char buf[200];
    122 
    123 		n = fread(buf, width_in_bytes, height, ifp);
    124 		if (n != height) {
    125 			if (!feof(ifp)) {
    126 				perror("fread()");
    127 				exit(1);
    128 			} else {
    129 				break;
    130 			}
    131 		}
    132 
    133 		fprintf(ofp, "static u_int32_t %s%dx%d_%d_pix[] = {\n",
    134 		    fontname, width, height, code);
    135 
    136 		k = 0;
    137 		for (i = 0; i < height; i++) {
    138 			unsigned long d = 0, m;
    139 			for (j = 0; j < width_in_bytes; j++) {
    140 				d |= (((unsigned long)buf[k++]) << (24 - 8*j));
    141 			}
    142 			fprintf(ofp, "    0x%08x, /* ", d);
    143 			for (m = 0x80000000, j = 0; j < width; j++, m >>= 1) {
    144 				printf((m & d) ? "##" : "..");
    145 			}
    146 			fprintf(ofp, " */\n");
    147 		}
    148 		fprintf(ofp, "};\n");
    149 		fprintf(ofp, "static struct raster %s%dx%d_%d = {",
    150 		    fontname, width, height, code);
    151 		fprintf(ofp, " %d, %d, 1, 1, %s%dx%d_%d_pix, 0 };\n",
    152 		    width, height, fontname, width, height, code);
    153 		if (code < code_min) {
    154 			code_min = code;
    155 		}
    156 		if (code_max < code) {
    157 			code_max = code;
    158 		}
    159 		code++;
    160 	}
    161 
    162 	fprintf(ofp, "struct raster_font %s%dx%d = {\n",
    163 	    fontname, width, height);
    164 	fprintf(ofp, "    %d, %d, %d, ", width, height, ascent);
    165 	fprintf(ofp, "RASFONT_FIXEDWIDTH|RASFONT_NOVERTICALMOVEMENT,\n");
    166 	fprintf(ofp, "    {\n");
    167 	for (code = code_min; code <= code_max; code++) {
    168 		fprintf(ofp, "        { &%s%dx%d_%d, ",
    169 		    fontname, width, height, code);
    170 		fprintf(ofp, "%d, %d, %d, %d },\n", 0, -ascent, width, 0);
    171 	}
    172 	fprintf(ofp, "    },\n");
    173 	fprintf(ofp, "#ifdef COLORFONT_CACHE\n");
    174 	fprintf(ofp, "    (struct raster_fontcache*) -1\n");
    175 	fprintf(ofp, "#endif /*COLORFONT_CACHE*/\n");
    176 	fprintf(ofp, "};\n");
    177 }
    178