1 /*
2 * Copyright 1998 Douglas Ridgway
3 *
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
8 *
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
13 *
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17 */
18
19 #include <windows.h>
20 #include <windowsx.h>
21 #include "resource.h"
22
23 #include "globals.h"
24 #include <stdio.h>
25
26 HMETAFILE hmf;
27 int deltax = 0, deltay = 0;
28 int width = 0, height = 0;
29 BOOL isAldus;
30
31 static BOOL FileOpen(HWND hWnd, char *fn, int fnsz)
32 {
33 OPENFILENAME ofn = { sizeof(OPENFILENAME),
34 0, 0, NULL, NULL, 0, 0, NULL,
35 fnsz, NULL, 0, NULL, NULL,
36 OFN_SHOWHELP, 0, 0, NULL, 0, NULL };
37 ofn.lpstrFilter = "Metafiles\0*.wmf\0";
38 ofn.hwndOwner = hWnd;
39 ofn.lpstrFile = fn;
40 if( fnsz < 1 )
41 return FALSE;
42 *fn = 0;
43 return GetOpenFileName(&ofn);
44 }
45
46 static BOOL FileIsPlaceable( LPCSTR szFileName )
47 {
48 HFILE hInFile;
49 APMFILEHEADER apmh;
50
51 if( (hInFile = _lopen( szFileName, OF_READ ) ) == HFILE_ERROR )
52 return FALSE;
53
54 if( _lread( hInFile, &apmh, sizeof(APMFILEHEADER) )
55 != sizeof(APMFILEHEADER) )
56 {
57 _lclose( hInFile );
58 return FALSE;
59 }
60 _lclose( hInFile );
61
62 /* Is it placeable? */
63 return (apmh.key == APMHEADER_KEY);
64 }
65
66 static HMETAFILE GetPlaceableMetaFile( HWND hwnd, LPCSTR szFileName )
67 {
68 LPBYTE lpData;
69 METAHEADER mfHeader;
70 APMFILEHEADER APMHeader;
71 HFILE fh;
72 HMETAFILE hmf;
73 WORD checksum, *p;
74 HDC hdc;
75 int i;
76
77 if( (fh = _lopen( szFileName, OF_READ ) ) == HFILE_ERROR ) return 0;
78 _llseek(fh, 0, 0);
79 if (!_lread(fh, &APMHeader, sizeof(APMFILEHEADER))) return 0;
80 _llseek(fh, sizeof(APMFILEHEADER), 0);
81 checksum = 0;
82 p = (WORD *) &APMHeader;
83
84 for(i=0; i<10; i++)
85 checksum ^= *p++;
86 if (checksum != APMHeader.checksum) {
87 char msg[128];
88 sprintf(msg, "Computed checksum %04x != stored checksum %04x\n",
89 checksum, APMHeader.checksum);
90 MessageBox(hwnd, msg, "Checksum failed", MB_OK);
91 return 0;
92 }
93
94 if (!_lread(fh, &mfHeader, sizeof(METAHEADER))) return 0;
95
96 if (!(lpData = GlobalAlloc(GPTR, (mfHeader.mtSize * 2L)))) return 0;
97
98 _llseek(fh, sizeof(APMFILEHEADER), 0);
99 if (!_lread(fh, lpData, (UINT)(mfHeader.mtSize * 2L)))
100 {
101 GlobalFree(lpData);
102 _lclose(fh);
103 return 0;
104 }
105 _lclose(fh);
106
107 if (!(hmf = SetMetaFileBitsEx(mfHeader.mtSize*2, lpData)))
108 return 0;
109
110
111 width = APMHeader.bbox.Right - APMHeader.bbox.Left;
112 height = APMHeader.bbox.Bottom - APMHeader.bbox.Top;
113
114 /* printf("Ok! width %d height %d inch %d\n", width, height, APMHeader.inch); */
115 hdc = GetDC(hwnd);
116 width = width * GetDeviceCaps(hdc, LOGPIXELSX)/APMHeader.inch;
117 height = height * GetDeviceCaps(hdc,LOGPIXELSY)/APMHeader.inch;
118 ReleaseDC(hwnd, hdc);
119
120 deltax = 0;
121 deltay = 0 ;
122 return hmf;
123 }
124
125
126 LRESULT CALLBACK WndProc(HWND hwnd,
127 UINT uMessage,
128 WPARAM wparam,
129 LPARAM lparam)
130 {
131 switch (uMessage)
132 {
133 case WM_PAINT:
134 {
135 PAINTSTRUCT ps;
136 BeginPaint(hwnd, &ps);
137 SetMapMode(ps.hdc, MM_ANISOTROPIC);
138 /* Set the window extent to a sane value in case the metafile doesn't */
139 SetWindowExtEx(ps.hdc, width, height, NULL);
140 SetViewportExtEx(ps.hdc, width, height, NULL);
141 SetViewportOrgEx(ps.hdc, deltax, deltay, NULL);
142 if(hmf) PlayMetaFile(ps.hdc, hmf);
143 EndPaint(hwnd, &ps);
144 }
145 break;
146
147 case WM_COMMAND: /* message: command from application menu */
148 switch (GET_WM_COMMAND_ID(wparam,lparam))
149 {
150 case IDM_OPEN:
151 {
152 char filename[MAX_PATH];
153 if (FileOpen(hwnd, filename, sizeof(filename))) {
154 isAldus = FileIsPlaceable(filename);
155 if (isAldus) {
156 hmf = GetPlaceableMetaFile(hwnd, filename);
157 } else {
158 RECT r;
159 hmf = GetMetaFile(filename);
160 GetClientRect(hwnd, &r);
161 width = r.right - r.left;
162 height = r.bottom - r.top;
163 }
164 InvalidateRect( hwnd, NULL, TRUE );
165 }
166 }
167 break;
168
169 case IDM_SET_EXT_TO_WIN:
170 {
171 RECT r;
172 GetClientRect(hwnd, &r);
173 width = r.right - r.left;
174 height = r.bottom - r.top;
175 deltax = deltay = 0;
176 InvalidateRect( hwnd, NULL, TRUE );
177 }
178 break;
179
180
181 case IDM_LEFT:
182 deltax += 100;
183 InvalidateRect( hwnd, NULL, TRUE );
184 break;
185 case IDM_RIGHT:
186 deltax -= 100;
187 InvalidateRect( hwnd, NULL, TRUE );
188 break;
189 case IDM_UP:
190 deltay += 100;
191 InvalidateRect( hwnd, NULL, TRUE );
192 break;
193 case IDM_DOWN:
194 deltay -= 100;
195 InvalidateRect( hwnd, NULL, TRUE );
196 break;
197
198 case IDM_EXIT:
199 DestroyWindow(hwnd);
200 break;
201
202 default:
203 return DefWindowProc(hwnd, uMessage, wparam, lparam);
204 }
205 break;
206
207 case WM_DESTROY: /* message: window being destroyed */
208 PostQuitMessage(0);
209 break;
210
211 default: /* Passes it on if unprocessed */
212 return DefWindowProc(hwnd, uMessage, wparam, lparam);
213 }
214 return 0;
215 }
216
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.