2 * a GUI application for displaying a console
4 * Copyright 2001 Eric Pouech
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23 #include "winecon_user.h"
26 #include "wine/debug.h"
28 WINE_DEFAULT_DEBUG_CHANNEL(wineconsole
);
29 WINE_DECLARE_DEBUG_CHANNEL(wc_font
);
31 UINT g_uiDefaultCharset
;
33 /* mapping console colors to RGB values */
34 const COLORREF WCUSER_ColorMap
[16] =
36 RGB(0x00, 0x00, 0x00), RGB(0x00, 0x00, 0x80), RGB(0x00, 0x80, 0x00), RGB(0x00, 0x80, 0x80),
37 RGB(0x80, 0x00, 0x00), RGB(0x80, 0x00, 0x80), RGB(0x80, 0x80, 0x00), RGB(0x80, 0x80, 0x80),
38 RGB(0xC0, 0xC0, 0xC0), RGB(0x00, 0x00, 0xFF), RGB(0x00, 0xFF, 0x00), RGB(0x00, 0xFF, 0xFF),
39 RGB(0xFF, 0x00, 0x00), RGB(0xFF, 0x00, 0xFF), RGB(0xFF, 0xFF, 0x00), RGB(0xFF, 0xFF, 0xFF),
42 static BOOL
WCUSER_SetFont(struct inner_data
* data
, const LOGFONT
* font
);
44 /******************************************************************
47 * Fills the Mem DC with current cells values
49 static void WCUSER_FillMemDC(const struct inner_data
* data
, int upd_tp
, int upd_bm
)
59 /* no font has been set up yet, don't worry about filling the bitmap,
60 * we'll do it once a font is chosen
62 if (!PRIVATE(data
)->hFont
) return;
64 /* FIXME: could set up a mechanism to reuse the line between different
65 * calls to this function
67 if (!(line
= HeapAlloc(GetProcessHeap(), 0, data
->curcfg
.sb_width
* sizeof(WCHAR
))))
68 WINECON_Fatal("OOM\n");
70 hOldFont
= SelectObject(PRIVATE(data
)->hMemDC
, PRIVATE(data
)->hFont
);
71 for (j
= upd_tp
; j
<= upd_bm
; j
++)
73 cell
= &data
->cells
[j
* data
->curcfg
.sb_width
];
74 for (i
= 0; i
< data
->curcfg
.sb_width
; i
++)
76 attr
= cell
[i
].Attributes
;
77 SetBkColor(PRIVATE(data
)->hMemDC
, WCUSER_ColorMap
[(attr
>>4)&0x0F]);
78 SetTextColor(PRIVATE(data
)->hMemDC
, WCUSER_ColorMap
[attr
&0x0F]);
79 for (k
= i
; k
< data
->curcfg
.sb_width
&& cell
[k
].Attributes
== attr
; k
++)
81 line
[k
- i
] = cell
[k
].Char
.UnicodeChar
;
83 TextOut(PRIVATE(data
)->hMemDC
, i
* data
->curcfg
.cell_width
, j
* data
->curcfg
.cell_height
,
85 if (PRIVATE(data
)->ext_leading
&&
86 (hbr
= CreateSolidBrush(WCUSER_ColorMap
[(attr
>>4)&0x0F])))
88 r
.left
= i
* data
->curcfg
.cell_width
;
89 r
.top
= (j
+ 1) * data
->curcfg
.cell_height
- PRIVATE(data
)->ext_leading
;
90 r
.right
= k
* data
->curcfg
.cell_width
;
91 r
.bottom
= (j
+ 1) * data
->curcfg
.cell_height
;
92 FillRect(PRIVATE(data
)->hMemDC
, &r
, hbr
);
98 SelectObject(PRIVATE(data
)->hMemDC
, hOldFont
);
99 HeapFree(GetProcessHeap(), 0, line
);
102 /******************************************************************
105 * Either the font geometry or the sb geometry has changed. we need
106 * to recreate the bitmap geometry.
108 static void WCUSER_NewBitmap(struct inner_data
* data
)
113 if (!data
->curcfg
.sb_width
|| !data
->curcfg
.sb_height
||
114 !PRIVATE(data
)->hFont
|| !(hDC
= GetDC(PRIVATE(data
)->hWnd
)))
116 hnew
= CreateCompatibleBitmap(hDC
,
117 data
->curcfg
.sb_width
* data
->curcfg
.cell_width
,
118 data
->curcfg
.sb_height
* data
->curcfg
.cell_height
);
119 ReleaseDC(PRIVATE(data
)->hWnd
, hDC
);
120 hold
= SelectObject(PRIVATE(data
)->hMemDC
, hnew
);
122 if (PRIVATE(data
)->hBitmap
)
124 if (hold
== PRIVATE(data
)->hBitmap
)
125 DeleteObject(PRIVATE(data
)->hBitmap
);
127 WINE_FIXME("leak\n");
129 PRIVATE(data
)->hBitmap
= hnew
;
130 WCUSER_FillMemDC(data
, 0, data
->curcfg
.sb_height
- 1);
133 /******************************************************************
134 * WCUSER_ResizeScreenBuffer
138 static void WCUSER_ResizeScreenBuffer(struct inner_data
* data
)
140 WCUSER_NewBitmap(data
);
143 /******************************************************************
146 * Set a new position for the cursor
148 static void WCUSER_PosCursor(const struct inner_data
* data
)
150 if (PRIVATE(data
)->hWnd
!= GetFocus() || !data
->curcfg
.cursor_visible
) return;
152 SetCaretPos((data
->cursor
.X
- data
->curcfg
.win_pos
.X
) * data
->curcfg
.cell_width
,
153 (data
->cursor
.Y
- data
->curcfg
.win_pos
.Y
) * data
->curcfg
.cell_height
);
154 ShowCaret(PRIVATE(data
)->hWnd
);
157 /******************************************************************
160 * Sets a new shape for the cursor
162 static void WCUSER_ShapeCursor(struct inner_data
* data
, int size
, int vis
, BOOL force
)
164 if (force
|| size
!= data
->curcfg
.cursor_size
)
166 if (data
->curcfg
.cursor_visible
&& PRIVATE(data
)->hWnd
== GetFocus()) DestroyCaret();
167 if (PRIVATE(data
)->cursor_bitmap
) DeleteObject(PRIVATE(data
)->cursor_bitmap
);
168 PRIVATE(data
)->cursor_bitmap
= NULL
;
171 int w16b
; /* number of bytes per row, aligned on word size */
175 w16b
= ((data
->curcfg
.cell_width
+ 15) & ~15) / 8;
176 ptr
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, w16b
* data
->curcfg
.cell_height
);
177 if (!ptr
) WINECON_Fatal("OOM");
178 nbl
= max((data
->curcfg
.cell_height
* size
) / 100, 1);
179 for (j
= data
->curcfg
.cell_height
- nbl
; j
< data
->curcfg
.cell_height
; j
++)
181 for (i
= 0; i
< data
->curcfg
.cell_width
; i
++)
183 ptr
[w16b
* j
+ (i
/ 8)] |= 0x80 >> (i
& 7);
186 PRIVATE(data
)->cursor_bitmap
= CreateBitmap(data
->curcfg
.cell_width
,
187 data
->curcfg
.cell_height
, 1, 1, ptr
);
188 HeapFree(GetProcessHeap(), 0, ptr
);
190 data
->curcfg
.cursor_size
= size
;
191 data
->curcfg
.cursor_visible
= -1;
194 vis
= (vis
) ? TRUE
: FALSE
;
195 if (force
|| vis
!= data
->curcfg
.cursor_visible
)
197 data
->curcfg
.cursor_visible
= vis
;
198 if (PRIVATE(data
)->hWnd
== GetFocus())
202 CreateCaret(PRIVATE(data
)->hWnd
, PRIVATE(data
)->cursor_bitmap
,
203 data
->curcfg
.cell_width
, data
->curcfg
.cell_height
);
204 WCUSER_PosCursor(data
);
212 WINECON_DumpConfig("crsr", &data
->curcfg
);
215 /******************************************************************
216 * WCUSER_ComputePositions
218 * Recomputes all the components (mainly scroll bars) positions
220 static void WCUSER_ComputePositions(struct inner_data
* data
)
225 /* compute window size from desired client size */
227 r
.right
= data
->curcfg
.win_width
* data
->curcfg
.cell_width
;
228 r
.bottom
= data
->curcfg
.win_height
* data
->curcfg
.cell_height
;
230 if (IsRectEmpty(&r
)) return;
232 AdjustWindowRect(&r
, GetWindowLong(PRIVATE(data
)->hWnd
, GWL_STYLE
), FALSE
);
235 if (data
->curcfg
.sb_width
> data
->curcfg
.win_width
)
237 dy
= GetSystemMetrics(SM_CYHSCROLL
);
238 SetScrollRange(PRIVATE(data
)->hWnd
, SB_HORZ
, 0,
239 data
->curcfg
.sb_width
- data
->curcfg
.win_width
, FALSE
);
240 SetScrollPos(PRIVATE(data
)->hWnd
, SB_HORZ
, 0, FALSE
); /* FIXME */
241 ShowScrollBar(PRIVATE(data
)->hWnd
, SB_HORZ
, TRUE
);
245 ShowScrollBar(PRIVATE(data
)->hWnd
, SB_HORZ
, FALSE
);
248 if (data
->curcfg
.sb_height
> data
->curcfg
.win_height
)
250 dx
= GetSystemMetrics(SM_CXVSCROLL
);
251 SetScrollRange(PRIVATE(data
)->hWnd
, SB_VERT
, 0,
252 data
->curcfg
.sb_height
- data
->curcfg
.win_height
, FALSE
);
253 SetScrollPos(PRIVATE(data
)->hWnd
, SB_VERT
, 0, FALSE
); /* FIXME */
254 ShowScrollBar(PRIVATE(data
)->hWnd
, SB_VERT
, TRUE
);
258 ShowScrollBar(PRIVATE(data
)->hWnd
, SB_VERT
, FALSE
);
261 SetWindowPos(PRIVATE(data
)->hWnd
, 0, 0, 0, r
.right
- r
.left
+ dx
, r
.bottom
- r
.top
+ dy
,
262 SWP_NOMOVE
|SWP_NOZORDER
);
263 WCUSER_ShapeCursor(data
, data
->curcfg
.cursor_size
, data
->curcfg
.cursor_visible
, TRUE
);
264 WCUSER_PosCursor(data
);
267 /******************************************************************
270 * Sets the title to the wine console
272 static void WCUSER_SetTitle(const struct inner_data
* data
)
276 if (WINECON_GetConsoleTitle(data
->hConIn
, buffer
, sizeof(buffer
)))
277 SetWindowText(PRIVATE(data
)->hWnd
, buffer
);
280 void WCUSER_DumpLogFont(const char* pfx
, const LOGFONT
* lf
, DWORD ft
)
282 WINE_TRACE_(wc_font
)("%s %s%s%s%s\n"
283 "\tlf.lfHeight=%d lf.lfWidth=%d lf.lfEscapement=%d lf.lfOrientation=%d\n"
284 "\tlf.lfWeight=%d lf.lfItalic=%u lf.lfUnderline=%u lf.lfStrikeOut=%u\n"
285 "\tlf.lfCharSet=%u lf.lfOutPrecision=%u lf.lfClipPrecision=%u lf.lfQuality=%u\n"
286 "\tlf->lfPitchAndFamily=%u lf.lfFaceName=%s\n",
288 (ft
& RASTER_FONTTYPE
) ? "raster" : "",
289 (ft
& TRUETYPE_FONTTYPE
) ? "truetype" : "",
290 ((ft
& (RASTER_FONTTYPE
|TRUETYPE_FONTTYPE
)) == 0) ? "vector" : "",
291 (ft
& DEVICE_FONTTYPE
) ? "|device" : "",
292 lf
->lfHeight
, lf
->lfWidth
, lf
->lfEscapement
, lf
->lfOrientation
,
293 lf
->lfWeight
, lf
->lfItalic
, lf
->lfUnderline
, lf
->lfStrikeOut
, lf
->lfCharSet
,
294 lf
->lfOutPrecision
, lf
->lfClipPrecision
, lf
->lfQuality
, lf
->lfPitchAndFamily
,
295 wine_dbgstr_w(lf
->lfFaceName
));
298 void WCUSER_DumpTextMetric(const TEXTMETRIC
* tm
, DWORD ft
)
300 WINE_TRACE_(wc_font
)("%s%s%s%s\n"
301 "\ttmHeight=%d tmAscent=%d tmDescent=%d tmInternalLeading=%d tmExternalLeading=%d\n"
302 "\ttmAveCharWidth=%d tmMaxCharWidth=%d tmWeight=%d tmOverhang=%d\n"
303 "\ttmDigitizedAspectX=%d tmDigitizedAspectY=%d\n"
304 "\ttmFirstChar=%d tmLastChar=%d tmDefaultChar=%d tmBreakChar=%d\n"
305 "\ttmItalic=%u tmUnderlined=%u tmStruckOut=%u tmPitchAndFamily=%u tmCharSet=%u\n",
306 (ft
& RASTER_FONTTYPE
) ? "raster" : "",
307 (ft
& TRUETYPE_FONTTYPE
) ? "truetype" : "",
308 ((ft
& (RASTER_FONTTYPE
|TRUETYPE_FONTTYPE
)) == 0) ? "vector" : "",
309 (ft
& DEVICE_FONTTYPE
) ? "|device" : "",
310 tm
->tmHeight
, tm
->tmAscent
, tm
->tmDescent
, tm
->tmInternalLeading
, tm
->tmExternalLeading
, tm
->tmAveCharWidth
,
311 tm
->tmMaxCharWidth
, tm
->tmWeight
, tm
->tmOverhang
, tm
->tmDigitizedAspectX
, tm
->tmDigitizedAspectY
,
312 tm
->tmFirstChar
, tm
->tmLastChar
, tm
->tmDefaultChar
, tm
->tmBreakChar
, tm
->tmItalic
, tm
->tmUnderlined
, tm
->tmStruckOut
,
313 tm
->tmPitchAndFamily
, tm
->tmCharSet
);
316 /******************************************************************
317 * WCUSER_AreFontsEqual
321 BOOL
WCUSER_AreFontsEqual(const struct config_data
* config
, const LOGFONT
* lf
)
323 return lf
->lfHeight
== config
->cell_height
&&
324 lf
->lfWeight
== config
->font_weight
&&
325 !lf
->lfItalic
&& !lf
->lfUnderline
&& !lf
->lfStrikeOut
&&
326 !lstrcmp(lf
->lfFaceName
, config
->face_name
);
331 struct inner_data
* data
;
335 /******************************************************************
336 * WCUSER_ValidateFontMetric
338 * Returns true if the font described in tm is usable as a font for the renderer
340 BOOL
WCUSER_ValidateFontMetric(const struct inner_data
* data
, const TEXTMETRIC
* tm
, DWORD fontType
)
344 if (fontType
& RASTER_FONTTYPE
)
345 ret
= (tm
->tmMaxCharWidth
* data
->curcfg
.win_width
< GetSystemMetrics(SM_CXSCREEN
) &&
346 tm
->tmHeight
* data
->curcfg
.win_height
< GetSystemMetrics(SM_CYSCREEN
));
347 return ret
&& !tm
->tmItalic
&& !tm
->tmUnderlined
&& !tm
->tmStruckOut
&&
348 (tm
->tmCharSet
== DEFAULT_CHARSET
|| tm
->tmCharSet
== g_uiDefaultCharset
);
351 /******************************************************************
352 * WCUSER_ValidateFont
354 * Returns true if the font family described in lf is usable as a font for the renderer
356 BOOL
WCUSER_ValidateFont(const struct inner_data
* data
, const LOGFONT
* lf
)
358 return (lf
->lfPitchAndFamily
& 3) == FIXED_PITCH
&&
359 /* (lf->lfPitchAndFamily & 0xF0) == FF_MODERN && */
360 (lf
->lfCharSet
== DEFAULT_CHARSET
|| lf
->lfCharSet
== g_uiDefaultCharset
);
363 /******************************************************************
364 * get_first_font_enum_2
365 * get_first_font_enum
367 * Helper functions to get a decent font for the renderer
369 static int CALLBACK
get_first_font_enum_2(const LOGFONT
* lf
, const TEXTMETRIC
* tm
,
370 DWORD FontType
, LPARAM lParam
)
372 struct font_chooser
* fc
= (struct font_chooser
*)lParam
;
374 WCUSER_DumpTextMetric(tm
, FontType
);
375 if (WCUSER_ValidateFontMetric(fc
->data
, tm
, FontType
))
379 /* Use the default sizes for the font (this is needed, especially for
380 * TrueType fonts, so that we get a decent size, not the max size)
382 mlf
.lfWidth
= fc
->data
->curcfg
.cell_width
;
383 mlf
.lfHeight
= fc
->data
->curcfg
.cell_height
;
384 if (WCUSER_SetFont(fc
->data
, &mlf
))
386 struct config_data defcfg
;
388 WCUSER_DumpLogFont("InitChoosing: ", &mlf
, FontType
);
390 /* since we've modified the current config with new font information,
391 * set this information as the new default.
393 WINECON_RegLoad(NULL
, &defcfg
);
394 defcfg
.cell_width
= fc
->data
->curcfg
.cell_width
;
395 defcfg
.cell_height
= fc
->data
->curcfg
.cell_height
;
396 lstrcpyW(defcfg
.face_name
, fc
->data
->curcfg
.face_name
);
397 /* Force also its writing back to the registry so that we can get it
400 WINECON_RegSave(&defcfg
);
407 static int CALLBACK
get_first_font_enum(const LOGFONT
* lf
, const TEXTMETRIC
* tm
,
408 DWORD FontType
, LPARAM lParam
)
410 struct font_chooser
* fc
= (struct font_chooser
*)lParam
;
412 WCUSER_DumpLogFont("InitFamily: ", lf
, FontType
);
413 if (WCUSER_ValidateFont(fc
->data
, lf
))
415 EnumFontFamilies(PRIVATE(fc
->data
)->hMemDC
, lf
->lfFaceName
,
416 get_first_font_enum_2
, lParam
);
417 return !fc
->done
; /* we just need the first matching one... */
422 /******************************************************************
425 * get the relevant information from the font described in lf and store them
428 HFONT
WCUSER_CopyFont(struct config_data
* config
, HWND hWnd
, const LOGFONT
* lf
, LONG
* el
)
432 HFONT hFont
, hOldFont
;
435 if (!(hDC
= GetDC(hWnd
))) return NULL
;
436 if (!(hFont
= CreateFontIndirect(lf
))) goto err1
;
438 hOldFont
= SelectObject(hDC
, hFont
);
439 GetTextMetrics(hDC
, &tm
);
442 * the current freetype engine (at least 2.0.x with x <= 8) and its implementation
443 * in Wine don't return adequate values for fixed fonts
444 * In Windows, those fonts are expected to return the same value for
445 * - the average width
446 * - the largest width
447 * - the width of all characters in the font
448 * This isn't true in Wine. As a temporary workaround, we get as the width of the
449 * cell, the width of the first character in the font, after checking that all
450 * characters in the font have the same width (I hear paranoïa coming)
451 * when this gets fixed, the code should be using tm.tmAveCharWidth
452 * or tm.tmMaxCharWidth as the cell width.
454 GetCharWidth32(hDC
, tm
.tmFirstChar
, tm
.tmFirstChar
, &w
);
455 for (i
= tm
.tmFirstChar
+ 1; i
<= tm
.tmLastChar
; i
+= sizeof(buf
) / sizeof(buf
[0]))
459 k
= min(tm
.tmLastChar
- i
, sizeof(buf
) / sizeof(buf
[0]) - 1);
460 GetCharWidth32(hDC
, i
, i
+ k
, buf
);
461 for (j
= 0; j
<= k
; j
++)
465 WINE_WARN("Non uniform cell width: [%d]=%d [%d]=%d\n"
466 "This may be caused by old freetype libraries, >= 2.0.8 is recommended\n",
467 i
+ j
, buf
[j
], tm
.tmFirstChar
, w
);
472 SelectObject(hDC
, hOldFont
);
473 ReleaseDC(hWnd
, hDC
);
475 config
->cell_width
= w
;
476 config
->cell_height
= tm
.tmHeight
+ tm
.tmExternalLeading
;
477 config
->font_weight
= tm
.tmWeight
;
478 lstrcpy(config
->face_name
, lf
->lfFaceName
);
479 if (el
) *el
= tm
.tmExternalLeading
;
483 if (hDC
&& hOldFont
) SelectObject(hDC
, hOldFont
);
484 if (hFont
) DeleteObject(hFont
);
486 if (hDC
) ReleaseDC(hWnd
, hDC
);
491 /******************************************************************
496 void WCUSER_FillLogFont(LOGFONT
* lf
, const WCHAR
* name
, UINT height
, UINT weight
)
498 lf
->lfHeight
= height
;
500 lf
->lfEscapement
= 0;
501 lf
->lfOrientation
= 0;
502 lf
->lfWeight
= weight
;
503 lf
->lfItalic
= FALSE
;
504 lf
->lfUnderline
= FALSE
;
505 lf
->lfStrikeOut
= FALSE
;
506 lf
->lfCharSet
= DEFAULT_CHARSET
;
507 lf
->lfOutPrecision
= OUT_DEFAULT_PRECIS
;
508 lf
->lfClipPrecision
= CLIP_DEFAULT_PRECIS
;
509 lf
->lfQuality
= DEFAULT_QUALITY
;
510 lf
->lfPitchAndFamily
= FIXED_PITCH
| FF_DONTCARE
;
511 lstrcpy(lf
->lfFaceName
, name
);
514 /******************************************************************
517 * sets logfont as the new font for the console
519 BOOL
WCUSER_SetFont(struct inner_data
* data
, const LOGFONT
* logfont
)
524 if (PRIVATE(data
)->hFont
!= 0 && WCUSER_AreFontsEqual(&data
->curcfg
, logfont
))
527 hFont
= WCUSER_CopyFont(&data
->curcfg
, PRIVATE(data
)->hWnd
, logfont
, &el
);
528 if (!hFont
) {WINE_ERR("wrong font\n"); return FALSE
;}
530 if (PRIVATE(data
)->hFont
) DeleteObject(PRIVATE(data
)->hFont
);
531 PRIVATE(data
)->hFont
= hFont
;
532 PRIVATE(data
)->ext_leading
= el
;
534 WCUSER_ComputePositions(data
);
535 WCUSER_NewBitmap(data
);
536 InvalidateRect(PRIVATE(data
)->hWnd
, NULL
, FALSE
);
537 UpdateWindow(PRIVATE(data
)->hWnd
);
542 /******************************************************************
545 * Sets a new font for the console.
546 * In fact a wrapper for WCUSER_SetFont
548 static void WCUSER_SetFontPmt(struct inner_data
* data
, const WCHAR
* font
,
549 unsigned height
, unsigned weight
)
552 struct font_chooser fc
;
554 WINE_TRACE_(wc_font
)("=> %s h=%u w=%u\n",
555 wine_dbgstr_wn(font
, -1), height
, weight
);
557 if (font
[0] != '\0' && height
!= 0 && weight
!= 0)
559 WCUSER_FillLogFont(&lf
, font
, height
, weight
);
560 if (WCUSER_SetFont(data
, &lf
))
562 WCUSER_DumpLogFont("InitReuses: ", &lf
, 0);
567 /* try to find an acceptable font */
568 WINE_WARN("Couldn't match the font from registry... trying to find one\n");
571 EnumFontFamilies(PRIVATE(data
)->hMemDC
, NULL
, get_first_font_enum
, (LPARAM
)&fc
);
572 if (!fc
.done
) WINECON_Fatal("Couldn't find a decent font, aborting\n");
575 /******************************************************************
578 * Get a cell from a relative coordinate in window (takes into
579 * account the scrolling)
581 static COORD
WCUSER_GetCell(const struct inner_data
* data
, LPARAM lParam
)
585 c
.X
= data
->curcfg
.win_pos
.X
+ (short)LOWORD(lParam
) / data
->curcfg
.cell_width
;
586 c
.Y
= data
->curcfg
.win_pos
.Y
+ (short)HIWORD(lParam
) / data
->curcfg
.cell_height
;
591 /******************************************************************
592 * WCUSER_GetSelectionRect
594 * Get the selection rectangle
596 static void WCUSER_GetSelectionRect(const struct inner_data
* data
, LPRECT r
)
598 r
->left
= (min(PRIVATE(data
)->selectPt1
.X
, PRIVATE(data
)->selectPt2
.X
) - data
->curcfg
.win_pos
.X
) * data
->curcfg
.cell_width
;
599 r
->top
= (min(PRIVATE(data
)->selectPt1
.Y
, PRIVATE(data
)->selectPt2
.Y
) - data
->curcfg
.win_pos
.Y
) * data
->curcfg
.cell_height
;
600 r
->right
= (max(PRIVATE(data
)->selectPt1
.X
, PRIVATE(data
)->selectPt2
.X
) + 1 - data
->curcfg
.win_pos
.X
) * data
->curcfg
.cell_width
;
601 r
->bottom
= (max(PRIVATE(data
)->selectPt1
.Y
, PRIVATE(data
)->selectPt2
.Y
) + 1 - data
->curcfg
.win_pos
.Y
) * data
->curcfg
.cell_height
;
604 /******************************************************************
605 * WCUSER_SetSelection
609 static void WCUSER_SetSelection(const struct inner_data
* data
, HDC hRefDC
)
614 WCUSER_GetSelectionRect(data
, &r
);
615 hDC
= hRefDC
? hRefDC
: GetDC(PRIVATE(data
)->hWnd
);
618 if (PRIVATE(data
)->hWnd
== GetFocus() && data
->curcfg
.cursor_visible
)
619 HideCaret(PRIVATE(data
)->hWnd
);
622 ReleaseDC(PRIVATE(data
)->hWnd
, hDC
);
623 if (PRIVATE(data
)->hWnd
== GetFocus() && data
->curcfg
.cursor_visible
)
624 ShowCaret(PRIVATE(data
)->hWnd
);
628 /******************************************************************
629 * WCUSER_MoveSelection
633 static void WCUSER_MoveSelection(struct inner_data
* data
, COORD c1
, COORD c2
)
638 if (c1
.X
< 0 || c1
.X
>= data
->curcfg
.sb_width
||
639 c2
.X
< 0 || c2
.X
>= data
->curcfg
.sb_width
||
640 c1
.Y
< 0 || c1
.Y
>= data
->curcfg
.sb_height
||
641 c2
.Y
< 0 || c2
.Y
>= data
->curcfg
.sb_height
)
644 WCUSER_GetSelectionRect(data
, &r
);
645 hDC
= GetDC(PRIVATE(data
)->hWnd
);
648 if (PRIVATE(data
)->hWnd
== GetFocus() && data
->curcfg
.cursor_visible
)
649 HideCaret(PRIVATE(data
)->hWnd
);
652 PRIVATE(data
)->selectPt1
= c1
;
653 PRIVATE(data
)->selectPt2
= c2
;
656 WCUSER_GetSelectionRect(data
, &r
);
658 ReleaseDC(PRIVATE(data
)->hWnd
, hDC
);
659 if (PRIVATE(data
)->hWnd
== GetFocus() && data
->curcfg
.cursor_visible
)
660 ShowCaret(PRIVATE(data
)->hWnd
);
664 /******************************************************************
665 * WCUSER_CopySelectionToClipboard
667 * Copies the current selection into the clipboard
669 static void WCUSER_CopySelectionToClipboard(const struct inner_data
* data
)
675 w
= abs(PRIVATE(data
)->selectPt1
.X
- PRIVATE(data
)->selectPt2
.X
) + 2;
676 h
= abs(PRIVATE(data
)->selectPt1
.Y
- PRIVATE(data
)->selectPt2
.Y
) + 1;
678 if (!OpenClipboard(PRIVATE(data
)->hWnd
)) return;
681 hMem
= GlobalAlloc(GMEM_MOVEABLE
, (w
* h
) * sizeof(WCHAR
));
682 if (hMem
&& (p
= GlobalLock(hMem
)))
687 c
.X
= min(PRIVATE(data
)->selectPt1
.X
, PRIVATE(data
)->selectPt2
.X
);
688 c
.Y
= min(PRIVATE(data
)->selectPt1
.Y
, PRIVATE(data
)->selectPt2
.Y
);
690 for (y
= 0; y
< h
; y
++, c
.Y
++)
693 ReadConsoleOutputCharacter(data
->hConOut
, p
, w
- 1, c
, NULL
);
695 /* strip spaces from the end of the line */
697 while (end
> p
&& *(end
- 1) == ' ')
699 *end
= (y
< h
- 1) ? '\n' : '\0';
703 SetClipboardData(CF_UNICODETEXT
, hMem
);
708 /******************************************************************
709 * WCUSER_PasteFromClipboard
713 static void WCUSER_PasteFromClipboard(struct inner_data
* data
)
718 if (!OpenClipboard(PRIVATE(data
)->hWnd
)) return;
719 h
= GetClipboardData(CF_UNICODETEXT
);
720 if (h
&& (ptr
= GlobalLock(h
)))
722 int i
, len
= GlobalSize(h
) / sizeof(WCHAR
);
727 ir
[0].EventType
= KEY_EVENT
;
728 ir
[0].Event
.KeyEvent
.wRepeatCount
= 0;
729 ir
[0].Event
.KeyEvent
.dwControlKeyState
= 0;
730 ir
[0].Event
.KeyEvent
.bKeyDown
= TRUE
;
732 /* generate the corresponding input records */
733 for (i
= 0; i
< len
; i
++)
735 /* FIXME: the modifying keys are not generated (shift, ctrl...) */
736 sh
= VkKeyScan(ptr
[i
]);
737 ir
[0].Event
.KeyEvent
.wVirtualKeyCode
= LOBYTE(sh
);
738 ir
[0].Event
.KeyEvent
.wVirtualScanCode
= MapVirtualKey(LOBYTE(sh
), 0);
739 ir
[0].Event
.KeyEvent
.uChar
.UnicodeChar
= ptr
[i
];
742 ir
[1].Event
.KeyEvent
.bKeyDown
= FALSE
;
744 WriteConsoleInput(data
->hConIn
, ir
, 2, &n
);
751 /******************************************************************
756 static void WCUSER_Refresh(const struct inner_data
* data
, int tp
, int bm
)
758 WCUSER_FillMemDC(data
, tp
, bm
);
759 if (data
->curcfg
.win_pos
.Y
<= bm
&& data
->curcfg
.win_pos
.Y
+ data
->curcfg
.win_height
>= tp
)
764 r
.right
= data
->curcfg
.win_width
* data
->curcfg
.cell_width
;
765 r
.top
= (tp
- data
->curcfg
.win_pos
.Y
) * data
->curcfg
.cell_height
;
766 r
.bottom
= (bm
- data
->curcfg
.win_pos
.Y
+ 1) * data
->curcfg
.cell_height
;
767 InvalidateRect(PRIVATE(data
)->hWnd
, &r
, FALSE
);
768 UpdateWindow(PRIVATE(data
)->hWnd
);
772 /******************************************************************
777 static void WCUSER_Paint(const struct inner_data
* data
)
781 BeginPaint(PRIVATE(data
)->hWnd
, &ps
);
783 data
->curcfg
.win_width
* data
->curcfg
.cell_width
,
784 data
->curcfg
.win_height
* data
->curcfg
.cell_height
,
785 PRIVATE(data
)->hMemDC
,
786 data
->curcfg
.win_pos
.X
* data
->curcfg
.cell_width
,
787 data
->curcfg
.win_pos
.Y
* data
->curcfg
.cell_height
,
789 if (PRIVATE(data
)->has_selection
)
790 WCUSER_SetSelection(data
, ps
.hdc
);
791 EndPaint(PRIVATE(data
)->hWnd
, &ps
);
794 /******************************************************************
799 static void WCUSER_Scroll(struct inner_data
* data
, int pos
, BOOL horz
)
803 SetScrollPos(PRIVATE(data
)->hWnd
, SB_HORZ
, pos
, TRUE
);
804 data
->curcfg
.win_pos
.X
= pos
;
808 SetScrollPos(PRIVATE(data
)->hWnd
, SB_VERT
, pos
, TRUE
);
809 data
->curcfg
.win_pos
.Y
= pos
;
811 InvalidateRect(PRIVATE(data
)->hWnd
, NULL
, FALSE
);
814 /******************************************************************
819 static BOOL
WCUSER_FillMenu(HMENU hMenu
, BOOL sep
)
822 HINSTANCE hInstance
= GetModuleHandle(NULL
);
825 if (!hMenu
) return FALSE
;
827 /* FIXME: error handling & memory cleanup */
828 hSubMenu
= CreateMenu();
829 if (!hSubMenu
) return FALSE
;
831 LoadString(hInstance
, IDS_MARK
, buff
, sizeof(buff
) / sizeof(WCHAR
));
832 InsertMenu(hSubMenu
, -1, MF_BYPOSITION
|MF_STRING
, IDS_MARK
, buff
);
833 LoadString(hInstance
, IDS_COPY
, buff
, sizeof(buff
) / sizeof(WCHAR
));
834 InsertMenu(hSubMenu
, -1, MF_BYPOSITION
|MF_STRING
, IDS_COPY
, buff
);
835 LoadString(hInstance
, IDS_PASTE
, buff
, sizeof(buff
) / sizeof(WCHAR
));
836 InsertMenu(hSubMenu
, -1, MF_BYPOSITION
|MF_STRING
, IDS_PASTE
, buff
);
837 LoadString(hInstance
, IDS_SELECTALL
, buff
, sizeof(buff
) / sizeof(WCHAR
));
838 InsertMenu(hSubMenu
, -1, MF_BYPOSITION
|MF_STRING
, IDS_SELECTALL
, buff
);
839 LoadString(hInstance
, IDS_SCROLL
, buff
, sizeof(buff
) / sizeof(WCHAR
));
840 InsertMenu(hSubMenu
, -1, MF_BYPOSITION
|MF_STRING
, IDS_SCROLL
, buff
);
841 LoadString(hInstance
, IDS_SEARCH
, buff
, sizeof(buff
) / sizeof(WCHAR
));
842 InsertMenu(hSubMenu
, -1, MF_BYPOSITION
|MF_STRING
, IDS_SEARCH
, buff
);
844 if (sep
) InsertMenu(hMenu
, -1, MF_BYPOSITION
|MF_SEPARATOR
, 0, NULL
);
845 LoadString(hInstance
, IDS_EDIT
, buff
, sizeof(buff
) / sizeof(WCHAR
));
846 InsertMenu(hMenu
, -1, MF_BYPOSITION
|MF_STRING
|MF_POPUP
, (UINT_PTR
)hSubMenu
, buff
);
847 LoadString(hInstance
, IDS_DEFAULT
, buff
, sizeof(buff
) / sizeof(WCHAR
));
848 InsertMenu(hMenu
, -1, MF_BYPOSITION
|MF_STRING
, IDS_DEFAULT
, buff
);
849 LoadString(hInstance
, IDS_PROPERTIES
, buff
, sizeof(buff
) / sizeof(WCHAR
));
850 InsertMenu(hMenu
, -1, MF_BYPOSITION
|MF_STRING
, IDS_PROPERTIES
, buff
);
855 /******************************************************************
856 * WCUSER_SetMenuDetails
858 * Grays / ungrays the menu items according to their state
860 static void WCUSER_SetMenuDetails(const struct inner_data
* data
, HMENU hMenu
)
862 if (!hMenu
) {WINE_ERR("Issue in getting menu bits\n");return;}
864 EnableMenuItem(hMenu
, IDS_COPY
,
865 MF_BYCOMMAND
|(PRIVATE(data
)->has_selection
? MF_ENABLED
: MF_GRAYED
));
866 EnableMenuItem(hMenu
, IDS_PASTE
,
867 MF_BYCOMMAND
|(IsClipboardFormatAvailable(CF_UNICODETEXT
)
868 ? MF_ENABLED
: MF_GRAYED
));
869 EnableMenuItem(hMenu
, IDS_SCROLL
, MF_BYCOMMAND
|MF_GRAYED
);
870 EnableMenuItem(hMenu
, IDS_SEARCH
, MF_BYCOMMAND
|MF_GRAYED
);
873 /******************************************************************
876 * Creates the window for the rendering
878 static LRESULT
WCUSER_Create(HWND hWnd
, LPCREATESTRUCT lpcs
)
880 struct inner_data
* data
;
883 data
= lpcs
->lpCreateParams
;
884 SetWindowLongPtr(hWnd
, 0L, (DWORD_PTR
)data
);
885 PRIVATE(data
)->hWnd
= hWnd
;
887 hSysMenu
= GetSystemMenu(hWnd
, FALSE
);
888 if (!hSysMenu
) return 0;
889 PRIVATE(data
)->hPopMenu
= CreatePopupMenu();
890 if (!PRIVATE(data
)->hPopMenu
) return 0;
892 WCUSER_FillMenu(hSysMenu
, TRUE
);
893 WCUSER_FillMenu(PRIVATE(data
)->hPopMenu
, FALSE
);
895 PRIVATE(data
)->hMemDC
= CreateCompatibleDC(0);
896 if (!PRIVATE(data
)->hMemDC
) {WINE_ERR("no mem dc\n");return 0;}
898 data
->curcfg
.quick_edit
= FALSE
;
902 /******************************************************************
903 * WCUSER_GetCtrlKeyState
905 * Get the console bit mask equivalent to the VK_ status in keyState
907 static DWORD
WCUSER_GetCtrlKeyState(BYTE
* keyState
)
911 GetKeyboardState(keyState
);
912 if (keyState
[VK_SHIFT
] & 0x80) ret
|= SHIFT_PRESSED
;
913 if (keyState
[VK_LCONTROL
] & 0x80) ret
|= LEFT_CTRL_PRESSED
;
914 if (keyState
[VK_RCONTROL
] & 0x80) ret
|= RIGHT_CTRL_PRESSED
;
915 if (keyState
[VK_LMENU
] & 0x80) ret
|= LEFT_ALT_PRESSED
;
916 if (keyState
[VK_RMENU
] & 0x80) ret
|= RIGHT_ALT_PRESSED
;
917 if (keyState
[VK_CAPITAL
] & 0x01) ret
|= CAPSLOCK_ON
;
918 if (keyState
[VK_NUMLOCK
] & 0x01) ret
|= NUMLOCK_ON
;
919 if (keyState
[VK_SCROLL
] & 0x01) ret
|= SCROLLLOCK_ON
;
924 /******************************************************************
925 * WCUSER_HandleSelectionKey
927 * Handles keys while selecting an area
929 static void WCUSER_HandleSelectionKey(struct inner_data
* data
, BOOL down
,
930 WPARAM wParam
, LPARAM lParam
)
933 DWORD state
= WCUSER_GetCtrlKeyState(keyState
) & ~(CAPSLOCK_ON
|NUMLOCK_ON
|SCROLLLOCK_ON
);
944 PRIVATE(data
)->has_selection
= FALSE
;
945 WCUSER_SetSelection(data
, 0);
946 WCUSER_CopySelectionToClipboard(data
);
949 c1
= PRIVATE(data
)->selectPt1
;
950 c2
= PRIVATE(data
)->selectPt2
;
952 WCUSER_MoveSelection(data
, c1
, c2
);
955 c1
= PRIVATE(data
)->selectPt1
;
956 c2
= PRIVATE(data
)->selectPt2
;
958 WCUSER_MoveSelection(data
, c1
, c2
);
961 c1
= PRIVATE(data
)->selectPt1
;
962 c2
= PRIVATE(data
)->selectPt2
;
964 WCUSER_MoveSelection(data
, c1
, c2
);
967 c1
= PRIVATE(data
)->selectPt1
;
968 c2
= PRIVATE(data
)->selectPt2
;
970 WCUSER_MoveSelection(data
, c1
, c2
);
978 c1
= PRIVATE(data
)->selectPt1
;
979 c2
= PRIVATE(data
)->selectPt2
;
981 WCUSER_MoveSelection(data
, c1
, c2
);
984 c1
= PRIVATE(data
)->selectPt1
;
985 c2
= PRIVATE(data
)->selectPt2
;
987 WCUSER_MoveSelection(data
, c1
, c2
);
990 c1
= PRIVATE(data
)->selectPt1
;
991 c2
= PRIVATE(data
)->selectPt2
;
993 WCUSER_MoveSelection(data
, c1
, c2
);
996 c1
= PRIVATE(data
)->selectPt1
;
997 c2
= PRIVATE(data
)->selectPt2
;
999 WCUSER_MoveSelection(data
, c1
, c2
);
1005 if (wParam
< VK_SPACE
) /* Shift, Alt, Ctrl, Num Lock etc. */
1008 WCUSER_SetSelection(data
, 0);
1009 PRIVATE(data
)->has_selection
= FALSE
;
1012 /******************************************************************
1013 * WCUSER_GenerateKeyInputRecord
1015 * generates input_record from windows WM_KEYUP/WM_KEYDOWN messages
1017 static void WCUSER_GenerateKeyInputRecord(struct inner_data
* data
, BOOL down
,
1018 WPARAM wParam
, LPARAM lParam
, BOOL sys
)
1023 static WCHAR last
; /* keep last char seen as feed for key up message */
1026 ir
.EventType
= KEY_EVENT
;
1027 ir
.Event
.KeyEvent
.bKeyDown
= down
;
1028 ir
.Event
.KeyEvent
.wRepeatCount
= LOWORD(lParam
);
1029 ir
.Event
.KeyEvent
.wVirtualKeyCode
= wParam
;
1031 ir
.Event
.KeyEvent
.wVirtualScanCode
= HIWORD(lParam
) & 0xFF;
1033 ir
.Event
.KeyEvent
.uChar
.UnicodeChar
= 0;
1034 ir
.Event
.KeyEvent
.dwControlKeyState
= WCUSER_GetCtrlKeyState(keyState
);
1035 if (lParam
& (1L << 24)) ir
.Event
.KeyEvent
.dwControlKeyState
|= ENHANCED_KEY
;
1036 if (sys
) ir
.Event
.KeyEvent
.dwControlKeyState
|= LEFT_ALT_PRESSED
; /* FIXME: gotta choose one */
1038 if (!(ir
.Event
.KeyEvent
.dwControlKeyState
& ENHANCED_KEY
))
1042 switch (ToUnicode(wParam
, HIWORD(lParam
), keyState
, buf
, 2, 0))
1045 /* FIXME... should generate two events... */
1055 ir
.Event
.KeyEvent
.uChar
.UnicodeChar
= last
; /* FIXME HACKY... and buggy 'coz it should be a stack, not a single value */
1056 if (!down
) last
= 0;
1059 WriteConsoleInput(data
->hConIn
, &ir
, 1, &n
);
1062 /******************************************************************
1063 * WCUSER_GenerateMouseInputRecord
1067 static void WCUSER_GenerateMouseInputRecord(struct inner_data
* data
, COORD c
,
1068 WPARAM wParam
, DWORD event
)
1074 /* MOUSE_EVENTs shouldn't be sent unless ENABLE_MOUSE_INPUT is active */
1075 if (!GetConsoleMode(data
->hConIn
, &mode
) || !(mode
& ENABLE_MOUSE_INPUT
))
1078 ir
.EventType
= MOUSE_EVENT
;
1079 ir
.Event
.MouseEvent
.dwMousePosition
= c
;
1080 ir
.Event
.MouseEvent
.dwButtonState
= 0;
1081 if (wParam
& MK_LBUTTON
) ir
.Event
.MouseEvent
.dwButtonState
|= FROM_LEFT_1ST_BUTTON_PRESSED
;
1082 if (wParam
& MK_MBUTTON
) ir
.Event
.MouseEvent
.dwButtonState
|= FROM_LEFT_2ND_BUTTON_PRESSED
;
1083 if (wParam
& MK_RBUTTON
) ir
.Event
.MouseEvent
.dwButtonState
|= RIGHTMOST_BUTTON_PRESSED
;
1084 if (wParam
& MK_CONTROL
) ir
.Event
.MouseEvent
.dwButtonState
|= LEFT_CTRL_PRESSED
;
1085 if (wParam
& MK_SHIFT
) ir
.Event
.MouseEvent
.dwButtonState
|= SHIFT_PRESSED
;
1086 if (event
== MOUSE_WHEELED
) ir
.Event
.MouseEvent
.dwButtonState
|= wParam
& 0xFFFF0000;
1087 ir
.Event
.MouseEvent
.dwControlKeyState
= WCUSER_GetCtrlKeyState(keyState
);
1088 ir
.Event
.MouseEvent
.dwEventFlags
= event
;
1090 WriteConsoleInput(data
->hConIn
, &ir
, 1, &n
);
1093 /******************************************************************
1098 static LRESULT CALLBACK
WCUSER_Proc(HWND hWnd
, UINT uMsg
, WPARAM wParam
, LPARAM lParam
)
1100 struct inner_data
* data
= (struct inner_data
*)GetWindowLongPtr(hWnd
, 0);
1105 return WCUSER_Create(hWnd
, (LPCREATESTRUCT
)lParam
);
1107 PRIVATE(data
)->hWnd
= 0;
1115 if (PRIVATE(data
)->has_selection
)
1116 WCUSER_HandleSelectionKey(data
, uMsg
== WM_KEYDOWN
, wParam
, lParam
);
1118 WCUSER_GenerateKeyInputRecord(data
, uMsg
== WM_KEYDOWN
, wParam
, lParam
, FALSE
);
1122 WCUSER_GenerateKeyInputRecord(data
, uMsg
== WM_SYSKEYDOWN
, wParam
, lParam
, TRUE
);
1124 case WM_LBUTTONDOWN
:
1125 if (data
->curcfg
.quick_edit
|| PRIVATE(data
)->has_selection
)
1127 if (PRIVATE(data
)->has_selection
)
1128 WCUSER_SetSelection(data
, 0);
1130 if (data
->curcfg
.quick_edit
&& PRIVATE(data
)->has_selection
)
1132 PRIVATE(data
)->has_selection
= FALSE
;
1136 PRIVATE(data
)->selectPt1
= PRIVATE(data
)->selectPt2
= WCUSER_GetCell(data
, lParam
);
1137 SetCapture(PRIVATE(data
)->hWnd
);
1138 WCUSER_SetSelection(data
, 0);
1139 PRIVATE(data
)->has_selection
= TRUE
;
1144 WCUSER_GenerateMouseInputRecord(data
, WCUSER_GetCell(data
, lParam
), wParam
, 0);
1148 if (data
->curcfg
.quick_edit
|| PRIVATE(data
)->has_selection
)
1150 if (GetCapture() == PRIVATE(data
)->hWnd
&& PRIVATE(data
)->has_selection
&&
1151 (wParam
& MK_LBUTTON
))
1153 WCUSER_MoveSelection(data
, PRIVATE(data
)->selectPt1
, WCUSER_GetCell(data
, lParam
));
1158 WCUSER_GenerateMouseInputRecord(data
, WCUSER_GetCell(data
, lParam
), wParam
, MOUSE_MOVED
);
1162 if (data
->curcfg
.quick_edit
|| PRIVATE(data
)->has_selection
)
1164 if (GetCapture() == PRIVATE(data
)->hWnd
&& PRIVATE(data
)->has_selection
)
1166 WCUSER_MoveSelection(data
, PRIVATE(data
)->selectPt1
, WCUSER_GetCell(data
, lParam
));
1172 WCUSER_GenerateMouseInputRecord(data
, WCUSER_GetCell(data
, lParam
), wParam
, 0);
1175 case WM_RBUTTONDOWN
:
1176 if ((wParam
& (MK_CONTROL
|MK_SHIFT
)) == data
->curcfg
.menu_mask
)
1180 pt
.x
= (short)LOWORD(lParam
);
1181 pt
.y
= (short)HIWORD(lParam
);
1182 ClientToScreen(hWnd
, &pt
);
1183 WCUSER_SetMenuDetails(data
, PRIVATE(data
)->hPopMenu
);
1184 TrackPopupMenu(PRIVATE(data
)->hPopMenu
, TPM_LEFTALIGN
|TPM_TOPALIGN
,
1185 pt
.x
, pt
.y
, 0, hWnd
, NULL
);
1189 WCUSER_GenerateMouseInputRecord(data
, WCUSER_GetCell(data
, lParam
), wParam
, 0);
1193 /* no need to track for rbutton up when opening the popup... the event will be
1194 * swallowed by TrackPopupMenu */
1195 case WM_MBUTTONDOWN
:
1197 WCUSER_GenerateMouseInputRecord(data
, WCUSER_GetCell(data
, lParam
), wParam
, 0);
1199 case WM_LBUTTONDBLCLK
:
1200 case WM_MBUTTONDBLCLK
:
1201 case WM_RBUTTONDBLCLK
:
1202 WCUSER_GenerateMouseInputRecord(data
, WCUSER_GetCell(data
, lParam
), wParam
, DOUBLE_CLICK
);
1205 WCUSER_GenerateMouseInputRecord(data
, WCUSER_GetCell(data
, lParam
), wParam
, MOUSE_WHEELED
);
1208 if (data
->curcfg
.cursor_visible
)
1210 CreateCaret(PRIVATE(data
)->hWnd
, PRIVATE(data
)->cursor_bitmap
,
1211 data
->curcfg
.cell_width
, data
->curcfg
.cell_height
);
1212 WCUSER_PosCursor(data
);
1216 if (data
->curcfg
.cursor_visible
)
1221 int pos
= data
->curcfg
.win_pos
.X
;
1223 switch (LOWORD(wParam
))
1225 case SB_PAGEUP
: pos
-= 8; break;
1226 case SB_PAGEDOWN
: pos
+= 8; break;
1227 case SB_LINEUP
: pos
--; break;
1228 case SB_LINEDOWN
: pos
++; break;
1229 case SB_THUMBTRACK
: pos
= HIWORD(wParam
); break;
1232 if (pos
< 0) pos
= 0;
1233 if (pos
> data
->curcfg
.sb_width
- data
->curcfg
.win_width
)
1234 pos
= data
->curcfg
.sb_width
- data
->curcfg
.win_width
;
1235 if (pos
!= data
->curcfg
.win_pos
.X
)
1237 ScrollWindow(hWnd
, (data
->curcfg
.win_pos
.X
- pos
) * data
->curcfg
.cell_width
, 0,
1239 data
->curcfg
.win_pos
.X
= pos
;
1240 SetScrollPos(hWnd
, SB_HORZ
, pos
, TRUE
);
1242 WCUSER_PosCursor(data
);
1243 WINECON_NotifyWindowChange(data
);
1249 int pos
= data
->curcfg
.win_pos
.Y
;
1251 switch (LOWORD(wParam
))
1253 case SB_PAGEUP
: pos
-= 8; break;
1254 case SB_PAGEDOWN
: pos
+= 8; break;
1255 case SB_LINEUP
: pos
--; break;
1256 case SB_LINEDOWN
: pos
++; break;
1257 case SB_THUMBTRACK
: pos
= HIWORD(wParam
); break;
1260 if (pos
< 0) pos
= 0;
1261 if (pos
> data
->curcfg
.sb_height
- data
->curcfg
.win_height
)
1262 pos
= data
->curcfg
.sb_height
- data
->curcfg
.win_height
;
1263 if (pos
!= data
->curcfg
.win_pos
.Y
)
1265 ScrollWindow(hWnd
, 0, (data
->curcfg
.win_pos
.Y
- pos
) * data
->curcfg
.cell_height
,
1267 data
->curcfg
.win_pos
.Y
= pos
;
1268 SetScrollPos(hWnd
, SB_VERT
, pos
, TRUE
);
1270 WCUSER_PosCursor(data
);
1271 WINECON_NotifyWindowChange(data
);
1279 WCUSER_GetProperties(data
, FALSE
);
1281 case IDS_PROPERTIES
:
1282 WCUSER_GetProperties(data
, TRUE
);
1285 return DefWindowProc(hWnd
, uMsg
, wParam
, lParam
);
1292 WCUSER_GetProperties(data
, FALSE
);
1294 case IDS_PROPERTIES
:
1295 WCUSER_GetProperties(data
, TRUE
);
1298 PRIVATE(data
)->selectPt1
.X
= PRIVATE(data
)->selectPt1
.Y
= 0;
1299 PRIVATE(data
)->selectPt2
.X
= PRIVATE(data
)->selectPt2
.Y
= 0;
1300 WCUSER_SetSelection(data
, 0);
1301 PRIVATE(data
)->has_selection
= TRUE
;
1304 if (PRIVATE(data
)->has_selection
)
1306 PRIVATE(data
)->has_selection
= FALSE
;
1307 WCUSER_SetSelection(data
, 0);
1308 WCUSER_CopySelectionToClipboard(data
);
1312 WCUSER_PasteFromClipboard(data
);
1315 PRIVATE(data
)->selectPt1
.X
= PRIVATE(data
)->selectPt1
.Y
= 0;
1316 PRIVATE(data
)->selectPt2
.X
= (data
->curcfg
.sb_width
- 1) * data
->curcfg
.cell_width
;
1317 PRIVATE(data
)->selectPt2
.Y
= (data
->curcfg
.sb_height
- 1) * data
->curcfg
.cell_height
;
1318 WCUSER_SetSelection(data
, 0);
1319 PRIVATE(data
)->has_selection
= TRUE
;
1323 WINE_FIXME("Unhandled yet command: %x\n", wParam
);
1326 return DefWindowProc(hWnd
, uMsg
, wParam
, lParam
);
1329 case WM_INITMENUPOPUP
:
1330 if (!HIWORD(lParam
)) return DefWindowProc(hWnd
, uMsg
, wParam
, lParam
);
1331 WCUSER_SetMenuDetails(data
, GetSystemMenu(PRIVATE(data
)->hWnd
, FALSE
));
1334 return DefWindowProc(hWnd
, uMsg
, wParam
, lParam
);
1339 /******************************************************************
1340 * WCUSER_DeleteBackend
1344 static void WCUSER_DeleteBackend(struct inner_data
* data
)
1346 if (!PRIVATE(data
)) return;
1347 if (PRIVATE(data
)->hMemDC
) DeleteDC(PRIVATE(data
)->hMemDC
);
1348 if (PRIVATE(data
)->hWnd
) DestroyWindow(PRIVATE(data
)->hWnd
);
1349 if (PRIVATE(data
)->hFont
) DeleteObject(PRIVATE(data
)->hFont
);
1350 if (PRIVATE(data
)->cursor_bitmap
) DeleteObject(PRIVATE(data
)->cursor_bitmap
);
1351 if (PRIVATE(data
)->hBitmap
) DeleteObject(PRIVATE(data
)->hBitmap
);
1352 HeapFree(GetProcessHeap(), 0, PRIVATE(data
));
1355 /******************************************************************
1360 static int WCUSER_MainLoop(struct inner_data
* data
)
1364 ShowWindow(PRIVATE(data
)->hWnd
, data
->nCmdShow
);
1367 switch (MsgWaitForMultipleObjects(1, &data
->hSynchro
, FALSE
, INFINITE
, QS_ALLINPUT
))
1370 if (!WINECON_GrabChanges(data
) && data
->curcfg
.exit_on_die
)
1373 case WAIT_OBJECT_0
+1:
1374 /* need to use PeekMessage loop instead of simple GetMessage:
1375 * multiple messages might have arrived in between,
1376 * so GetMessage would lead to delayed processing */
1377 while (PeekMessage(&msg
, 0, 0, 0, PM_REMOVE
))
1379 if (msg
.message
== WM_QUIT
) return 0;
1380 WINE_TRACE("dispatching msg %04x\n", msg
.message
);
1381 DispatchMessage(&msg
);
1385 WINE_ERR("got pb\n");
1392 /******************************************************************
1393 * WCUSER_InitBackend
1395 * Initialisation part II: creation of window.
1398 enum init_return
WCUSER_InitBackend(struct inner_data
* data
)
1400 static const WCHAR wClassName
[] = {'W','i','n','e','C','o','n','s','o','l','e','C','l','a','s','s',0};
1405 if (!TranslateCharsetInfo((DWORD
*)(INT_PTR
)GetACP(), &ci
, TCI_SRCCODEPAGE
))
1407 g_uiDefaultCharset
= ci
.ciCharset
;
1408 WINE_TRACE_(wc_font
)("Code page %d => Default charset: %d\n", GetACP(), g_uiDefaultCharset
);
1410 data
->private = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(struct inner_data_user
));
1411 if (!data
->private) return init_failed
;
1413 data
->fnMainLoop
= WCUSER_MainLoop
;
1414 data
->fnPosCursor
= WCUSER_PosCursor
;
1415 data
->fnShapeCursor
= WCUSER_ShapeCursor
;
1416 data
->fnComputePositions
= WCUSER_ComputePositions
;
1417 data
->fnRefresh
= WCUSER_Refresh
;
1418 data
->fnResizeScreenBuffer
= WCUSER_ResizeScreenBuffer
;
1419 data
->fnSetTitle
= WCUSER_SetTitle
;
1420 data
->fnSetFont
= WCUSER_SetFontPmt
;
1421 data
->fnScroll
= WCUSER_Scroll
;
1422 data
->fnDeleteBackend
= WCUSER_DeleteBackend
;
1424 wndclass
.style
= CS_DBLCLKS
;
1425 wndclass
.lpfnWndProc
= WCUSER_Proc
;
1426 wndclass
.cbClsExtra
= 0;
1427 wndclass
.cbWndExtra
= sizeof(DWORD_PTR
);
1428 wndclass
.hInstance
= GetModuleHandle(NULL
);
1429 wndclass
.hIcon
= LoadIcon(0, IDI_WINLOGO
);
1430 wndclass
.hCursor
= LoadCursor(0, IDC_ARROW
);
1431 wndclass
.hbrBackground
= GetStockObject(BLACK_BRUSH
);
1432 wndclass
.lpszMenuName
= NULL
;
1433 wndclass
.lpszClassName
= wClassName
;
1435 RegisterClass(&wndclass
);
1437 CreateWindow(wndclass
.lpszClassName
, NULL
,
1438 WS_OVERLAPPED
|WS_CAPTION
|WS_SYSMENU
|WS_THICKFRAME
|WS_MINIMIZEBOX
|WS_HSCROLL
|WS_VSCROLL
,
1439 CW_USEDEFAULT
, CW_USEDEFAULT
, 0, 0, 0, 0, wndclass
.hInstance
, data
);
1440 if (!PRIVATE(data
)->hWnd
) return init_failed
;
1442 return init_success
;