Mercurial > hg > xemacs-beta
comparison netinstall/choose.cc @ 448:3078fd1074e8 r21-2-39
Import from CVS: tag r21-2-39
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:38:25 +0200 |
parents | |
children | ce0b3f2eff35 |
comparison
equal
deleted
inserted
replaced
447:4fc5f13f3bd3 | 448:3078fd1074e8 |
---|---|
1 /* | |
2 * Copyright (c) 2000, Red Hat, Inc. | |
3 * | |
4 * This program is free software; you can redistribute it and/or modify | |
5 * it under the terms of the GNU General Public License as published by | |
6 * the Free Software Foundation; either version 2 of the License, or | |
7 * (at your option) any later version. | |
8 * | |
9 * A copy of the GNU General Public License can be found at | |
10 * http://www.gnu.org/ | |
11 * | |
12 * Written by DJ Delorie <dj@cygnus.com> | |
13 * | |
14 */ | |
15 | |
16 /* The purpose of this file is to let the user choose which packages | |
17 to install, and which versions of the package when more than one | |
18 version is provided. The "trust" level serves as an indication as | |
19 to which version should be the default choice. At the moment, all | |
20 we do is compare with previously installed packages to skip any | |
21 that are already installed (by setting the action to ACTION_SAME). | |
22 While the "trust" stuff is supported, it's not really implemented | |
23 yet. We always prefer the "current" option. In the future, this | |
24 file might have a user dialog added to let the user choose to not | |
25 install packages, or to install packages that aren't installed by | |
26 default. */ | |
27 | |
28 #include "win32.h" | |
29 #include <stdio.h> | |
30 #include <stdlib.h> | |
31 #include <ctype.h> | |
32 | |
33 #include "dialog.h" | |
34 #include "resource.h" | |
35 #include "state.h" | |
36 #include "ini.h" | |
37 #include "concat.h" | |
38 #include "msg.h" | |
39 #include "log.h" | |
40 #include "find.h" | |
41 #include "reginfo.h" | |
42 | |
43 #define HMARGIN 10 | |
44 #define ROW_MARGIN 5 | |
45 #define ICON_MARGIN 4 | |
46 | |
47 #define CHECK_SIZE 11 | |
48 | |
49 #define TRUST_KEEP 101 | |
50 #define TRUST_UNINSTALL 102 | |
51 #define TRUST_NONE 103 | |
52 | |
53 static int initialized = 0; | |
54 | |
55 static int full_list = 0; | |
56 | |
57 static int scroll_ulc_x, scroll_ulc_y; | |
58 | |
59 static HWND lv, nextbutton; | |
60 static TEXTMETRIC tm; | |
61 static int header_height; | |
62 static HANDLE sysfont; | |
63 static int row_height; | |
64 static HANDLE bm_spin, bm_rtarrow, bm_checkyes, bm_checkno, bm_checkna; | |
65 static HDC bitmap_dc; | |
66 | |
67 static struct { | |
68 char *text; | |
69 int slen; | |
70 int width; | |
71 int x; | |
72 } headers[] = { | |
73 { "Current", 7, 0, 0 }, | |
74 #define CURRENT_COL 0 | |
75 { "New", 3, 0, 0 }, | |
76 #define NEW_COL 1 | |
77 { "Src?", 4, 0, 0 }, | |
78 #define SRC_COL 2 | |
79 { "Package", 7, 0, 0 }, | |
80 #define PACKAGE_COL 3 | |
81 { 0, 0, 0, 0 } | |
82 }; | |
83 #define NUM_COLUMNS (sizeof(headers)/(sizeof(headers[0]))-1) | |
84 | |
85 int *package_indexes, nindexes; | |
86 | |
87 struct ExtraPackageInfo { | |
88 char *installed_file; /* filename of previous "install" file */ | |
89 char *installed_ver; /* version part */ | |
90 int installed_size; /* ditto, size. */ | |
91 | |
92 int in_partial_list; | |
93 int pick; | |
94 int npick; | |
95 int which_is_installed; /* == TRUST* or -1 */ | |
96 | |
97 struct { | |
98 int src_avail; | |
99 int trust; /* may be keep or uninstall */ | |
100 char *caption; /* ==0 at EOL */ | |
101 } chooser[NTRUST+3]; /* one extra for NULL above */ | |
102 }; | |
103 | |
104 static ExtraPackageInfo *extra; | |
105 | |
106 static void | |
107 paint (HWND hwnd) | |
108 { | |
109 HDC hdc; | |
110 PAINTSTRUCT ps; | |
111 int x, y, i, ii; | |
112 | |
113 hdc = BeginPaint (hwnd, &ps); | |
114 | |
115 SelectObject (hdc, sysfont); | |
116 | |
117 RECT cr; | |
118 GetClientRect (hwnd, &cr); | |
119 | |
120 POINT p; | |
121 | |
122 x = cr.left - scroll_ulc_x; | |
123 y = cr.top - scroll_ulc_y + header_height; | |
124 | |
125 | |
126 for (i=0; headers[i].text; i++) | |
127 { | |
128 TextOut (hdc, x+headers[i].x, 3, headers[i].text, headers[i].slen); | |
129 MoveToEx (hdc, x+headers[i].x, header_height-3, &p); | |
130 LineTo (hdc, x+headers[i].x+headers[i].width, header_height-3); | |
131 } | |
132 | |
133 IntersectClipRect (hdc, cr.left, cr.top+header_height, cr.right, cr.bottom); | |
134 | |
135 for (ii=0; ii<nindexes; ii++) | |
136 { | |
137 i = package_indexes[ii]; | |
138 int r = y + ii * row_height; | |
139 int by = r + tm.tmHeight - 11; | |
140 if (extra[i].installed_ver && extra[i].installed_ver[0]) | |
141 { | |
142 TextOut (hdc, x+headers[CURRENT_COL].x, r, | |
143 extra[i].installed_ver, strlen (extra[i].installed_ver)); | |
144 SelectObject (bitmap_dc, bm_rtarrow); | |
145 BitBlt (hdc, x+headers[CURRENT_COL].x+headers[0].width+ICON_MARGIN/2+HMARGIN/2, by, | |
146 11, 11, bitmap_dc, 0, 0, SRCCOPY); | |
147 } | |
148 | |
149 char *s = extra[i].chooser[extra[i].pick].caption; | |
150 if (s) | |
151 { | |
152 TextOut (hdc, x+headers[NEW_COL].x + 11 + ICON_MARGIN, r, | |
153 s, strlen (s)); | |
154 if (extra[i].npick > 1) | |
155 { | |
156 SelectObject (bitmap_dc, bm_spin); | |
157 BitBlt (hdc, x+headers[NEW_COL].x, by, 11, 11, | |
158 bitmap_dc, 0, 0, SRCCOPY); | |
159 } | |
160 } | |
161 | |
162 HANDLE check_bm = bm_checkna; | |
163 if (extra[i].chooser[extra[i].pick].src_avail) | |
164 { | |
165 if (package[i].srcaction == SRCACTION_NO) | |
166 check_bm = bm_checkno; | |
167 else if (package[i].srcaction == SRCACTION_YES) | |
168 check_bm = bm_checkyes; | |
169 } | |
170 SelectObject (bitmap_dc, check_bm); | |
171 BitBlt (hdc, x+headers[SRC_COL].x, by, 11, 11, | |
172 bitmap_dc, 0, 0, SRCCOPY); | |
173 | |
174 if (package[i].name) | |
175 TextOut (hdc, x+headers[PACKAGE_COL].x, r, package[i].name, strlen(package[i].name)); | |
176 } | |
177 | |
178 if (nindexes == 0) | |
179 { | |
180 static char *m = "Nothing to Install/Update"; | |
181 TextOut (hdc, HMARGIN, header_height, m, strlen (m)); | |
182 } | |
183 | |
184 EndPaint (hwnd, &ps); | |
185 } | |
186 | |
187 static void | |
188 scroll_common (HWND hwnd, int which, int *var, int code) | |
189 { | |
190 SCROLLINFO si; | |
191 si.cbSize = sizeof (si); | |
192 si.fMask = SIF_ALL; | |
193 GetScrollInfo (hwnd, which, &si); | |
194 | |
195 switch (code) | |
196 { | |
197 case SB_THUMBTRACK: | |
198 si.nPos = si.nTrackPos; | |
199 break; | |
200 case SB_THUMBPOSITION: | |
201 break; | |
202 case SB_BOTTOM: | |
203 si.nPos = si.nMax; | |
204 break; | |
205 case SB_TOP: | |
206 si.nPos = 0; | |
207 break; | |
208 case SB_LINEDOWN: | |
209 si.nPos += row_height; | |
210 break; | |
211 case SB_LINEUP: | |
212 si.nPos -= row_height; | |
213 break; | |
214 case SB_PAGEDOWN: | |
215 si.nPos += si.nPage * 9/10; | |
216 break; | |
217 case SB_PAGEUP: | |
218 si.nPos -= si.nPage * 9/10; | |
219 break; | |
220 } | |
221 | |
222 if ((int)si.nPos < 0) | |
223 si.nPos = 0; | |
224 if ((int)(si.nPos + si.nPage) > si.nMax) | |
225 si.nPos = si.nMax - si.nPage; | |
226 | |
227 si.fMask = SIF_POS; | |
228 SetScrollInfo (hwnd, which, &si, TRUE); | |
229 | |
230 int ox = scroll_ulc_x; | |
231 int oy = scroll_ulc_y; | |
232 *var = si.nPos; | |
233 | |
234 RECT cr, sr; | |
235 GetClientRect (hwnd, &cr); | |
236 sr = cr; | |
237 sr.top += header_height; | |
238 ScrollWindow (hwnd, ox - scroll_ulc_x, oy - scroll_ulc_y, &sr, &sr); | |
239 sr.bottom = sr.top; | |
240 sr.top = cr.top; | |
241 ScrollWindow (hwnd, ox - scroll_ulc_x, 0, &sr, &sr); | |
242 } | |
243 | |
244 static LRESULT CALLBACK | |
245 list_vscroll (HWND hwnd, HWND hctl, UINT code, int pos) | |
246 { | |
247 scroll_common (hwnd, SB_VERT, &scroll_ulc_y, code); | |
248 return FALSE; | |
249 } | |
250 | |
251 static LRESULT CALLBACK | |
252 list_hscroll (HWND hwnd, HWND hctl, UINT code, int pos) | |
253 { | |
254 scroll_common (hwnd, SB_HORZ, &scroll_ulc_x, code); | |
255 return FALSE; | |
256 } | |
257 | |
258 static LRESULT CALLBACK | |
259 list_click (HWND hwnd, BOOL dblclk, int x, int y, UINT hitCode) | |
260 { | |
261 int r; | |
262 | |
263 if (nindexes == 0) | |
264 return 0; | |
265 | |
266 if (y < header_height) | |
267 return 0; | |
268 x += scroll_ulc_x; | |
269 y += scroll_ulc_y - header_height; | |
270 | |
271 r = (y + ROW_MARGIN/2) / row_height; | |
272 | |
273 if (r < 0 || r >= npackages) | |
274 return 0; | |
275 | |
276 int p = package_indexes[r]; | |
277 | |
278 if (x >= headers[NEW_COL].x - HMARGIN/2 && x <= headers[NEW_COL+1].x - HMARGIN/2) | |
279 { | |
280 extra[p].pick ++; | |
281 if (extra[p].chooser[extra[p].pick].caption == 0) | |
282 extra[p].pick = 0; | |
283 } | |
284 | |
285 if (x >= headers[SRC_COL].x - HMARGIN/2 && x <= headers[SRC_COL+1].x - HMARGIN/2) | |
286 { | |
287 if (extra[p].chooser[extra[p].pick].src_avail) | |
288 package[p].srcaction ^= (SRCACTION_NO^SRCACTION_YES); | |
289 } | |
290 | |
291 RECT rect; | |
292 rect.left = headers[NEW_COL].x - scroll_ulc_x; | |
293 rect.right = headers[SRC_COL+1].x - scroll_ulc_x; | |
294 rect.top = header_height + r * row_height - scroll_ulc_y; | |
295 rect.bottom = rect.top + row_height; | |
296 InvalidateRect (hwnd, &rect, TRUE); | |
297 return FALSE; | |
298 } | |
299 | |
300 static LRESULT CALLBACK | |
301 listview_proc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) | |
302 { | |
303 switch (message) { | |
304 case WM_HSCROLL: | |
305 return HANDLE_WM_HSCROLL (hwnd, wParam, lParam, list_hscroll); | |
306 case WM_VSCROLL: | |
307 return HANDLE_WM_VSCROLL (hwnd, wParam, lParam, list_vscroll); | |
308 case WM_LBUTTONDOWN: | |
309 return HANDLE_WM_LBUTTONDOWN (hwnd, wParam, lParam, list_click); | |
310 case WM_PAINT: | |
311 paint (hwnd); | |
312 return 0; | |
313 default: | |
314 return DefWindowProc (hwnd, message, wParam, lParam); | |
315 } | |
316 } | |
317 | |
318 static void | |
319 register_windows (HINSTANCE hinst) | |
320 { | |
321 WNDCLASSEX wcex; | |
322 static int done = 0; | |
323 | |
324 if (done) | |
325 return; | |
326 done = 1; | |
327 | |
328 memset (&wcex, 0, sizeof (wcex)); | |
329 wcex.cbSize = sizeof (WNDCLASSEX); | |
330 wcex.style = CS_HREDRAW | CS_VREDRAW; | |
331 wcex.lpfnWndProc = listview_proc; | |
332 wcex.hInstance = hinst; | |
333 wcex.hIcon = LoadIcon (0, IDI_APPLICATION); | |
334 wcex.hCursor = LoadCursor (0, IDC_ARROW); | |
335 wcex.hbrBackground = (HBRUSH) (COLOR_WINDOW+1); | |
336 wcex.lpszClassName = "listview"; | |
337 | |
338 RegisterClassEx (&wcex); | |
339 } | |
340 | |
341 static void | |
342 note_width (HDC dc, char *string, int addend, int column) | |
343 { | |
344 if (!string) | |
345 return; | |
346 SIZE s; | |
347 GetTextExtentPoint32 (dc, string, strlen (string), &s); | |
348 if (headers[column].width < s.cx + addend) | |
349 headers[column].width = s.cx + addend; | |
350 } | |
351 | |
352 static int | |
353 best_trust (int p, int trust) | |
354 { | |
355 int t; | |
356 for (t=trust; t>=0; t--) | |
357 if (package[p].info[t].install) | |
358 return t; | |
359 for (t=trust+1; t<=NTRUST; t++) | |
360 if (package[p].info[t].install) | |
361 return t; | |
362 if (extra[p].installed_file) | |
363 return TRUST_KEEP; | |
364 return TRUST_NONE; | |
365 } | |
366 | |
367 static void | |
368 default_trust (HWND h, int trust) | |
369 { | |
370 int i, t, c; | |
371 | |
372 for (i=0; i<npackages; i++) | |
373 { | |
374 t = best_trust (i, trust); | |
375 extra[i].pick = 1; | |
376 for (c=0; c<extra[i].npick; c++) | |
377 if (t == extra[i].chooser[c].trust) | |
378 extra[i].pick = c; | |
379 if (install_type == IDC_INSTALL_NATIVE | |
380 && package[i].type == TY_CYGWIN | |
381 || | |
382 install_type == IDC_INSTALL_CYGWIN | |
383 && package[i].type == TY_NATIVE) | |
384 extra[i].pick = extra[i].npick -1; | |
385 } | |
386 RECT r; | |
387 GetClientRect (h, &r); | |
388 InvalidateRect (h, &r, TRUE); | |
389 if (nextbutton) | |
390 SetFocus (nextbutton); | |
391 } | |
392 | |
393 static void | |
394 set_full_list (HWND h, int isfull) | |
395 { | |
396 int i, j; | |
397 full_list = isfull; | |
398 if (package_indexes == 0) | |
399 package_indexes = (int *) malloc (npackages * sizeof (int)); | |
400 for (i=j=0; i<npackages; i++) | |
401 { | |
402 if (isfull || extra[i].in_partial_list) | |
403 package_indexes[j++] = i; | |
404 } | |
405 nindexes = j; | |
406 | |
407 RECT r; | |
408 GetClientRect (h, &r); | |
409 SCROLLINFO si; | |
410 memset (&si, 0, sizeof (si)); | |
411 si.cbSize = sizeof (si); | |
412 si.fMask = SIF_ALL; | |
413 si.nMin = 0; | |
414 si.nMax = headers[2].x + headers[2].width + HMARGIN; | |
415 si.nPage = r.right; | |
416 SetScrollInfo (h, SB_HORZ, &si, TRUE); | |
417 | |
418 si.nMax = nindexes * row_height; | |
419 si.nPage = r.bottom - header_height; | |
420 SetScrollInfo (h, SB_VERT, &si, TRUE); | |
421 | |
422 scroll_ulc_x = scroll_ulc_y = 0; | |
423 | |
424 InvalidateRect (h, &r, TRUE); | |
425 | |
426 if (nextbutton) | |
427 SetFocus (nextbutton); | |
428 } | |
429 | |
430 static void | |
431 build_labels () | |
432 { | |
433 int i; | |
434 for (i=0; i<npackages; i++) | |
435 { | |
436 int c = 0, t; | |
437 | |
438 #define C extra[i].chooser[c] | |
439 if (extra[i].installed_ver) | |
440 { | |
441 C.caption = "Uninstall"; | |
442 C.trust = TRUST_UNINSTALL; | |
443 c++; | |
444 C.caption = "Keep"; | |
445 C.trust = TRUST_KEEP; | |
446 c++; | |
447 } | |
448 | |
449 for (t=TRUST_PREV; t<NTRUST; t++) | |
450 if (package[i].info[t].install) | |
451 if (t != extra[i].which_is_installed) | |
452 { | |
453 C.caption = package[i].info[t].version; | |
454 if (C.caption == 0 || C.caption[0] == 0) | |
455 C.caption = "0.0"; | |
456 C.trust = t; | |
457 if (package[i].info[t].source) | |
458 C.src_avail = 1; | |
459 c++; | |
460 /* we intentionally skip TRUST_PREV */ | |
461 if (t != TRUST_PREV || !extra[i].installed_ver) | |
462 extra[i].in_partial_list = 1; | |
463 | |
464 } | |
465 | |
466 if (c == 0) | |
467 { | |
468 C.caption = "N/A"; | |
469 C.trust = TRUST_NONE; | |
470 c++; | |
471 } | |
472 | |
473 if (! extra[i].installed_file) | |
474 { | |
475 C.caption = "Skip"; | |
476 C.trust = TRUST_NONE; | |
477 c++; | |
478 } | |
479 | |
480 C.caption = 0; | |
481 extra[i].npick = c; | |
482 #undef C | |
483 } | |
484 } | |
485 | |
486 static void | |
487 create_listview (HWND dlg, RECT *r) | |
488 { | |
489 int i, t; | |
490 lv = CreateWindowEx (WS_EX_CLIENTEDGE, | |
491 "listview", | |
492 "listviewwindow", | |
493 WS_CHILD | WS_HSCROLL | WS_VSCROLL | WS_VISIBLE, | |
494 r->left, r->top, | |
495 r->right-r->left+1, r->bottom-r->top+1, | |
496 dlg, | |
497 NULL, // ??? MAKEINTRESOURCE(IDC_CHOOSE_LIST), | |
498 hinstance, | |
499 0); | |
500 ShowWindow (lv, SW_SHOW); | |
501 | |
502 for (i=0; headers[i].text; i++) | |
503 headers[i].width = 0; | |
504 | |
505 HDC dc = GetDC (lv); | |
506 sysfont = GetStockObject (DEFAULT_GUI_FONT); | |
507 SelectObject (dc, sysfont); | |
508 GetTextMetrics (dc, &tm); | |
509 header_height = tm.tmHeight + 5 + 3; | |
510 | |
511 bitmap_dc = CreateCompatibleDC (dc); | |
512 | |
513 row_height = (tm.tmHeight + tm.tmExternalLeading + ROW_MARGIN); | |
514 int irh = tm.tmExternalLeading + tm.tmDescent + 11 + ROW_MARGIN; | |
515 if (row_height < irh) | |
516 row_height = irh; | |
517 | |
518 for (i=0; headers[i].text; i++) | |
519 note_width (dc, headers[i].text, 0, i); | |
520 for (i=0; i<npackages; i++) | |
521 { | |
522 note_width (dc, extra[i].installed_ver, 0, CURRENT_COL); | |
523 note_width (dc, extra[i].installed_ver, 11+ICON_MARGIN, NEW_COL); | |
524 for (t=0; t<NTRUST; t++) | |
525 note_width (dc, package[i].info[t].version, 11+ICON_MARGIN, NEW_COL); | |
526 note_width (dc, package[i].name, 0, PACKAGE_COL); | |
527 note_width (dc, package[i].sdesc, 0, PACKAGE_COL); | |
528 } | |
529 note_width (dc, "keep", 11+ICON_MARGIN, NEW_COL); | |
530 note_width (dc, "uninstall", 11+ICON_MARGIN, NEW_COL); | |
531 | |
532 headers[CURRENT_COL].x = HMARGIN/2; | |
533 headers[NEW_COL].x = (headers[CURRENT_COL].x + headers[CURRENT_COL].width | |
534 + HMARGIN + 11 + ICON_MARGIN); | |
535 headers[SRC_COL].x = headers[NEW_COL].x + headers[NEW_COL].width + HMARGIN; | |
536 headers[PACKAGE_COL].x = headers[SRC_COL].x + headers[SRC_COL].width + HMARGIN; | |
537 | |
538 set_full_list (lv, full_list); | |
539 default_trust (lv, TRUST_CURR); | |
540 | |
541 ReleaseDC (lv, dc); | |
542 } | |
543 | |
544 static BOOL | |
545 dialog_cmd (HWND h, int id, HWND hwndctl, UINT code) | |
546 { | |
547 switch (id) | |
548 { | |
549 | |
550 case IDC_CHOOSE_PREV: | |
551 default_trust (lv, TRUST_PREV); | |
552 break; | |
553 case IDC_CHOOSE_CURR: | |
554 default_trust (lv, TRUST_CURR); | |
555 break; | |
556 case IDC_CHOOSE_EXP: | |
557 default_trust (lv, TRUST_TEST); | |
558 break; | |
559 case IDC_CHOOSE_FULLPART: | |
560 set_full_list (lv, !full_list); | |
561 break; | |
562 | |
563 case IDOK: | |
564 if (source == IDC_SOURCE_CWD) | |
565 NEXT (IDD_S_INSTALL); | |
566 else | |
567 NEXT (IDD_S_DOWNLOAD); | |
568 break; | |
569 | |
570 case IDC_BACK: | |
571 initialized = 0; | |
572 if (source == IDC_SOURCE_CWD) | |
573 NEXT (IDD_ROOT); | |
574 else | |
575 NEXT (IDD_SITE); | |
576 break; | |
577 | |
578 case IDCANCEL: | |
579 NEXT (0); | |
580 break; | |
581 } | |
582 return FALSE; | |
583 } | |
584 | |
585 static void | |
586 GetParentRect (HWND parent, HWND child, RECT *r) | |
587 { | |
588 POINT p; | |
589 GetWindowRect (child, r); | |
590 p.x = r->left; | |
591 p.y = r->top; | |
592 ScreenToClient (parent, &p); | |
593 r->left = p.x; | |
594 r->top = p.y; | |
595 p.x = r->right; | |
596 p.y = r->bottom; | |
597 ScreenToClient (parent, &p); | |
598 r->right = p.x; | |
599 r->bottom = p.y; | |
600 } | |
601 | |
602 static BOOL CALLBACK | |
603 dialog_proc (HWND h, UINT message, WPARAM wParam, LPARAM lParam) | |
604 { | |
605 HWND frame; | |
606 RECT r; | |
607 switch (message) | |
608 { | |
609 case WM_INITDIALOG: | |
610 nextbutton = GetDlgItem (h, IDOK); | |
611 frame = GetDlgItem (h, IDC_LISTVIEW_POS); | |
612 GetParentRect (h, frame, &r); | |
613 r.top += 2; | |
614 r.bottom -= 2; | |
615 create_listview (h, &r); | |
616 #if 0 | |
617 load_dialog (h); | |
618 #endif | |
619 return FALSE; | |
620 case WM_COMMAND: | |
621 return HANDLE_WM_COMMAND (h, wParam, lParam, dialog_cmd); | |
622 } | |
623 return FALSE; | |
624 } | |
625 | |
626 static char * | |
627 base (char *s) | |
628 { | |
629 if (!s) | |
630 return 0; | |
631 char *rv = s; | |
632 while (*s) | |
633 { | |
634 if ((*s == '/' || *s == ':' || *s == '\\') && s[1]) | |
635 rv = s+1; | |
636 s++; | |
637 } | |
638 return rv; | |
639 } | |
640 | |
641 static void | |
642 scan2 (char *path, unsigned int size) | |
643 { | |
644 int i, t; | |
645 for (i=0; i<npackages; i++) | |
646 for (t=0; t<NTRUST; t++) | |
647 if (package[i].info[t].install | |
648 && strcmp (base (package[i].info[t].install), base (path)) == 0 | |
649 && package[i].info[t].install_size == (int)size) | |
650 { | |
651 extra[i].installed_file = package[i].info[t].install; | |
652 extra[i].installed_size = size; | |
653 extra[i].which_is_installed = t; | |
654 extra[i].installed_ver = package[i].info[t].version; | |
655 if (!extra[i].installed_ver) | |
656 extra[i].installed_ver = "0"; | |
657 } | |
658 } | |
659 | |
660 static void | |
661 scan_downloaded_files () | |
662 { | |
663 find (".", scan2); | |
664 } | |
665 | |
666 static void | |
667 read_installed_db () | |
668 { | |
669 int i; | |
670 if (!root_dir) | |
671 return; | |
672 | |
673 char line[1000], pkg[1000], inst[1000], src[1000]; | |
674 int instsz, srcsz; | |
675 | |
676 FILE *db = fopen (concat (root_dir, XEMACS_SETUP_DIR, "installed.db", 0), "rt"); | |
677 if (!db) | |
678 return; | |
679 | |
680 while (fgets (line, 1000, db)) | |
681 { | |
682 src[0] = 0; | |
683 srcsz = 0; | |
684 sscanf (line, "%s %s %d %s %d", pkg, inst, &instsz, src, &srcsz); | |
685 | |
686 for (i=0; i<npackages; i++) | |
687 if (strcmp (package[i].name, pkg) == 0) | |
688 { | |
689 int t; | |
690 extra[i].installed_file = inst; | |
691 extra[i].installed_size = instsz; | |
692 | |
693 for (t=0; t<NTRUST; t++) | |
694 if (package[i].info[t].install | |
695 && strcmp (base (package[i].info[t].install), base (inst)) == 0) | |
696 { | |
697 extra[i].which_is_installed = t; | |
698 extra[i].installed_ver = package[i].info[t].version; | |
699 break; | |
700 } | |
701 | |
702 if (extra[i].installed_ver == 0) /* still */ | |
703 { | |
704 char *v, *d; | |
705 for (v=base (inst); *v; v++) | |
706 if (*v == '-' && isdigit(v[1])) | |
707 { | |
708 v++; | |
709 break; | |
710 } | |
711 if (!v) | |
712 v = inst; | |
713 for (d=v; *d; d++) | |
714 if (strncmp (d, ".tar", 4) == 0 | |
715 || strncmp (d, "-pkg", 4) == 0) | |
716 { | |
717 *d = 0; | |
718 break; | |
719 } | |
720 if (v[0]) | |
721 extra[i].installed_ver = strdup (v); | |
722 else | |
723 extra[i].installed_ver = "0"; | |
724 } | |
725 break; | |
726 } | |
727 } | |
728 fclose (db); | |
729 } | |
730 | |
731 int CDECL | |
732 package_sort (const void *va, const void *vb) | |
733 { | |
734 Package *a = (Package *)va; | |
735 Package *b = (Package *)vb; | |
736 return strcmp (a->name, b->name); | |
737 } | |
738 | |
739 void | |
740 do_choose (HINSTANCE h) | |
741 { | |
742 int rv, i; | |
743 | |
744 qsort (package, npackages, sizeof (package[0]), package_sort); | |
745 | |
746 nextbutton = 0; | |
747 bm_spin = LoadImage (h, MAKEINTRESOURCE (IDB_SPIN), IMAGE_BITMAP, 0, 0, 0); | |
748 bm_rtarrow = LoadImage (h, MAKEINTRESOURCE (IDB_RTARROW), IMAGE_BITMAP, 0, 0, 0); | |
749 | |
750 bm_checkyes = LoadImage (h, MAKEINTRESOURCE (IDB_CHECK_YES), IMAGE_BITMAP, 0, 0, 0); | |
751 bm_checkno = LoadImage (h, MAKEINTRESOURCE (IDB_CHECK_NO), IMAGE_BITMAP, 0, 0, 0); | |
752 bm_checkna = LoadImage (h, MAKEINTRESOURCE (IDB_CHECK_NA), IMAGE_BITMAP, 0, 0, 0); | |
753 | |
754 extra = (ExtraPackageInfo *) malloc (npackages * sizeof (ExtraPackageInfo)); | |
755 memset (extra, 0, npackages * sizeof (ExtraPackageInfo)); | |
756 for (i=0; i<npackages; i++) | |
757 extra[i].which_is_installed = -1; | |
758 | |
759 register_windows (h); | |
760 | |
761 if (source == IDC_SOURCE_DOWNLOAD) | |
762 scan_downloaded_files (); | |
763 else | |
764 read_installed_db (); | |
765 build_labels (); | |
766 | |
767 rv = DialogBox (h, MAKEINTRESOURCE (IDD_CHOOSE), 0, dialog_proc); | |
768 if (rv == -1) | |
769 fatal (IDS_DIALOG_FAILED); | |
770 | |
771 for (i=0; i<npackages; i++) | |
772 { | |
773 switch (extra[i].chooser[extra[i].pick].trust) | |
774 { | |
775 case TRUST_PREV: | |
776 case TRUST_CURR: | |
777 case TRUST_TEST: | |
778 if (extra[i].installed_file) | |
779 package[i].action = ACTION_UPGRADE; | |
780 else | |
781 package[i].action = ACTION_NEW; | |
782 package[i].trust = extra[i].chooser[extra[i].pick].trust; | |
783 // pick up the actual core package to install | |
784 if (package[i].type == TY_CYGWIN || package[i].type == TY_NATIVE | |
785 && xemacs_package == 0) | |
786 xemacs_package = &package[i]; | |
787 break; | |
788 | |
789 case TRUST_UNINSTALL: | |
790 package[i].action = ACTION_UNINSTALL; | |
791 break; | |
792 | |
793 case TRUST_KEEP: | |
794 case TRUST_NONE: | |
795 default: | |
796 package[i].action = ACTION_SAME; | |
797 break; | |
798 } | |
799 } | |
800 | |
801 log (LOG_BABBLE, "Chooser results..."); | |
802 for (i=0; i<npackages; i++) | |
803 { | |
804 static char *infos[] = {"prev", "curr", "test"}; | |
805 const char *trust = ((package[i].trust == TRUST_PREV) ? "prev" | |
806 : (package[i].trust == TRUST_CURR) ? "curr" | |
807 : (package[i].trust == TRUST_TEST) ? "test" | |
808 : "unknown"); | |
809 const char *action = ((package[i].action == ACTION_UNKNOWN) ? "unknown" | |
810 : (package[i].action == ACTION_SAME) ? "same" | |
811 : (package[i].action == ACTION_NEW) ? "new" | |
812 : (package[i].action == ACTION_UPGRADE) ? "upgrade" | |
813 : (package[i].action == ACTION_UNINSTALL) ? "uninstall" | |
814 : (package[i].action == ACTION_ERROR) ? "error" | |
815 : "unknown"); | |
816 | |
817 log (LOG_BABBLE, "[%s] action=%s trust=%s src? %s", package[i].name, action, trust, | |
818 package[i].srcaction == SRCACTION_NO ? "no" : "yes"); | |
819 for (int t=0; t<NTRUST; t++) | |
820 { | |
821 if (package[i].info[t].install) | |
822 log (LOG_BABBLE, "[%s] ver %s inst %s %d src %s %d", | |
823 infos[t], | |
824 package[i].info[t].version ? package[i].info[t].version : "(none)", | |
825 package[i].info[t].install ? package[i].info[t].install : "(none)", | |
826 package[i].info[t].install_size, | |
827 package[i].info[t].source ? package[i].info[t].source : "(none)", | |
828 package[i].info[t].source_size); | |
829 } | |
830 } | |
831 } |