annotate src/w32bdf.c @ 26003:f6c190ef2f45

(shell-command, shell-command-on-region): use make-temp-file. (clone-buffer, clone-process, clone-buffer-hook): new functions.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 13 Oct 1999 00:48:17 +0000
parents d2d412758428
children f6a8927824c9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
1 /* Implementation of BDF font handling on the Microsoft W32 API.
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
2 Copyright (C) 1999 Free Software Foundation, Inc.
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
3
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
4 This file is part of GNU Emacs.
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
5
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
6 GNU Emacs is free software; you can redistribute it and/or modify
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
7 it under the terms of the GNU General Public License as published by
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
8 the Free Software Foundation; either version 2, or (at your option)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
9 any later version.
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
10
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
11 GNU Emacs is distributed in the hope that it will be useful,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
14 GNU General Public License for more details.
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
15
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
17 along with GNU Emacs; see the file COPYING. If not, write to
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
19 Boston, MA 02111-1307, USA. */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
20
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
21 /* Based heavily on code by H. Miyashita for Meadow (a descendant of
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
22 MULE for W32). */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
23
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
24 #include <windows.h>
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
25 #include "config.h"
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
26 #include "lisp.h"
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
27 #include "charset.h"
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
28 #include "fontset.h"
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
29 #include "blockinput.h"
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
30 #include "w32gui.h"
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
31 #include "w32term.h"
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
32 #include "w32bdf.h"
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
33
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
34 #define min(a, b) ((a) < (b) ? (a) : (b))
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
35 #define max(a, b) ((a) > (b) ? (a) : (b))
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
36
24841
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
37 /* Portion of GDI Objects which the font cache is allowed to use. This
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
38 can be quite high, since the font cache is the only part of Emacs
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
39 that uses a large number of GDI objects, but there should still be
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
40 some GDI objects reserved for other uses. */
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
41 #define CACHE_GDI_ALLOWANCE 9 / 10
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
42
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
43 void w32_free_bdf_font(bdffont *fontp);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
44 bdffont *w32_init_bdf_font(char *filename);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
45
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
46 static int
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
47 search_file_line(char *key, char *start, int len, char **val, char **next)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
48 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
49 int linelen;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
50 unsigned char *p, *q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
51
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
52 p = memchr(start, '\n', len);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
53 if (!p) return -1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
54 for (;start < p;start++)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
55 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
56 if ((*start != ' ') || (*start != '\t')) break;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
57 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
58 linelen = p - start + 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
59 *next = p + 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
60 if (strncmp(start, key, min(strlen(key), linelen)) == 0)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
61 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
62 *val = start + strlen(key);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
63 return 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
64 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
65
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
66 return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
67 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
68
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
69 static int
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
70 proceed_file_line(char *key, char *start, int *len, char **val, char **next)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
71 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
72 int flag = 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
73
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
74 do {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
75 flag = search_file_line(key, start, *len, val, next);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
76 *len -= (int)(*next - start);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
77 start = *next;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
78 }while(flag == 0);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
79
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
80 if (flag == -1) return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
81 return 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
82 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
83
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
84 char*
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
85 get_quoted_string(char *start, char *end)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
86 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
87 char *p, *q, *result;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
88
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
89 p = memchr(start, '\"', end - start);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
90 q = 0;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
91
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
92 if (!p) return NULL;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
93 p++;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
94 q = memchr(p, '\"', end - q);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
95 if (!q) return NULL;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
96
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
97 result = (char*) xmalloc(q - p + 1);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
98
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
99 memcpy(result, p, q - p);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
100 result[q - p] = '\0';
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
101
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
102 return result;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
103 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
104
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
105 static int
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
106 set_bdf_font_info(bdffont *fontp)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
107 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
108 unsigned char *start, *p, *q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
109 int len, flag;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
110 int bbw, bbh, bbx, bby;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
111 int val1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
112
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
113 len = fontp->size;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
114 start = fontp->font;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
115
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
116 fontp->yoffset = 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
117 fontp->relative_compose = 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
118 fontp->default_ascent = 0;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
119 fontp->registry = NULL;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
120 fontp->encoding = NULL;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
121 fontp->slant = NULL;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
122 /* fontp->width = NULL; */
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
123
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
124 flag = proceed_file_line("FONTBOUNDINGBOX", start, &len, &p, &q);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
125 if (!flag) return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
126 bbw = strtol(p, &start, 10);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
127 p = start;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
128 bbh = strtol(p, &start, 10);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
129 p = start;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
130 bbx = strtol(p, &start, 10);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
131 p = start;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
132 bby = strtol(p, &start, 10);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
133
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
134 fontp->llx = bbx;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
135 fontp->lly = bby;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
136 fontp->urx = bbw + bbx;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
137 fontp->ury = bbh + bby;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
138 fontp->width = bbw;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
139 fontp->height = bbh;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
140 start = q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
141 flag = proceed_file_line("STARTPROPERTIES", start, &len, &p, &q);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
142 if (!flag) return 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
143
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
144 flag = 0;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
145
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
146 do {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
147 start = q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
148 if (search_file_line("PIXEL_SIZE", start, len, &p, &q) == 1)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
149 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
150 val1 = atoi(p);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
151 fontp->pixsz = val1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
152 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
153 else if (search_file_line("FONT_ASCENT", start, len, &p, &q) == 1)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
154 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
155 val1 = atoi(p);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
156 fontp->ury = val1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
157 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
158 else if (search_file_line("FONT_DESCENT", start, len, &p, &q) == 1)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
159 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
160 val1 = atoi(p);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
161 fontp->lly = -val1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
162 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
163 else if (search_file_line("_MULE_BASELINE_OFFSET", start, len, &p, &q) == 1)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
164 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
165 val1 = atoi(p);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
166 fontp->yoffset = val1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
167 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
168 else if (search_file_line("_MULE_RELATIVE_COMPOSE", start, len, &p, &q) == 1)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
169 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
170 val1 = atoi(p);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
171 fontp->relative_compose = val1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
172 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
173 else if (search_file_line("_MULE_DEFAULT_ASCENT", start, len, &p, &q) == 1)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
174 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
175 val1 = atoi(p);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
176 fontp->default_ascent = val1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
177 }
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
178 else if (search_file_line("CHARSET_REGISTRY", start, len, &p, &q) == 1)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
179 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
180 fontp->registry = get_quoted_string(p, q);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
181 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
182 else if (search_file_line("CHARSET_ENCODING", start, len, &p, &q) == 1)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
183 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
184 fontp->encoding = get_quoted_string(p, q);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
185 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
186 else if (search_file_line("SLANT", start, len, &p, &q) == 1)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
187 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
188 fontp->slant = get_quoted_string(p, q);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
189 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
190 /*
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
191 else if (search_file_line("SETWIDTH_NAME", start, len, &p, &q) == 1)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
192 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
193 fontp->width = get_quoted_string(p, q);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
194 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
195 */
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
196 else
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
197 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
198 flag = search_file_line("ENDPROPERTIES", start, len, &p, &q);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
199 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
200 if (flag == -1) return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
201 len -= (q - start);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
202 }while(flag == 0);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
203 start = q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
204 flag = proceed_file_line("CHARS", start, &len, &p, &q);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
205 if (!flag) return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
206 fontp->seeked = q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
207
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
208 return 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
209 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
210
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
211 bdffont*
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
212 w32_init_bdf_font(char *filename)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
213 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
214 HANDLE hfile, hfilemap;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
215 bdffont *bdffontp;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
216 unsigned char *font;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
217 BY_HANDLE_FILE_INFORMATION fileinfo;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
218 int i;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
219
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
220 hfile = CreateFile(filename, GENERIC_READ, FILE_SHARE_READ, NULL,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
221 OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
222 if (hfile == INVALID_HANDLE_VALUE) return NULL;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
223 if (!GetFileInformationByHandle(hfile, &fileinfo) ||
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
224 (fileinfo.nFileSizeHigh != 0) ||
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
225 (fileinfo.nFileSizeLow > BDF_FILE_SIZE_MAX))
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
226 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
227 CloseHandle(hfile);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
228 error("Fail to open BDF file.");
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
229 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
230 hfilemap = CreateFileMapping(hfile, NULL, PAGE_READONLY, 0, 0, NULL);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
231 if (hfilemap == INVALID_HANDLE_VALUE)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
232 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
233 CloseHandle(hfile);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
234 error("Can't map font.");
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
235 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
236
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
237 font = MapViewOfFile(hfilemap, FILE_MAP_READ, 0, 0, 0);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
238
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
239 if (!font)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
240 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
241 CloseHandle(hfile);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
242 CloseHandle(hfilemap);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
243 error("Can't view font.");
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
244 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
245
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
246 bdffontp = (bdffont *) xmalloc(sizeof(bdffont));
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
247
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
248 for(i = 0;i < BDF_FIRST_OFFSET_TABLE;i++)
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
249 bdffontp->chtbl[i] = NULL;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
250 bdffontp->size = fileinfo.nFileSizeLow;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
251 bdffontp->font = font;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
252 bdffontp->hfile = hfile;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
253 bdffontp->hfilemap = hfilemap;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
254 bdffontp->filename = (char*) xmalloc(strlen(filename) + 1);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
255 strcpy(bdffontp->filename, filename);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
256
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
257 if (!set_bdf_font_info(bdffontp))
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
258 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
259 w32_free_bdf_font(bdffontp);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
260 error("Invalid BDF font!");
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
261 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
262 return bdffontp;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
263 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
264
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
265 void
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
266 w32_free_bdf_font(bdffont *fontp)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
267 {
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
268 int i, j;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
269 font_char *pch;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
270 cache_bitmap *pcb;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
271
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
272 UnmapViewOfFile(fontp->hfilemap);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
273 CloseHandle(fontp->hfilemap);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
274 CloseHandle(fontp->hfile);
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
275
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
276 if (fontp->registry) xfree(fontp->registry);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
277 if (fontp->encoding) xfree(fontp->encoding);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
278 if (fontp->slant) xfree(fontp->slant);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
279 /* if (fontp->width) xfree(fontp->width); */
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
280
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
281 xfree(fontp->filename);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
282 for(i = 0;i < BDF_FIRST_OFFSET_TABLE;i++)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
283 {
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
284 pch = fontp->chtbl[i];
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
285 if (pch)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
286 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
287 for (j = 0;j < BDF_SECOND_OFFSET_TABLE;j++)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
288 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
289 pcb = pch[j].pcbmp;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
290 if (pcb) pcb->psrc = NULL;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
291 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
292 xfree(pch);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
293 }
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
294 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
295 xfree(fontp);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
296 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
297
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
298 static font_char*
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
299 get_cached_font_char(bdffont *fontp, int index)
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
300 {
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
301 font_char *pch, *result;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
302 int i;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
303
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
304 if (index > 0xffff)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
305 return NULL;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
306
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
307 pch = fontp->chtbl[BDF_FIRST_OFFSET(index)];
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
308 if (!pch)
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
309 return NULL;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
310 result = &pch[BDF_SECOND_OFFSET(index)];
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
311
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
312 if (!result->offset) return NULL;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
313
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
314 return result;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
315 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
316
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
317 static font_char*
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
318 cache_char_offset(bdffont *fontp, int index, unsigned char *offset)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
319 {
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
320 font_char *pch, *result;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
321 int i;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
322
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
323 if (index > 0xffff)
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
324 return NULL;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
325
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
326 pch = fontp->chtbl[BDF_FIRST_OFFSET(index)];
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
327 if (!pch)
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
328 {
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
329 pch = fontp->chtbl[BDF_FIRST_OFFSET(index)] =
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
330 (font_char*) xmalloc(sizeof(font_char) *
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
331 BDF_SECOND_OFFSET_TABLE);
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
332 memset(pch, 0, sizeof(font_char) * BDF_SECOND_OFFSET_TABLE);
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
333 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
334
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
335 result = &pch[BDF_SECOND_OFFSET(index)];
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
336 result->offset = offset;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
337
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
338 return result;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
339 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
340
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
341 static font_char*
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
342 seek_char(bdffont *fontp, int index)
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
343 {
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
344 font_char *result;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
345 int len, flag, font_index;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
346 unsigned char *start, *p, *q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
347
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
348 if (!fontp->seeked) return NULL;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
349
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
350 start = fontp->seeked;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
351 len = fontp->size - (start - fontp->font);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
352
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
353 do {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
354 flag = proceed_file_line("ENCODING", start, &len, &p, &q);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
355 if (!flag)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
356 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
357 fontp->seeked = NULL;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
358 return NULL;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
359 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
360 font_index = atoi(p);
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
361 result = cache_char_offset(fontp, font_index, q);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
362 if (!result) return NULL;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
363
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
364 start = result->offset;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
365 } while (font_index != index);
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
366 fontp->seeked = start;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
367
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
368 return result;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
369 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
370
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
371 #define GET_HEX_VAL(x) ((isdigit(x)) ? ((x) - '0') : \
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
372 (((x) >= 'A') && ((x) <= 'Z')) ? ((x) - 'A' + 10) : \
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
373 (((x) >= 'a') && ((x) <= 'z')) ? ((x) - 'a' + 10) : \
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
374 (-1))
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
375
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
376 int
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
377 w32_get_bdf_glyph(bdffont *fontp, int index, int size, glyph_struct *glyph)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
378 {
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
379 font_char *pch;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
380 unsigned char *start, *p, *q, *bitmapp;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
381 unsigned char val1, val2;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
382 int i, j, len, flag;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
383
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
384 pch = get_cached_font_char(fontp, index);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
385 if (!pch)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
386 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
387 pch = seek_char(fontp, index);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
388 if (!pch)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
389 return 0;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
390 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
391
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
392 start = pch->offset;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
393
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
394 if ((size == 0) && pch->pcbmp)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
395 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
396 glyph->metric = pch->pcbmp->metric;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
397 return 1;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
398 }
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
399
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
400 len = fontp->size - (start - fontp->font);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
401
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
402 flag = proceed_file_line("DWIDTH", start, &len, &p, &q);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
403 if (!flag)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
404 return 0;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
405 glyph->metric.dwidth = atoi(p);
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
406
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
407 start = q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
408 flag = proceed_file_line("BBX", start, &len, &p, &q);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
409 if (!flag)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
410 return 0;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
411 glyph->metric.bbw = strtol(p, &start, 10);
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
412 p = start;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
413 glyph->metric.bbh = strtol(p, &start, 10);
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
414 p = start;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
415 glyph->metric.bbox = strtol(p, &start, 10);
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
416 p = start;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
417 glyph->metric.bboy = strtol(p, &start, 10);
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
418
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
419 if (size == 0) return 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
420
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
421 start = q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
422 flag = proceed_file_line("BITMAP", start, &len, &p, &q);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
423 if (!flag)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
424 return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
425
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
426 p = q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
427 bitmapp = glyph->bitmap;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
428 for(i = 0;i < glyph->metric.bbh;i++)
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
429 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
430 q = memchr(p, '\n', len);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
431 if (!q) return 0;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
432 for(j = 0;((q > p) && (j < ((glyph->metric.bbw + 7) / 8 )));j++)
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
433 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
434 val1 = GET_HEX_VAL(*p);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
435 if (val1 == -1) return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
436 p++;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
437 val2 = GET_HEX_VAL(*p);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
438 if (val2 == -1) return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
439 p++;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
440 size--;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
441 if (size <= 0) return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
442 /* NAND Operation. */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
443 *bitmapp++ = (unsigned char)~((val1 << 4) | val2);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
444 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
445 /* CreateBitmap requires WORD alignment. */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
446 if (j % 2)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
447 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
448 *bitmapp++ = 0xff;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
449 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
450 p = q + 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
451 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
452
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
453 return 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
454 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
455
24841
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
456 #define NEXT_CACHE_SLOT(n) (((n) + 1 >= BDF_FONT_CACHE_SIZE) ? 0 : ((n) + 1))
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
457
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
458 static
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
459 cache_bitmap*
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
460 get_bitmap_with_cache(bdffont *fontp, int index)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
461 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
462 int bitmap_size;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
463 font_char *pch;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
464 cache_bitmap* pcb;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
465 HBITMAP hbmp;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
466 glyph_struct glyph;
24841
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
467 static cache_bitmap cached_bitmap_slots[BDF_FONT_CACHE_SIZE];
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
468 static int cache_in_slot = 0; /* the next slot to use */
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
469 static int cache_out_slot = 0; /* the last slot allocated */
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
470 static int cache_occupancy = 0; /* current cache occupancy */
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
471 static int cache_limit = BDF_FONT_CACHE_SIZE; /* allowed maximum occupancy */
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
472
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
473 pch = get_cached_font_char(fontp, index);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
474 if (pch)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
475 {
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
476 pcb = pch->pcbmp;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
477 if (pcb) return pcb;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
478 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
479
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
480 bitmap_size = ((fontp->urx - fontp->llx) / 8 + 2) * (fontp->ury - fontp->lly)
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
481 + 256;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
482 glyph.bitmap = (unsigned char*) alloca(sizeof(unsigned char) * bitmap_size);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
483
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
484 if (!w32_get_bdf_glyph(fontp, index, bitmap_size, &glyph))
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
485 return NULL;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
486
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
487 pch = get_cached_font_char(fontp, index);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
488 if (!pch) return NULL;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
489
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
490 hbmp = CreateBitmap(glyph.metric.bbw, glyph.metric.bbh, 1, 1, glyph.bitmap);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
491
24841
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
492 /* if bitmap allocation fails reduce the limit of the occupancy so
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
493 that we can hope it will not happen again. */
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
494 if (hbmp == NULL)
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
495 cache_limit = cache_occupancy * CACHE_GDI_ALLOWANCE;
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
496
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
497 /* if cache occupancy reaches at the limit release some cache slots */
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
498 if (cache_occupancy >= cache_limit)
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
499 {
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
500 register int size_to_clear = cache_limit * BDF_FONT_CLEAR_SIZE
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
501 / BDF_FONT_CACHE_SIZE;
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
502 for (; size_to_clear; size_to_clear--,
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
503 cache_out_slot = NEXT_CACHE_SLOT(cache_out_slot))
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
504 {
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
505 register cache_bitmap *p = &cached_bitmap_slots[cache_out_slot];
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
506 if (p->psrc)
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
507 {
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
508 DeleteObject(p->hbmp);
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
509 p->psrc->pcbmp = NULL;
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
510 p->psrc = NULL;
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
511 cache_occupancy--;
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
512 }
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
513 }
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
514 }
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
515
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
516 if (hbmp == NULL)
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
517 hbmp = CreateBitmap (glyph.metric.bbw, glyph.metric.bbh,
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
518 1, 1, glyph.bitmap);
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
519
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
520 pcb = &cached_bitmap_slots[cache_in_slot];
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
521
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
522 pcb->psrc = pch;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
523 pcb->metric = glyph.metric;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
524 pcb->hbmp = hbmp;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
525
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
526 pch->pcbmp = pcb;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
527
24841
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
528 cache_in_slot = NEXT_CACHE_SLOT(cache_in_slot);
d2d412758428 (clear_cached_bitmap_slots): Remove.
Jason Rumney <jasonr@gnu.org>
parents: 24496
diff changeset
529 cache_occupancy++;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
530
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
531 return pcb;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
532 }
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
533
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
534 int
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
535 w32_BDF_TextOut(bdffont *fontp, HDC hdc, int left,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
536 int top, unsigned char *text, int dim, int bytelen,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
537 int fixed_pitch_size)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
538 {
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
539 int index, btop;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
540 unsigned char *textp;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
541 HDC hCompatDC = 0;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
542 cache_bitmap *pcb;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
543 HBITMAP hBMP;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
544 HBRUSH hFgBrush, hOrgBrush;
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
545 HANDLE horgobj = 0;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
546 UINT textalign;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
547 int flag = 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
548
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
549 hCompatDC = CreateCompatibleDC(hdc);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
550
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
551 textalign = GetTextAlign(hdc);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
552
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
553 SaveDC(hdc);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
554
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
555 hFgBrush = CreateSolidBrush(GetTextColor(hdc));
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
556 hOrgBrush = SelectObject(hdc, hFgBrush);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
557 SetTextColor(hdc, RGB(0, 0, 0));
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
558 SetBkColor(hdc, RGB(0xff, 0xff, 0xff));
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
559
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
560 textp = text;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
561 while(bytelen > 0)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
562 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
563 if (dim == 1)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
564 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
565 index = *textp++;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
566 bytelen--;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
567 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
568 else
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
569 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
570 bytelen -= 2;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
571 if (bytelen < 0) break;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
572 index = MAKELENDSHORT(textp[1], textp[0]);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
573 textp += 2;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
574 }
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
575 pcb = get_bitmap_with_cache(fontp, index);
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
576 if (!pcb)
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
577 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
578 if (horgobj)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
579 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
580 SelectObject(hCompatDC, horgobj);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
581 DeleteObject(hBMP);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
582 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
583 DeleteDC(hCompatDC);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
584 return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
585 }
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
586 hBMP = pcb->hbmp;
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
587
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
588 if (textalign & TA_BASELINE)
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
589 btop = top - (pcb->metric.bbh + pcb->metric.bboy);
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
590 else if (textalign & TA_BOTTOM)
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
591 btop = top - pcb->metric.bbh;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
592 else
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
593 btop = top;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
594
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
595 if (horgobj)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
596 SelectObject(hCompatDC, hBMP);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
597 else
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
598 horgobj = SelectObject(hCompatDC, hBMP);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
599 #if 0
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
600 BitBlt(hdc, left, btop, pcb->metric.bbw, pcb->metric.bbh, hCompatDC, 0, 0, SRCCOPY);
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
601 #else
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
602 BitBlt(hdc, left, btop, pcb->metric.bbw, pcb->metric.bbh, hCompatDC, 0, 0, 0xB8074A);
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
603 #endif
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
604 if (fixed_pitch_size)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
605 left += fixed_pitch_size;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
606 else
24496
541ff963ba80 Merged patches from Meadow.
Geoff Voelker <voelker@cs.washington.edu>
parents: 24141
diff changeset
607 left += pcb->metric.dwidth;
24141
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
608 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
609 SelectObject(hCompatDC, horgobj);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
610 SelectObject(hdc, hOrgBrush);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
611 DeleteObject(hFgBrush);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
612 DeleteDC(hCompatDC);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
613 RestoreDC(hdc, -1);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
614
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
615 return 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
616 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
617
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
618 struct font_info *w32_load_bdf_font (struct frame *f, char *fontname,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
619 int size, char* filename)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
620 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
621 struct w32_display_info *dpyinfo = FRAME_W32_DISPLAY_INFO (f);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
622 struct font_info *fontp;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
623 XFontStruct *font;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
624 bdffont* bdf_font;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
625
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
626 bdf_font = w32_init_bdf_font (filename);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
627
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
628 if (!bdf_font) return NULL;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
629
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
630 font = (XFontStruct *) xmalloc (sizeof (XFontStruct));
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
631
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
632 font->bdf = bdf_font;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
633 font->hfont = 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
634
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
635 /* Do we need to create the table? */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
636 if (dpyinfo->font_table_size == 0)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
637 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
638 dpyinfo->font_table_size = 16;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
639 dpyinfo->font_table
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
640 = (struct font_info *) xmalloc (dpyinfo->font_table_size
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
641 * sizeof (struct font_info));
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
642 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
643 /* Do we need to grow the table? */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
644 else if (dpyinfo->n_fonts
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
645 >= dpyinfo->font_table_size)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
646 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
647 dpyinfo->font_table_size *= 2;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
648 dpyinfo->font_table
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
649 = (struct font_info *) xrealloc (dpyinfo->font_table,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
650 (dpyinfo->font_table_size
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
651 * sizeof (struct font_info)));
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
652 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
653
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
654 fontp = dpyinfo->font_table + dpyinfo->n_fonts;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
655
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
656 /* Now fill in the slots of *FONTP. */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
657 BLOCK_INPUT;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
658 fontp->font = font;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
659 fontp->font_idx = dpyinfo->n_fonts;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
660 fontp->name = (char *) xmalloc (strlen (fontname) + 1);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
661 bcopy (fontname, fontp->name, strlen (fontname) + 1);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
662 fontp->full_name = fontp->name;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
663 fontp->size = FONT_WIDTH (font);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
664 fontp->height = FONT_HEIGHT (font);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
665
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
666 /* The slot `encoding' specifies how to map a character
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
667 code-points (0x20..0x7F or 0x2020..0x7F7F) of each charset to
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
668 the font code-points (0:0x20..0x7F, 1:0xA0..0xFF, 0:0x2020..0x7F7F,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
669 the font code-points (0:0x20..0x7F, 1:0xA0..0xFF,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
670 0:0x2020..0x7F7F, 1:0xA0A0..0xFFFF, 3:0x20A0..0x7FFF, or
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
671 2:0xA020..0xFF7F). For the moment, we don't know which charset
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
672 uses this font. So, we set informatoin in fontp->encoding[1]
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
673 which is never used by any charset. If mapping can't be
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
674 decided, set FONT_ENCODING_NOT_DECIDED. */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
675 fontp->encoding[1] = FONT_ENCODING_NOT_DECIDED;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
676 fontp->baseline_offset = bdf_font->yoffset;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
677 fontp->relative_compose = bdf_font->relative_compose;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
678 fontp->default_ascent = bdf_font->default_ascent;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
679
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
680 UNBLOCK_INPUT;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
681 dpyinfo->n_fonts++;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
682 return fontp;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
683 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
684
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
685 /* Check a file for an XFLD string describing it. */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
686 int w32_BDF_to_x_font (char *file, char* xstr, int len)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
687 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
688 HANDLE hfile, hfilemap;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
689 BY_HANDLE_FILE_INFORMATION fileinfo;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
690 unsigned char *font, *start, *p, *q;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
691 int flag, size, retval = 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
692
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
693 hfile = CreateFile (file, GENERIC_READ, FILE_SHARE_READ, NULL,
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
694 OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
695 if (hfile == INVALID_HANDLE_VALUE) return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
696 if (!GetFileInformationByHandle(hfile, &fileinfo) ||
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
697 (fileinfo.nFileSizeHigh != 0) ||
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
698 (fileinfo.nFileSizeLow > BDF_FILE_SIZE_MAX))
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
699 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
700 CloseHandle (hfile);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
701 return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
702 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
703 size = fileinfo.nFileSizeLow;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
704
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
705 hfilemap = CreateFileMapping (hfile, NULL, PAGE_READONLY, 0, 0, NULL);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
706 if (hfilemap == INVALID_HANDLE_VALUE)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
707 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
708 CloseHandle (hfile);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
709 return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
710 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
711
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
712 font = MapViewOfFile (hfilemap, FILE_MAP_READ, 0, 0, 0);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
713 if (!font)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
714 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
715 CloseHandle (hfile);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
716 CloseHandle (hfilemap);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
717 return 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
718 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
719 start = font;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
720
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
721 flag = proceed_file_line ("FONT ", start, &size, &p, &q);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
722 if (flag)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
723 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
724 /* If font provides a description of itself, check it is a
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
725 full XLFD before accepting it. */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
726 int count = 0;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
727 char *s;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
728
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
729 for (s = p; s < q; s++)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
730 if (*s == '\n')
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
731 break;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
732 else if (*s == '-')
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
733 count++;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
734 if (count == 14 && q - p - 1 <= len)
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
735 {
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
736 strncpy (xstr, p, q-p-1);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
737 xstr[q-p-1] = '\0';
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
738 /* Files may have DOS line ends (ie still ^M on end). */
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
739 if (iscntrl(xstr[q-p-2]))
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
740 xstr[q-p-2] = '\0';
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
741
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
742 retval = 1;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
743 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
744 }
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
745 CloseHandle (hfile);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
746 CloseHandle (hfilemap);
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
747 return retval;
db9dfcd11c84 Initial revision
Geoff Voelker <voelker@cs.washington.edu>
parents:
diff changeset
748 }