?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Spelling fixes.
[wine/multimedia.git] / dlls / kernel32 / console.c
blob21ce10af74335faa49662ea9682620cbea4e4e48
1 /*
2 * Win32 console functions
3 *
4 * Copyright 1995 Martin von Loewis and Cameron Heide
5 * Copyright 1997 Karl Garrison
6 * Copyright 1998 John Richardson
7 * Copyright 1998 Marcus Meissner
8 * Copyright 2001,2002,2004,2005 Eric Pouech
9 * Copyright 2001 Alexandre Julliard
10 *
11 * This library is free software; you can redistribute it and/or
12 * modify it under the terms of the GNU Lesser General Public
13 * License as published by the Free Software Foundation; either
14 * version 2.1 of the License, or (at your option) any later version.
15 *
16 * This library is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 * Lesser General Public License for more details.
20 *
21 * You should have received a copy of the GNU Lesser General Public
22 * License along with this library; if not, write to the Free Software
23 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 */
25
26 /* Reference applications:
27 * - IDA (interactive disassembler) full version 3.75. Works.
28 * - LYNX/W32. Works mostly, some keys crash it.
29 */
30
31 #include "config.h"
32 #include "wine/port.h"
33
34 #include <stdarg.h>
35 #include <stdio.h>
36 #include <string.h>
37 #ifdef HAVE_UNISTD_H
38 # include <unistd.h>
39 #endif
40 #include <assert.h>
41
42 #include "windef.h"
43 #include "winbase.h"
44 #include "winnls.h"
45 #include "winerror.h"
46 #include "wincon.h"
47 #include "wine/winbase16.h"
48 #include "wine/server.h"
49 #include "wine/exception.h"
50 #include "wine/unicode.h"
51 #include "wine/debug.h"
52 #include "excpt.h"
53 #include "console_private.h"
54 #include "kernel_private.h"
55
56 WINE_DEFAULT_DEBUG_CHANNEL(console);
57
58 static CRITICAL_SECTION CONSOLE_CritSect;
59 static CRITICAL_SECTION_DEBUG critsect_debug =
60 {
61 0, 0, &CONSOLE_CritSect,
62 { &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList },
63 0, 0, { (DWORD_PTR)(__FILE__ ": CONSOLE_CritSect") }
64 };
65 static CRITICAL_SECTION CONSOLE_CritSect = { &critsect_debug, -1, 0, 0, 0, 0 };
66
67 static const WCHAR coninW[] = {'C','O','N','I','N','$',0};
68 static const WCHAR conoutW[] = {'C','O','N','O','U','T','$',0};
69
70 /* FIXME: this is not thread safe */
71 static HANDLE console_wait_event;
72
73 /* map input records to ASCII */
74 static void input_records_WtoA( INPUT_RECORD *buffer, int count )
75 {
76 int i;
77 char ch;
78
79 for (i = 0; i < count; i++)
80 {
81 if (buffer[i].EventType != KEY_EVENT) continue;
82 WideCharToMultiByte( GetConsoleCP(), 0,
83 &buffer[i].Event.KeyEvent.uChar.UnicodeChar, 1, &ch, 1, NULL, NULL );
84 buffer[i].Event.KeyEvent.uChar.AsciiChar = ch;
85 }
86 }
87
88 /* map input records to Unicode */
89 static void input_records_AtoW( INPUT_RECORD *buffer, int count )
90 {
91 int i;
92 WCHAR ch;
93
94 for (i = 0; i < count; i++)
95 {
96 if (buffer[i].EventType != KEY_EVENT) continue;
97 MultiByteToWideChar( GetConsoleCP(), 0,
98 &buffer[i].Event.KeyEvent.uChar.AsciiChar, 1, &ch, 1 );
99 buffer[i].Event.KeyEvent.uChar.UnicodeChar = ch;
100 }
101 }
102
103 /* map char infos to ASCII */
104 static void char_info_WtoA( CHAR_INFO *buffer, int count )
105 {
106 char ch;
107
108 while (count-- > 0)
109 {
110 WideCharToMultiByte( GetConsoleOutputCP(), 0, &buffer->Char.UnicodeChar, 1,
111 &ch, 1, NULL, NULL );
112 buffer->Char.AsciiChar = ch;
113 buffer++;
114 }
115 }
116
117 /* map char infos to Unicode */
118 static void char_info_AtoW( CHAR_INFO *buffer, int count )
119 {
120 WCHAR ch;
121
122 while (count-- > 0)
123 {
124 MultiByteToWideChar( GetConsoleOutputCP(), 0, &buffer->Char.AsciiChar, 1, &ch, 1 );
125 buffer->Char.UnicodeChar = ch;
126 buffer++;
127 }
128 }
129
130
131 /******************************************************************************
132 * GetConsoleWindow [KERNEL32.@] Get hwnd of the console window.
133 *
134 * RETURNS
135 * Success: hwnd of the console window.
136 * Failure: NULL
137 */
138 HWND WINAPI GetConsoleWindow(VOID)
139 {
140 HWND hWnd = NULL;
141
142 SERVER_START_REQ(get_console_input_info)
143 {
144 req->handle = 0;
145 if (!wine_server_call_err(req)) hWnd = reply->win;
146 }
147 SERVER_END_REQ;
148
149 return hWnd;
150 }
151
152
153 /******************************************************************************
154 * GetConsoleCP [KERNEL32.@] Returns the OEM code page for the console
155 *
156 * RETURNS
157 * Code page code
158 */
159 UINT WINAPI GetConsoleCP(VOID)
160 {
161 BOOL ret;
162 UINT codepage = GetOEMCP(); /* default value */
163
164 SERVER_START_REQ(get_console_input_info)
165 {
166 req->handle = 0;
167 ret = !wine_server_call_err(req);
168 if (ret && reply->input_cp)
169 codepage = reply->input_cp;
170 }
171 SERVER_END_REQ;
172
173 return codepage;
174 }
175
176
177 /******************************************************************************
178 * SetConsoleCP [KERNEL32.@]
179 */
180 BOOL WINAPI SetConsoleCP(UINT cp)
181 {
182 BOOL ret;
183
184 if (!IsValidCodePage(cp))
185 {
186 SetLastError(ERROR_INVALID_PARAMETER);
187 return FALSE;
188 }
189
190 SERVER_START_REQ(set_console_input_info)
191 {
192 req->handle = 0;
193 req->mask = SET_CONSOLE_INPUT_INFO_INPUT_CODEPAGE;
194 req->input_cp = cp;
195 ret = !wine_server_call_err(req);
196 }
197 SERVER_END_REQ;
198
199 return ret;
200 }
201
202
203 /***********************************************************************
204 * GetConsoleOutputCP (KERNEL32.@)
205 */
206 UINT WINAPI GetConsoleOutputCP(VOID)
207 {
208 BOOL ret;
209 UINT codepage = GetOEMCP(); /* default value */
210
211 SERVER_START_REQ(get_console_input_info)
212 {
213 req->handle = 0;
214 ret = !wine_server_call_err(req);
215 if (ret && reply->output_cp)
216 codepage = reply->output_cp;
217 }
218 SERVER_END_REQ;
219
220 return codepage;
221 }
222
223
224 /******************************************************************************
225 * SetConsoleOutputCP [KERNEL32.@] Set the output codepage used by the console
226 *
227 * PARAMS
228 * cp [I] code page to set
229 *
230 * RETURNS
231 * Success: TRUE
232 * Failure: FALSE
233 */
234 BOOL WINAPI SetConsoleOutputCP(UINT cp)
235 {
236 BOOL ret;
237
238 if (!IsValidCodePage(cp))
239 {
240 SetLastError(ERROR_INVALID_PARAMETER);
241 return FALSE;
242 }
243
244 SERVER_START_REQ(set_console_input_info)
245 {
246 req->handle = 0;
247 req->mask = SET_CONSOLE_INPUT_INFO_OUTPUT_CODEPAGE;
248 req->output_cp = cp;
249 ret = !wine_server_call_err(req);
250 }
251 SERVER_END_REQ;
252
253 return ret;
254 }
255
256
257 /***********************************************************************
258 * Beep (KERNEL32.@)
259 */
260 BOOL WINAPI Beep( DWORD dwFreq, DWORD dwDur )
261 {
262 static const char beep = '\a';
263 /* dwFreq and dwDur are ignored by Win95 */
264 if (isatty(2)) write( 2, &beep, 1 );
265 return TRUE;
266 }
267
268
269 /******************************************************************
270 * OpenConsoleW (KERNEL32.@)
271 *
272 * Undocumented
273 * Open a handle to the current process console.
274 * Returns INVALID_HANDLE_VALUE on failure.
275 */
276 HANDLE WINAPI OpenConsoleW(LPCWSTR name, DWORD access, BOOL inherit, DWORD creation)
277 {
278 HANDLE output;
279 HANDLE ret;
280
281 if (strcmpiW(coninW, name) == 0)
282 output = (HANDLE) FALSE;
283 else if (strcmpiW(conoutW, name) == 0)
284 output = (HANDLE) TRUE;
285 else
286 {
287 SetLastError(ERROR_INVALID_NAME);
288 return INVALID_HANDLE_VALUE;
289 }
290 if (creation != OPEN_EXISTING)
291 {
292 SetLastError(ERROR_INVALID_PARAMETER);
293 return INVALID_HANDLE_VALUE;
294 }
295
296 SERVER_START_REQ( open_console )
297 {
298 req->from = output;
299 req->access = access;
300 req->attributes = inherit ? OBJ_INHERIT : 0;
301 req->share = FILE_SHARE_READ | FILE_SHARE_WRITE;
302 SetLastError(0);
303 wine_server_call_err( req );
304 ret = reply->handle;
305 }
306 SERVER_END_REQ;
307 if (ret)
308 ret = console_handle_map(ret);
309 else
310 {
311 /* likely, we're not attached to wineconsole
312 * let's try to return a handle to the unix-console
313 */
314 int fd = open("/dev/tty", output ? O_WRONLY : O_RDONLY);
315 ret = INVALID_HANDLE_VALUE;
316 if (fd != -1)
317 {
318 DWORD access = (output ? GENERIC_WRITE : GENERIC_READ) | SYNCHRONIZE;
319 wine_server_fd_to_handle(fd, access, inherit ? OBJ_INHERIT : 0, &ret);
320 close(fd);
321 }
322 }
323 return ret;
324 }
325
326 /******************************************************************
327 * VerifyConsoleIoHandle (KERNEL32.@)
328 *
329 * Undocumented
330 */
331 BOOL WINAPI VerifyConsoleIoHandle(HANDLE handle)
332 {
333 BOOL ret;
334
335 if (!is_console_handle(handle)) return FALSE;
336 SERVER_START_REQ(get_console_mode)
337 {
338 req->handle = console_handle_unmap(handle);
339 ret = !wine_server_call_err( req );
340 }
341 SERVER_END_REQ;
342 return ret;
343 }
344
345 /******************************************************************
346 * DuplicateConsoleHandle (KERNEL32.@)
347 *
348 * Undocumented
349 */
350 HANDLE WINAPI DuplicateConsoleHandle(HANDLE handle, DWORD access, BOOL inherit,
351 DWORD options)
352 {
353 HANDLE ret;
354
355 if (!is_console_handle(handle) ||
356 !DuplicateHandle(GetCurrentProcess(), console_handle_unmap(handle),
357 GetCurrentProcess(), &ret, access, inherit, options))
358 return INVALID_HANDLE_VALUE;
359 return console_handle_map(ret);
360 }
361
362 /******************************************************************
363 * CloseConsoleHandle (KERNEL32.@)
364 *
365 * Undocumented
366 */
367 BOOL WINAPI CloseConsoleHandle(HANDLE handle)
368 {
369 if (!is_console_handle(handle))
370 {
371 SetLastError(ERROR_INVALID_PARAMETER);
372 return FALSE;
373 }
374 return CloseHandle(console_handle_unmap(handle));
375 }
376
377 /******************************************************************
378 * GetConsoleInputWaitHandle (KERNEL32.@)
379 *
380 * Undocumented
381 */
382 HANDLE WINAPI GetConsoleInputWaitHandle(void)
383 {
384 if (!console_wait_event)
385 {
386 SERVER_START_REQ(get_console_wait_event)
387 {
388 if (!wine_server_call_err( req )) console_wait_event = reply->handle;
389 }
390 SERVER_END_REQ;
391 }
392 return console_wait_event;
393 }
394
395
396 /******************************************************************************
397 * WriteConsoleInputA [KERNEL32.@]
398 */
399 BOOL WINAPI WriteConsoleInputA( HANDLE handle, const INPUT_RECORD *buffer,
400 DWORD count, LPDWORD written )
401 {
402 INPUT_RECORD *recW;
403 BOOL ret;
404
405 if (!(recW = HeapAlloc( GetProcessHeap(), 0, count * sizeof(*recW) ))) return FALSE;
406 memcpy( recW, buffer, count*sizeof(*recW) );
407 input_records_AtoW( recW, count );
408 ret = WriteConsoleInputW( handle, recW, count, written );
409 HeapFree( GetProcessHeap(), 0, recW );
410 return ret;
411 }
412
413
414 /******************************************************************************
415 * WriteConsoleInputW [KERNEL32.@]
416 */
417 BOOL WINAPI WriteConsoleInputW( HANDLE handle, const INPUT_RECORD *buffer,
418 DWORD count, LPDWORD written )
419 {
420 BOOL ret;
421
422 TRACE("(%p,%p,%d,%p)\n", handle, buffer, count, written);
423
424 if (written) *written = 0;
425 SERVER_START_REQ( write_console_input )
426 {
427 req->handle = console_handle_unmap(handle);
428 wine_server_add_data( req, buffer, count * sizeof(INPUT_RECORD) );
429 if ((ret = !wine_server_call_err( req )) && written)
430 *written = reply->written;
431 }
432 SERVER_END_REQ;
433
434 return ret;
435 }
436
437
438 /***********************************************************************
439 * WriteConsoleOutputA (KERNEL32.@)
440 */
441 BOOL WINAPI WriteConsoleOutputA( HANDLE hConsoleOutput, const CHAR_INFO *lpBuffer,
442 COORD size, COORD coord, LPSMALL_RECT region )
443 {
444 int y;
445 BOOL ret;
446 COORD new_size, new_coord;
447 CHAR_INFO *ciw;
448
449 new_size.X = min( region->Right - region->Left + 1, size.X - coord.X );
450 new_size.Y = min( region->Bottom - region->Top + 1, size.Y - coord.Y );
451
452 if (new_size.X <= 0 || new_size.Y <= 0)
453 {
454 region->Bottom = region->Top + new_size.Y - 1;
455 region->Right = region->Left + new_size.X - 1;
456 return TRUE;
457 }
458
459 /* only copy the useful rectangle */
460 if (!(ciw = HeapAlloc( GetProcessHeap(), 0, sizeof(CHAR_INFO) * new_size.X * new_size.Y )))
461 return FALSE;
462 for (y = 0; y < new_size.Y; y++)
463 {
464 memcpy( &ciw[y * new_size.X], &lpBuffer[(y + coord.Y) * size.X + coord.X],
465 new_size.X * sizeof(CHAR_INFO) );
466 char_info_AtoW( &ciw[ y * new_size.X ], new_size.X );
467 }
468 new_coord.X = new_coord.Y = 0;
469 ret = WriteConsoleOutputW( hConsoleOutput, ciw, new_size, new_coord, region );
470 HeapFree( GetProcessHeap(), 0, ciw );
471 return ret;
472 }
473
474
475 /***********************************************************************
476 * WriteConsoleOutputW (KERNEL32.@)
477 */
478 BOOL WINAPI WriteConsoleOutputW( HANDLE hConsoleOutput, const CHAR_INFO *lpBuffer,
479 COORD size, COORD coord, LPSMALL_RECT region )
480 {
481 int width, height, y;
482 BOOL ret = TRUE;
483
484 TRACE("(%p,%p,(%d,%d),(%d,%d),(%d,%dx%d,%d)\n",
485 hConsoleOutput, lpBuffer, size.X, size.Y, coord.X, coord.Y,
486 region->Left, region->Top, region->Right, region->Bottom);
487
488 width = min( region->Right - region->Left + 1, size.X - coord.X );
489 height = min( region->Bottom - region->Top + 1, size.Y - coord.Y );
490
491 if (width > 0 && height > 0)
492 {
493 for (y = 0; y < height; y++)
494 {
495 SERVER_START_REQ( write_console_output )
496 {
497 req->handle = console_handle_unmap(hConsoleOutput);
498 req->x = region->Left;
499 req->y = region->Top + y;
500 req->mode = CHAR_INFO_MODE_TEXTATTR;
501 req->wrap = FALSE;
502 wine_server_add_data( req, &lpBuffer[(y + coord.Y) * size.X + coord.X],
503 width * sizeof(CHAR_INFO));
504 if ((ret = !wine_server_call_err( req )))
505 {
506 width = min( width, reply->width - region->Left );
507 height = min( height, reply->height - region->Top );
508 }
509 }
510 SERVER_END_REQ;
511 if (!ret) break;
512 }
513 }
514 region->Bottom = region->Top + height - 1;
515 region->Right = region->Left + width - 1;
516 return ret;
517 }
518
519
520 /******************************************************************************
521 * WriteConsoleOutputCharacterA [KERNEL32.@]
522 *
523 * See WriteConsoleOutputCharacterW.
524 */
525 BOOL WINAPI WriteConsoleOutputCharacterA( HANDLE hConsoleOutput, LPCSTR str, DWORD length,
526 COORD coord, LPDWORD lpNumCharsWritten )
527 {
528 BOOL ret;
529 LPWSTR strW;
530 DWORD lenW;
531
532 TRACE("(%p,%s,%d,%dx%d,%p)\n", hConsoleOutput,
533 debugstr_an(str, length), length, coord.X, coord.Y, lpNumCharsWritten);
534
535 lenW = MultiByteToWideChar( GetConsoleOutputCP(), 0, str, length, NULL, 0 );
536
537 if (lpNumCharsWritten) *lpNumCharsWritten = 0;
538
539 if (!(strW = HeapAlloc( GetProcessHeap(), 0, lenW * sizeof(WCHAR) ))) return FALSE;
540 MultiByteToWideChar( GetConsoleOutputCP(), 0, str, length, strW, lenW );
541
542 ret = WriteConsoleOutputCharacterW( hConsoleOutput, strW, lenW, coord, lpNumCharsWritten );
543 HeapFree( GetProcessHeap(), 0, strW );
544 return ret;
545 }
546
547
548 /******************************************************************************
549 * WriteConsoleOutputAttribute [KERNEL32.@] Sets attributes for some cells in
550 * the console screen buffer
551 *
552 * PARAMS
553 * hConsoleOutput [I] Handle to screen buffer
554 * attr [I] Pointer to buffer with write attributes
555 * length [I] Number of cells to write to
556 * coord [I] Coords of first cell
557 * lpNumAttrsWritten [O] Pointer to number of cells written
558 *
559 * RETURNS
560 * Success: TRUE
561 * Failure: FALSE
562 *
563 */
564 BOOL WINAPI WriteConsoleOutputAttribute( HANDLE hConsoleOutput, CONST WORD *attr, DWORD length,
565 COORD coord, LPDWORD lpNumAttrsWritten )
566 {
567 BOOL ret;
568
569 TRACE("(%p,%p,%d,%dx%d,%p)\n", hConsoleOutput,attr,length,coord.X,coord.Y,lpNumAttrsWritten);
570
571 SERVER_START_REQ( write_console_output )
572 {
573 req->handle = console_handle_unmap(hConsoleOutput);
574 req->x = coord.X;
575 req->y = coord.Y;
576 req->mode = CHAR_INFO_MODE_ATTR;
577 req->wrap = TRUE;
578 wine_server_add_data( req, attr, length * sizeof(WORD) );
579 if ((ret = !wine_server_call_err( req )))
580 {
581 if (lpNumAttrsWritten) *lpNumAttrsWritten = reply->written;
582 }
583 }
584 SERVER_END_REQ;
585 return ret;
586 }
587
588
589 /******************************************************************************
590 * FillConsoleOutputCharacterA [KERNEL32.@]
591 *
592 * See FillConsoleOutputCharacterW.
593 */
594 BOOL WINAPI FillConsoleOutputCharacterA( HANDLE hConsoleOutput, CHAR ch, DWORD length,
595 COORD coord, LPDWORD lpNumCharsWritten )
596 {
597 WCHAR wch;
598
599 MultiByteToWideChar( GetConsoleOutputCP(), 0, &ch, 1, &wch, 1 );
600 return FillConsoleOutputCharacterW(hConsoleOutput, wch, length, coord, lpNumCharsWritten);
601 }
602
603
604 /******************************************************************************
605 * FillConsoleOutputCharacterW [KERNEL32.@] Writes characters to console
606 *
607 * PARAMS
608 * hConsoleOutput [I] Handle to screen buffer
609 * ch [I] Character to write
610 * length [I] Number of cells to write to
611 * coord [I] Coords of first cell
612 * lpNumCharsWritten [O] Pointer to number of cells written
613 *
614 * RETURNS
615 * Success: TRUE
616 * Failure: FALSE
617 */
618 BOOL WINAPI FillConsoleOutputCharacterW( HANDLE hConsoleOutput, WCHAR ch, DWORD length,
619 COORD coord, LPDWORD lpNumCharsWritten)
620 {
621 BOOL ret;
622
623 TRACE("(%p,%s,%d,(%dx%d),%p)\n",
624 hConsoleOutput, debugstr_wn(&ch, 1), length, coord.X, coord.Y, lpNumCharsWritten);
625
626 SERVER_START_REQ( fill_console_output )
627 {
628 req->handle = console_handle_unmap(hConsoleOutput);
629 req->x = coord.X;
630 req->y = coord.Y;
631 req->mode = CHAR_INFO_MODE_TEXT;
632 req->wrap = TRUE;
633 req->data.ch = ch;
634 req->count = length;
635 if ((ret = !wine_server_call_err( req )))
636 {
637 if (lpNumCharsWritten) *lpNumCharsWritten = reply->written;
638 }
639 }
640 SERVER_END_REQ;
641 return ret;
642 }
643
644
645 /******************************************************************************
646 * FillConsoleOutputAttribute [KERNEL32.@] Sets attributes for console
647 *
648 * PARAMS
649 * hConsoleOutput [I] Handle to screen buffer
650 * attr [I] Color attribute to write
651 * length [I] Number of cells to write to
652 * coord [I] Coords of first cell
653 * lpNumAttrsWritten [O] Pointer to number of cells written
654 *
655 * RETURNS
656 * Success: TRUE
657 * Failure: FALSE
658 */
659 BOOL WINAPI FillConsoleOutputAttribute( HANDLE hConsoleOutput, WORD attr, DWORD length,
660 COORD coord, LPDWORD lpNumAttrsWritten )
661 {
662 BOOL ret;
663
664 TRACE("(%p,%d,%d,(%dx%d),%p)\n",
665 hConsoleOutput, attr, length, coord.X, coord.Y, lpNumAttrsWritten);
666
667 SERVER_START_REQ( fill_console_output )
668 {
669 req->handle = console_handle_unmap(hConsoleOutput);
670 req->x = coord.X;
671 req->y = coord.Y;
672 req->mode = CHAR_INFO_MODE_ATTR;
673 req->wrap = TRUE;
674 req->data.attr = attr;
675 req->count = length;
676 if ((ret = !wine_server_call_err( req )))
677 {
678 if (lpNumAttrsWritten) *lpNumAttrsWritten = reply->written;
679 }
680 }
681 SERVER_END_REQ;
682 return ret;
683 }
684
685
686 /******************************************************************************
687 * ReadConsoleOutputCharacterA [KERNEL32.@]
688 *
689 */
690 BOOL WINAPI ReadConsoleOutputCharacterA(HANDLE hConsoleOutput, LPSTR lpstr, DWORD count,
691 COORD coord, LPDWORD read_count)
692 {
693 DWORD read;
694 BOOL ret;
695 LPWSTR wptr = HeapAlloc(GetProcessHeap(), 0, count * sizeof(WCHAR));
696
697 if (read_count) *read_count = 0;
698 if (!wptr) return FALSE;
699
700 if ((ret = ReadConsoleOutputCharacterW( hConsoleOutput, wptr, count, coord, &read )))
701 {
702 read = WideCharToMultiByte( GetConsoleOutputCP(), 0, wptr, read, lpstr, count, NULL, NULL);
703 if (read_count) *read_count = read;
704 }
705 HeapFree( GetProcessHeap(), 0, wptr );
706 return ret;
707 }
708
709
710 /******************************************************************************
711 * ReadConsoleOutputCharacterW [KERNEL32.@]
712 *
713 */
714 BOOL WINAPI ReadConsoleOutputCharacterW( HANDLE hConsoleOutput, LPWSTR buffer, DWORD count,
715 COORD coord, LPDWORD read_count )
716 {
717 BOOL ret;
718
719 TRACE( "(%p,%p,%d,%dx%d,%p)\n", hConsoleOutput, buffer, count, coord.X, coord.Y, read_count );
720
721 SERVER_START_REQ( read_console_output )
722 {
723 req->handle = console_handle_unmap(hConsoleOutput);
724 req->x = coord.X;
725 req->y = coord.Y;
726 req->mode = CHAR_INFO_MODE_TEXT;
727 req->wrap = TRUE;
728 wine_server_set_reply( req, buffer, count * sizeof(WCHAR) );
729 if ((ret = !wine_server_call_err( req )))
730 {
731 if (read_count) *read_count = wine_server_reply_size(reply) / sizeof(WCHAR);
732 }
733 }
734 SERVER_END_REQ;
735 return ret;
736 }
737
738
739 /******************************************************************************
740 * ReadConsoleOutputAttribute [KERNEL32.@]
741 */
742 BOOL WINAPI ReadConsoleOutputAttribute(HANDLE hConsoleOutput, LPWORD lpAttribute, DWORD length,
743 COORD coord, LPDWORD read_count)
744 {
745 BOOL ret;
746
747 TRACE("(%p,%p,%d,%dx%d,%p)\n",
748 hConsoleOutput, lpAttribute, length, coord.X, coord.Y, read_count);
749
750 SERVER_START_REQ( read_console_output )
751 {
752 req->handle = console_handle_unmap(hConsoleOutput);
753 req->x = coord.X;
754 req->y = coord.Y;
755 req->mode = CHAR_INFO_MODE_ATTR;
756 req->wrap = TRUE;
757 wine_server_set_reply( req, lpAttribute, length * sizeof(WORD) );
758 if ((ret = !wine_server_call_err( req )))
759 {
760 if (read_count) *read_count = wine_server_reply_size(reply) / sizeof(WORD);
761 }
762 }
763 SERVER_END_REQ;
764 return ret;
765 }
766
767
768 /******************************************************************************
769 * ReadConsoleOutputA [KERNEL32.@]
770 *
771 */
772 BOOL WINAPI ReadConsoleOutputA( HANDLE hConsoleOutput, LPCHAR_INFO lpBuffer, COORD size,
773 COORD coord, LPSMALL_RECT region )
774 {
775 BOOL ret;
776 int y;
777
778 ret = ReadConsoleOutputW( hConsoleOutput, lpBuffer, size, coord, region );
779 if (ret && region->Right >= region->Left)
780 {
781 for (y = 0; y <= region->Bottom - region->Top; y++)
782 {
783 char_info_WtoA( &lpBuffer[(coord.Y + y) * size.X + coord.X],
784 region->Right - region->Left + 1 );
785 }
786 }
787 return ret;
788 }
789
790
791 /******************************************************************************
792 * ReadConsoleOutputW [KERNEL32.@]
793 *
794 * NOTE: The NT4 (sp5) kernel crashes on me if size is (0,0). I don't
795 * think we need to be *that* compatible. -- AJ
796 */
797 BOOL WINAPI ReadConsoleOutputW( HANDLE hConsoleOutput, LPCHAR_INFO lpBuffer, COORD size,
798 COORD coord, LPSMALL_RECT region )
799 {
800 int width, height, y;
801 BOOL ret = TRUE;
802
803 width = min( region->Right - region->Left + 1, size.X - coord.X );
804 height = min( region->Bottom - region->Top + 1, size.Y - coord.Y );
805
806 if (width > 0 && height > 0)
807 {
808 for (y = 0; y < height; y++)
809 {
810 SERVER_START_REQ( read_console_output )
811 {
812 req->handle = console_handle_unmap(hConsoleOutput);
813 req->x = region->Left;
814 req->y = region->Top + y;
815 req->mode = CHAR_INFO_MODE_TEXTATTR;
816 req->wrap = FALSE;
817 wine_server_set_reply( req, &lpBuffer[(y+coord.Y) * size.X + coord.X],
818 width * sizeof(CHAR_INFO) );
819 if ((ret = !wine_server_call_err( req )))
820 {
821 width = min( width, reply->width - region->Left );
822 height = min( height, reply->height - region->Top );
823 }
824 }
825 SERVER_END_REQ;
826 if (!ret) break;
827 }
828 }
829 region->Bottom = region->Top + height - 1;
830 region->Right = region->Left + width - 1;
831 return ret;
832 }
833
834
835 /******************************************************************************
836 * ReadConsoleInputA [KERNEL32.@] Reads data from a console
837 *
838 * PARAMS
839 * handle [I] Handle to console input buffer
840 * buffer [O] Address of buffer for read data
841 * count [I] Number of records to read
842 * pRead [O] Address of number of records read
843 *
844 * RETURNS
845 * Success: TRUE
846 * Failure: FALSE
847 */
848 BOOL WINAPI ReadConsoleInputA( HANDLE handle, PINPUT_RECORD buffer, DWORD count, LPDWORD pRead )
849 {
850 DWORD read;
851
852 if (!ReadConsoleInputW( handle, buffer, count, &read )) return FALSE;
853 input_records_WtoA( buffer, read );
854 if (pRead) *pRead = read;
855 return TRUE;
856 }
857
858
859 /***********************************************************************
860 * PeekConsoleInputA (KERNEL32.@)
861 *
862 * Gets 'count' first events (or less) from input queue.
863 */
864 BOOL WINAPI PeekConsoleInputA( HANDLE handle, PINPUT_RECORD buffer, DWORD count, LPDWORD pRead )
865 {
866 DWORD read;
867
868 if (!PeekConsoleInputW( handle, buffer, count, &read )) return FALSE;
869 input_records_WtoA( buffer, read );
870 if (pRead) *pRead = read;
871 return TRUE;
872 }
873
874
875 /***********************************************************************
876 * PeekConsoleInputW (KERNEL32.@)
877 */
878 BOOL WINAPI PeekConsoleInputW( HANDLE handle, PINPUT_RECORD buffer, DWORD count, LPDWORD read )
879 {
880 BOOL ret;
881 SERVER_START_REQ( read_console_input )
882 {
883 req->handle = console_handle_unmap(handle);
884 req->flush = FALSE;
885 wine_server_set_reply( req, buffer, count * sizeof(INPUT_RECORD) );
886 if ((ret = !wine_server_call_err( req )))
887 {
888 if (read) *read = count ? reply->read : 0;
889 }
890 }
891 SERVER_END_REQ;
892 return ret;
893 }
894
895
896 /***********************************************************************
897 * GetNumberOfConsoleInputEvents (KERNEL32.@)
898 */
899 BOOL WINAPI GetNumberOfConsoleInputEvents( HANDLE handle, LPDWORD nrofevents )
900 {
901 BOOL ret;
902 SERVER_START_REQ( read_console_input )
903 {
904 req->handle = console_handle_unmap(handle);
905 req->flush = FALSE;
906 if ((ret = !wine_server_call_err( req )))
907 {
908 if (nrofevents) *nrofevents = reply->read;
909 }
910 }
911 SERVER_END_REQ;
912 return ret;
913 }
914
915
916 /******************************************************************************
917 * read_console_input
918 *
919 * Helper function for ReadConsole, ReadConsoleInput and FlushConsoleInputBuffer
920 *
921 * Returns
922 * 0 for error, 1 for no INPUT_RECORD ready, 2 with INPUT_RECORD ready
923 */
924 enum read_console_input_return {rci_error = 0, rci_timeout = 1, rci_gotone = 2};
925 static enum read_console_input_return read_console_input(HANDLE handle, PINPUT_RECORD ir, DWORD timeout)
926 {
927 enum read_console_input_return ret;
928
929 if (WaitForSingleObject(GetConsoleInputWaitHandle(), timeout) != WAIT_OBJECT_0)
930 return rci_timeout;
931 SERVER_START_REQ( read_console_input )
932 {
933 req->handle = console_handle_unmap(handle);
934 req->flush = TRUE;
935 wine_server_set_reply( req, ir, sizeof(INPUT_RECORD) );
936 if (wine_server_call_err( req ) || !reply->read) ret = rci_error;
937 else ret = rci_gotone;
938 }
939 SERVER_END_REQ;
940
941 return ret;
942 }
943
944
945 /***********************************************************************
946 * FlushConsoleInputBuffer (KERNEL32.@)
947 */
948 BOOL WINAPI FlushConsoleInputBuffer( HANDLE handle )
949 {
950 enum read_console_input_return last;
951 INPUT_RECORD ir;
952
953 while ((last = read_console_input(handle, &ir, 0)) == rci_gotone);
954
955 return last == rci_timeout;
956 }
957
958
959 /***********************************************************************
960 * SetConsoleTitleA (KERNEL32.@)
961 */
962 BOOL WINAPI SetConsoleTitleA( LPCSTR title )
963 {
964 LPWSTR titleW;
965 BOOL ret;
966
967 DWORD len = MultiByteToWideChar( GetConsoleOutputCP(), 0, title, -1, NULL, 0 );
968 if (!(titleW = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR)))) return FALSE;
969 MultiByteToWideChar( GetConsoleOutputCP(), 0, title, -1, titleW, len );
970 ret = SetConsoleTitleW(titleW);
971 HeapFree(GetProcessHeap(), 0, titleW);
972 return ret;
973 }
974
975
976 /***********************************************************************
977 * GetConsoleKeyboardLayoutNameA (KERNEL32.@)
978 */
979 BOOL WINAPI GetConsoleKeyboardLayoutNameA(LPSTR layoutName)
980 {
981 FIXME( "stub %p\n", layoutName);
982 return TRUE;
983 }
984
985 /***********************************************************************
986 * GetConsoleKeyboardLayoutNameW (KERNEL32.@)
987 */
988 BOOL WINAPI GetConsoleKeyboardLayoutNameW(LPWSTR layoutName)
989 {
990 FIXME( "stub %p\n", layoutName);
991 return TRUE;
992 }
993
994 static WCHAR input_exe[MAX_PATH + 1];
995
996 /***********************************************************************
997 * GetConsoleInputExeNameW (KERNEL32.@)
998 */
999 BOOL WINAPI GetConsoleInputExeNameW(DWORD buflen, LPWSTR buffer)
1000 {
1001 TRACE("%u %p\n", buflen, buffer);
1002
1003 RtlEnterCriticalSection(&CONSOLE_CritSect);
1004 if (buflen > strlenW(input_exe)) strcpyW(buffer, input_exe);
1005 else SetLastError(ERROR_BUFFER_OVERFLOW);
1006 RtlLeaveCriticalSection(&CONSOLE_CritSect);
1007
1008 return TRUE;
1009 }
1010
1011 /***********************************************************************
1012 * GetConsoleInputExeNameA (KERNEL32.@)
1013 */
1014 BOOL WINAPI GetConsoleInputExeNameA(DWORD buflen, LPSTR buffer)
1015 {
1016 TRACE("%u %p\n", buflen, buffer);
1017
1018 RtlEnterCriticalSection(&CONSOLE_CritSect);
1019 if (WideCharToMultiByte(CP_ACP, 0, input_exe, -1, NULL, 0, NULL, NULL) <= buflen)
1020 WideCharToMultiByte(CP_ACP, 0, input_exe, -1, buffer, buflen, NULL, NULL);
1021 else SetLastError(ERROR_BUFFER_OVERFLOW);
1022 RtlLeaveCriticalSection(&CONSOLE_CritSect);
1023
1024 return TRUE;
1025 }
1026
1027 /***********************************************************************
1028 * GetConsoleTitleA (KERNEL32.@)
1029 *
1030 * See GetConsoleTitleW.
1031 */
1032 DWORD WINAPI GetConsoleTitleA(LPSTR title, DWORD size)
1033 {
1034 WCHAR *ptr = HeapAlloc(GetProcessHeap(), 0, sizeof(WCHAR) * size);
1035 DWORD ret;
1036
1037 if (!ptr) return 0;
1038 ret = GetConsoleTitleW( ptr, size );
1039 if (ret)
1040 {
1041 WideCharToMultiByte( GetConsoleOutputCP(), 0, ptr, ret + 1, title, size, NULL, NULL);
1042 ret = strlen(title);
1043 }
1044 HeapFree(GetProcessHeap(), 0, ptr);
1045 return ret;
1046 }
1047
1048
1049 /******************************************************************************
1050 * GetConsoleTitleW [KERNEL32.@] Retrieves title string for console
1051 *
1052 * PARAMS
1053 * title [O] Address of buffer for title
1054 * size [I] Size of buffer
1055 *
1056 * RETURNS
1057 * Success: Length of string copied
1058 * Failure: 0
1059 */
1060 DWORD WINAPI GetConsoleTitleW(LPWSTR title, DWORD size)
1061 {
1062 DWORD ret = 0;
1063
1064 SERVER_START_REQ( get_console_input_info )
1065 {
1066 req->handle = 0;
1067 wine_server_set_reply( req, title, (size-1) * sizeof(WCHAR) );
1068 if (!wine_server_call_err( req ))
1069 {
1070 ret = wine_server_reply_size(reply) / sizeof(WCHAR);
1071 title[ret] = 0;
1072 }
1073 }
1074 SERVER_END_REQ;
1075 return ret;
1076 }
1077
1078
1079 /***********************************************************************
1080 * GetLargestConsoleWindowSize (KERNEL32.@)
1081 *
1082 * NOTE
1083 * This should return a COORD, but calling convention for returning
1084 * structures is different between Windows and gcc on i386.
1085 *
1086 * VERSION: [i386]
1087 */
1088 #ifdef __i386__
1089 #undef GetLargestConsoleWindowSize
1090 DWORD WINAPI GetLargestConsoleWindowSize(HANDLE hConsoleOutput)
1091 {
1092 union {
1093 COORD c;
1094 DWORD w;
1095 } x;
1096 x.c.X = 80;
1097 x.c.Y = 24;
1098 TRACE("(%p), returning %dx%d (%x)\n", hConsoleOutput, x.c.X, x.c.Y, x.w);
1099 return x.w;
1100 }
1101 #endif /* defined(__i386__) */
1102
1103
1104 /***********************************************************************
1105 * GetLargestConsoleWindowSize (KERNEL32.@)
1106 *
1107 * NOTE
1108 * This should return a COORD, but calling convention for returning
1109 * structures is different between Windows and gcc on i386.
1110 *
1111 * VERSION: [!i386]
1112 */
1113 #ifndef __i386__
1114 COORD WINAPI GetLargestConsoleWindowSize(HANDLE hConsoleOutput)
1115 {
1116 COORD c;
1117 c.X = 80;
1118 c.Y = 24;
1119 TRACE("(%p), returning %dx%d\n", hConsoleOutput, c.X, c.Y);
1120 return c;
1121 }
1122 #endif /* defined(__i386__) */
1123
1124 static WCHAR* S_EditString /* = NULL */;
1125 static unsigned S_EditStrPos /* = 0 */;
1126
1127 /***********************************************************************
1128 * FreeConsole (KERNEL32.@)
1129 */
1130 BOOL WINAPI FreeConsole(VOID)
1131 {
1132 BOOL ret;
1133
1134 /* invalidate local copy of input event handle */
1135 console_wait_event = 0;
1136
1137 SERVER_START_REQ(free_console)
1138 {
1139 ret = !wine_server_call_err( req );
1140 }
1141 SERVER_END_REQ;
1142 return ret;
1143 }
1144
1145 /******************************************************************
1146 * start_console_renderer
1147 *
1148 * helper for AllocConsole
1149 * starts the renderer process
1150 */
1151 static BOOL start_console_renderer_helper(const char* appname, STARTUPINFOA* si,
1152 HANDLE hEvent)
1153 {
1154 char buffer[1024];
1155 int ret;
1156 PROCESS_INFORMATION pi;
1157
1158 /* FIXME: use dynamic allocation for most of the buffers below */
1159 ret = snprintf(buffer, sizeof(buffer), "%s --use-event=%ld", appname, (DWORD_PTR)hEvent);
1160 if ((ret > -1) && (ret < sizeof(buffer)) &&
1161 CreateProcessA(NULL, buffer, NULL, NULL, TRUE, DETACHED_PROCESS,
1162 NULL, NULL, si, &pi))
1163 {
1164 CloseHandle(pi.hThread);
1165 CloseHandle(pi.hProcess);
1166
1167 if (WaitForSingleObject(hEvent, INFINITE) != WAIT_OBJECT_0) return FALSE;
1168
1169 TRACE("Started wineconsole pid=%08x tid=%08x\n",
1170 pi.dwProcessId, pi.dwThreadId);
1171
1172 return TRUE;
1173 }
1174 return FALSE;
1175 }
1176
1177 static BOOL start_console_renderer(STARTUPINFOA* si)
1178 {
1179 HANDLE hEvent = 0;
1180 LPSTR p;
1181 OBJECT_ATTRIBUTES attr;
1182 BOOL ret = FALSE;
1183
1184 attr.Length = sizeof(attr);
1185 attr.RootDirectory = 0;
1186 attr.Attributes = OBJ_INHERIT;
1187 attr.ObjectName = NULL;
1188 attr.SecurityDescriptor = NULL;
1189 attr.SecurityQualityOfService = NULL;
1190
1191 NtCreateEvent(&hEvent, EVENT_ALL_ACCESS, &attr, TRUE, FALSE);
1192 if (!hEvent) return FALSE;
1193
1194 /* first try environment variable */
1195 if ((p = getenv("WINECONSOLE")) != NULL)
1196 {
1197 ret = start_console_renderer_helper(p, si, hEvent);
1198 if (!ret)
1199 ERR("Couldn't launch Wine console from WINECONSOLE env var (%s)... "
1200 "trying default access\n", p);
1201 }
1202
1203 /* then try the regular PATH */
1204 if (!ret)
1205 ret = start_console_renderer_helper("wineconsole", si, hEvent);
1206
1207 CloseHandle(hEvent);
1208 return ret;
1209 }
1210
1211 /***********************************************************************
1212 * AllocConsole (KERNEL32.@)
1213 *
1214 * creates an xterm with a pty to our program
1215 */
1216 BOOL WINAPI AllocConsole(void)
1217 {
1218 HANDLE handle_in = INVALID_HANDLE_VALUE;
1219 HANDLE handle_out = INVALID_HANDLE_VALUE;
1220 HANDLE handle_err = INVALID_HANDLE_VALUE;
1221 STARTUPINFOA siCurrent;
1222 STARTUPINFOA siConsole;
1223 char buffer[1024];
1224
1225 TRACE("()\n");
1226
1227 handle_in = OpenConsoleW( coninW, GENERIC_READ|GENERIC_WRITE|SYNCHRONIZE,
1228 FALSE, OPEN_EXISTING );
1229
1230 if (VerifyConsoleIoHandle(handle_in))
1231 {
1232 /* we already have a console opened on this process, don't create a new one */
1233 CloseHandle(handle_in);
1234 return FALSE;
1235 }
1236 /* happens when we're running on a Unix console */
1237 if (handle_in != INVALID_HANDLE_VALUE) CloseHandle(handle_in);
1238
1239 /* invalidate local copy of input event handle */
1240 console_wait_event = 0;
1241
1242 GetStartupInfoA(&siCurrent);
1243
1244 memset(&siConsole, 0, sizeof(siConsole));
1245 siConsole.cb = sizeof(siConsole);
1246 /* setup a view arguments for wineconsole (it'll use them as default values) */
1247 if (siCurrent.dwFlags & STARTF_USECOUNTCHARS)
1248 {
1249 siConsole.dwFlags |= STARTF_USECOUNTCHARS;
1250 siConsole.dwXCountChars = siCurrent.dwXCountChars;
1251 siConsole.dwYCountChars = siCurrent.dwYCountChars;
1252 }
1253 if (siCurrent.dwFlags & STARTF_USEFILLATTRIBUTE)
1254 {
1255 siConsole.dwFlags |= STARTF_USEFILLATTRIBUTE;
1256 siConsole.dwFillAttribute = siCurrent.dwFillAttribute;
1257 }
1258 if (siCurrent.dwFlags & STARTF_USESHOWWINDOW)
1259 {
1260 siConsole.dwFlags |= STARTF_USESHOWWINDOW;
1261 siConsole.wShowWindow = siCurrent.wShowWindow;
1262 }
1263 /* FIXME (should pass the unicode form) */
1264 if (siCurrent.lpTitle)
1265 siConsole.lpTitle = siCurrent.lpTitle;
1266 else if (GetModuleFileNameA(0, buffer, sizeof(buffer)))
1267 {
1268 buffer[sizeof(buffer) - 1] = '\0';
1269 siConsole.lpTitle = buffer;
1270 }
1271
1272 if (!start_console_renderer(&siConsole))
1273 goto the_end;
1274
1275 if( !(siCurrent.dwFlags & STARTF_USESTDHANDLES) ) {
1276 /* all std I/O handles are inheritable by default */
1277 handle_in = OpenConsoleW( coninW, GENERIC_READ|GENERIC_WRITE|SYNCHRONIZE,
1278 TRUE, OPEN_EXISTING );
1279 if (handle_in == INVALID_HANDLE_VALUE) goto the_end;
1280
1281 handle_out = OpenConsoleW( conoutW, GENERIC_READ|GENERIC_WRITE,
1282 TRUE, OPEN_EXISTING );
1283 if (handle_out == INVALID_HANDLE_VALUE) goto the_end;
1284
1285 if (!DuplicateHandle(GetCurrentProcess(), handle_out, GetCurrentProcess(),
1286 &handle_err, 0, TRUE, DUPLICATE_SAME_ACCESS))
1287 goto the_end;
1288 } else {
1289 /* STARTF_USESTDHANDLES flag: use handles from StartupInfo */
1290 handle_in = siCurrent.hStdInput;
1291 handle_out = siCurrent.hStdOutput;
1292 handle_err = siCurrent.hStdError;
1293 }
1294
1295 /* NT resets the STD_*_HANDLEs on console alloc */
1296 SetStdHandle(STD_INPUT_HANDLE, handle_in);
1297 SetStdHandle(STD_OUTPUT_HANDLE, handle_out);
1298 SetStdHandle(STD_ERROR_HANDLE, handle_err);
1299
1300 SetLastError(ERROR_SUCCESS);
1301
1302 return TRUE;
1303
1304 the_end:
1305 ERR("Can't allocate console\n");
1306 if (handle_in != INVALID_HANDLE_VALUE) CloseHandle(handle_in);
1307 if (handle_out != INVALID_HANDLE_VALUE) CloseHandle(handle_out);
1308 if (handle_err != INVALID_HANDLE_VALUE) CloseHandle(handle_err);
1309 FreeConsole();
1310 return FALSE;
1311 }
1312
1313
1314 /***********************************************************************
1315 * ReadConsoleA (KERNEL32.@)
1316 */
1317 BOOL WINAPI ReadConsoleA(HANDLE hConsoleInput, LPVOID lpBuffer, DWORD nNumberOfCharsToRead,
1318 LPDWORD lpNumberOfCharsRead, LPVOID lpReserved)
1319 {
1320 LPWSTR ptr = HeapAlloc(GetProcessHeap(), 0, nNumberOfCharsToRead * sizeof(WCHAR));
1321 DWORD ncr = 0;
1322 BOOL ret;
1323
1324 if ((ret = ReadConsoleW(hConsoleInput, ptr, nNumberOfCharsToRead, &ncr, NULL)))
1325 ncr = WideCharToMultiByte(GetConsoleCP(), 0, ptr, ncr, lpBuffer, nNumberOfCharsToRead, NULL, NULL);
1326
1327 if (lpNumberOfCharsRead) *lpNumberOfCharsRead = ncr;
1328 HeapFree(GetProcessHeap(), 0, ptr);
1329
1330 return ret;
1331 }
1332
1333 /***********************************************************************
1334 * ReadConsoleW (KERNEL32.@)
1335 */
1336 BOOL WINAPI ReadConsoleW(HANDLE hConsoleInput, LPVOID lpBuffer,
1337 DWORD nNumberOfCharsToRead, LPDWORD lpNumberOfCharsRead, LPVOID lpReserved)
1338 {
1339 DWORD charsread;
1340 LPWSTR xbuf = (LPWSTR)lpBuffer;
1341 DWORD mode;
1342
1343 TRACE("(%p,%p,%d,%p,%p)\n",
1344 hConsoleInput, lpBuffer, nNumberOfCharsToRead, lpNumberOfCharsRead, lpReserved);
1345
1346 if (!GetConsoleMode(hConsoleInput, &mode))
1347 return FALSE;
1348
1349 if (mode & ENABLE_LINE_INPUT)
1350 {
1351 if (!S_EditString || S_EditString[S_EditStrPos] == 0)
1352 {
1353 HeapFree(GetProcessHeap(), 0, S_EditString);
1354 if (!(S_EditString = CONSOLE_Readline(hConsoleInput)))
1355 return FALSE;
1356 S_EditStrPos = 0;
1357 }
1358 charsread = lstrlenW(&S_EditString[S_EditStrPos]);
1359 if (charsread > nNumberOfCharsToRead) charsread = nNumberOfCharsToRead;
1360 memcpy(xbuf, &S_EditString[S_EditStrPos], charsread * sizeof(WCHAR));
1361 S_EditStrPos += charsread;
1362 }
1363 else
1364 {
1365 INPUT_RECORD ir;
1366 DWORD timeout = INFINITE;
1367
1368 /* FIXME: should we read at least 1 char? The SDK does not say */
1369 /* wait for at least one available input record (it doesn't mean we'll have
1370 * chars stored in xbuf...)
1371 *
1372 * Although SDK doc keeps silence about 1 char, SDK examples assume
1373 * that we should wait for at least one character (not key). --KS
1374 */
1375 charsread = 0;
1376 do
1377 {
1378 if (read_console_input(hConsoleInput, &ir, timeout) != rci_gotone) break;
1379 if (ir.EventType == KEY_EVENT && ir.Event.KeyEvent.bKeyDown &&
1380 ir.Event.KeyEvent.uChar.UnicodeChar &&
1381 !(ir.Event.KeyEvent.dwControlKeyState & ENHANCED_KEY))
1382 {
1383 xbuf[charsread++] = ir.Event.KeyEvent.uChar.UnicodeChar;
1384 timeout = 0;
1385 }
1386 } while (charsread < nNumberOfCharsToRead);
1387 /* nothing has been read */
1388 if (timeout == INFINITE) return FALSE;
1389 }
1390
1391 if (lpNumberOfCharsRead) *lpNumberOfCharsRead = charsread;
1392
1393 return TRUE;
1394 }
1395
1396
1397 /***********************************************************************
1398 * ReadConsoleInputW (KERNEL32.@)
1399 */
1400 BOOL WINAPI ReadConsoleInputW(HANDLE hConsoleInput, PINPUT_RECORD lpBuffer,
1401 DWORD nLength, LPDWORD lpNumberOfEventsRead)
1402 {
1403 DWORD idx = 0;
1404 DWORD timeout = INFINITE;
1405
1406 if (!nLength)
1407 {
1408 if (lpNumberOfEventsRead) *lpNumberOfEventsRead = 0;
1409 return TRUE;
1410 }
1411
1412 /* loop until we get at least one event */
1413 while (read_console_input(hConsoleInput, &lpBuffer[idx], timeout) == rci_gotone &&
1414 ++idx < nLength)
1415 timeout = 0;
1416
1417 if (lpNumberOfEventsRead) *lpNumberOfEventsRead = idx;
1418 return idx != 0;
1419 }
1420
1421
1422 /******************************************************************************
1423 * WriteConsoleOutputCharacterW [KERNEL32.@]
1424 *
1425 * Copy character to consecutive cells in the console screen buffer.
1426 *
1427 * PARAMS
1428 * hConsoleOutput [I] Handle to screen buffer
1429 * str [I] Pointer to buffer with chars to write
1430 * length [I] Number of cells to write to
1431 * coord [I] Coords of first cell
1432 * lpNumCharsWritten [O] Pointer to number of cells written
1433 *
1434 * RETURNS
1435 * Success: TRUE
1436 * Failure: FALSE
1437 *
1438 */
1439 BOOL WINAPI WriteConsoleOutputCharacterW( HANDLE hConsoleOutput, LPCWSTR str, DWORD length,
1440 COORD coord, LPDWORD lpNumCharsWritten )
1441 {
1442 BOOL ret;
1443
1444 TRACE("(%p,%s,%d,%dx%d,%p)\n", hConsoleOutput,
1445 debugstr_wn(str, length), length, coord.X, coord.Y, lpNumCharsWritten);
1446
1447 SERVER_START_REQ( write_console_output )
1448 {
1449 req->handle = console_handle_unmap(hConsoleOutput);
1450 req->x = coord.X;
1451 req->y = coord.Y;
1452 req->mode = CHAR_INFO_MODE_TEXT;
1453 req->wrap = TRUE;
1454 wine_server_add_data( req, str, length * sizeof(WCHAR) );
1455 if ((ret = !wine_server_call_err( req )))
1456 {
1457 if (lpNumCharsWritten) *lpNumCharsWritten = reply->written;
1458 }
1459 }
1460 SERVER_END_REQ;
1461 return ret;
1462 }
1463
1464
1465 /******************************************************************************
1466 * SetConsoleTitleW [KERNEL32.@] Sets title bar string for console
1467 *
1468 * PARAMS
1469 * title [I] Address of new title
1470 *
1471 * RETURNS
1472 * Success: TRUE
1473 * Failure: FALSE
1474 */
1475 BOOL WINAPI SetConsoleTitleW(LPCWSTR title)
1476 {
1477 BOOL ret;
1478
1479 TRACE("(%s)\n", debugstr_w(title));
1480 SERVER_START_REQ( set_console_input_info )
1481 {
1482 req->handle = 0;
1483 req->mask = SET_CONSOLE_INPUT_INFO_TITLE;
1484 wine_server_add_data( req, title, strlenW(title) * sizeof(WCHAR) );
1485 ret = !wine_server_call_err( req );
1486 }
1487 SERVER_END_REQ;
1488 return ret;
1489 }
1490
1491
1492 /***********************************************************************
1493 * GetNumberOfConsoleMouseButtons (KERNEL32.@)
1494 */
1495 BOOL WINAPI GetNumberOfConsoleMouseButtons(LPDWORD nrofbuttons)
1496 {
1497 FIXME("(%p): stub\n", nrofbuttons);
1498 *nrofbuttons = 2;
1499 return TRUE;
1500 }
1501
1502 /******************************************************************************
1503 * SetConsoleInputExeNameW [KERNEL32.@]
1504 */
1505 BOOL WINAPI SetConsoleInputExeNameW(LPCWSTR name)
1506 {
1507 TRACE("(%s)\n", debugstr_w(name));
1508
1509 if (!name || !name[0])
1510 {
1511 SetLastError(ERROR_INVALID_PARAMETER);
1512 return FALSE;
1513 }
1514
1515 RtlEnterCriticalSection(&CONSOLE_CritSect);
1516 if (strlenW(name) < sizeof(input_exe)/sizeof(WCHAR)) strcpyW(input_exe, name);
1517 RtlLeaveCriticalSection(&CONSOLE_CritSect);
1518
1519 return TRUE;
1520 }
1521
1522 /******************************************************************************
1523 * SetConsoleInputExeNameA [KERNEL32.@]
1524 */
1525 BOOL WINAPI SetConsoleInputExeNameA(LPCSTR name)
1526 {
1527 int len;
1528 LPWSTR nameW;
1529 BOOL ret;
1530
1531 if (!name || !name[0])
1532 {
1533 SetLastError(ERROR_INVALID_PARAMETER);
1534 return FALSE;
1535 }
1536
1537 len = MultiByteToWideChar(CP_ACP, 0, name, -1, NULL, 0);
1538 if (!(nameW = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR)))) return FALSE;
1539
1540 MultiByteToWideChar(CP_ACP, 0, name, -1, nameW, len);
1541 ret = SetConsoleInputExeNameW(nameW);
1542 HeapFree(GetProcessHeap(), 0, nameW);
1543
1544 return ret;
1545 }
1546
1547 /******************************************************************
1548 * CONSOLE_DefaultHandler
1549 *
1550 * Final control event handler
1551 */
1552 static BOOL WINAPI CONSOLE_DefaultHandler(DWORD dwCtrlType)
1553 {
1554 FIXME("Terminating process %x on event %x\n", GetCurrentProcessId(), dwCtrlType);
1555 ExitProcess(0);
1556 /* should never go here */
1557 return TRUE;
1558 }
1559
1560 /******************************************************************************
1561 * SetConsoleCtrlHandler [KERNEL32.@] Adds function to calling process list
1562 *
1563 * PARAMS
1564 * func [I] Address of handler function
1565 * add [I] Handler to add or remove
1566 *
1567 * RETURNS
1568 * Success: TRUE
1569 * Failure: FALSE
1570 */
1571
1572 struct ConsoleHandler
1573 {
1574 PHANDLER_ROUTINE handler;
1575 struct ConsoleHandler* next;
1576 };
1577
1578 static struct ConsoleHandler CONSOLE_DefaultConsoleHandler = {CONSOLE_DefaultHandler, NULL};
1579 static struct ConsoleHandler* CONSOLE_Handlers = &CONSOLE_DefaultConsoleHandler;
1580
1581 /*****************************************************************************/
1582
1583 /******************************************************************
1584 * SetConsoleCtrlHandler (KERNEL32.@)
1585 */
1586 BOOL WINAPI SetConsoleCtrlHandler(PHANDLER_ROUTINE func, BOOL add)
1587 {
1588 BOOL ret = TRUE;
1589
1590 TRACE("(%p,%i)\n", func, add);
1591
1592 if (!func)
1593 {
1594 RtlEnterCriticalSection(&CONSOLE_CritSect);
1595 if (add)
1596 NtCurrentTeb()->Peb->ProcessParameters->ConsoleFlags |= 1;
1597 else
1598 NtCurrentTeb()->Peb->ProcessParameters->ConsoleFlags &= ~1;
1599 RtlLeaveCriticalSection(&CONSOLE_CritSect);
1600 }
1601 else if (add)
1602 {
1603 struct ConsoleHandler* ch = HeapAlloc(GetProcessHeap(), 0, sizeof(struct ConsoleHandler));
1604
1605 if (!ch) return FALSE;
1606 ch->handler = func;
1607 RtlEnterCriticalSection(&CONSOLE_CritSect);
1608 ch->next = CONSOLE_Handlers;
1609 CONSOLE_Handlers = ch;
1610 RtlLeaveCriticalSection(&CONSOLE_CritSect);
1611 }
1612 else
1613 {
1614 struct ConsoleHandler** ch;
1615 RtlEnterCriticalSection(&CONSOLE_CritSect);
1616 for (ch = &CONSOLE_Handlers; *ch; ch = &(*ch)->next)
1617 {
1618 if ((*ch)->handler == func) break;
1619 }
1620 if (*ch)
1621 {
1622 struct ConsoleHandler* rch = *ch;
1623
1624 /* sanity check */
1625 if (rch == &CONSOLE_DefaultConsoleHandler)
1626 {
1627 ERR("Who's trying to remove default handler???\n");
1628 SetLastError(ERROR_INVALID_PARAMETER);
1629 ret = FALSE;
1630 }
1631 else
1632 {
1633 *ch = rch->next;
1634 HeapFree(GetProcessHeap(), 0, rch);
1635 }
1636 }
1637 else
1638 {
1639 WARN("Attempt to remove non-installed CtrlHandler %p\n", func);
1640 SetLastError(ERROR_INVALID_PARAMETER);
1641 ret = FALSE;
1642 }
1643 RtlLeaveCriticalSection(&CONSOLE_CritSect);
1644 }
1645 return ret;
1646 }
1647
1648 static LONG WINAPI CONSOLE_CtrlEventHandler(EXCEPTION_POINTERS *eptr)
1649 {
1650 TRACE("(%x)\n", eptr->ExceptionRecord->ExceptionCode);
1651 return EXCEPTION_EXECUTE_HANDLER;
1652 }
1653
1654 /******************************************************************
1655 * CONSOLE_SendEventThread
1656 *
1657 * Internal helper to pass an event to the list on installed handlers
1658 */
1659 static DWORD WINAPI CONSOLE_SendEventThread(void* pmt)
1660 {
1661 DWORD_PTR event = (DWORD_PTR)pmt;
1662 struct ConsoleHandler* ch;
1663
1664 if (event == CTRL_C_EVENT)
1665 {
1666 BOOL caught_by_dbg = TRUE;
1667 /* First, try to pass the ctrl-C event to the debugger (if any)
1668 * If it continues, there's nothing more to do
1669 * Otherwise, we need to send the ctrl-C event to the handlers
1670 */
1671 __TRY
1672 {
1673 RaiseException( DBG_CONTROL_C, 0, 0, NULL );
1674 }
1675 __EXCEPT(CONSOLE_CtrlEventHandler)
1676 {
1677 caught_by_dbg = FALSE;
1678 }
1679 __ENDTRY;
1680 if (caught_by_dbg) return 0;
1681 /* the debugger didn't continue... so, pass to ctrl handlers */
1682 }
1683 RtlEnterCriticalSection(&CONSOLE_CritSect);
1684 for (ch = CONSOLE_Handlers; ch; ch = ch->next)
1685 {
1686 if (ch->handler(event)) break;
1687 }
1688 RtlLeaveCriticalSection(&CONSOLE_CritSect);
1689 return 1;
1690 }
1691
1692 /******************************************************************
1693 * CONSOLE_HandleCtrlC
1694 *
1695 * Check whether the shall manipulate CtrlC events
1696 */
1697 int CONSOLE_HandleCtrlC(unsigned sig)
1698 {
1699 /* FIXME: better test whether a console is attached to this process ??? */
1700 extern unsigned CONSOLE_GetNumHistoryEntries(void);
1701 if (CONSOLE_GetNumHistoryEntries() == (unsigned)-1) return 0;
1702
1703 /* check if we have to ignore ctrl-C events */
1704 if (!(NtCurrentTeb()->Peb->ProcessParameters->ConsoleFlags & 1))
1705 {
1706 /* Create a separate thread to signal all the events.
1707 * This is needed because:
1708 * - this function can be called in an Unix signal handler (hence on an
1709 * different stack than the thread that's running). This breaks the
1710 * Win32 exception mechanisms (where the thread's stack is checked).
1711 * - since the current thread, while processing the signal, can hold the
1712 * console critical section, we need another execution environment where
1713 * we can wait on this critical section
1714 */
1715 CreateThread(NULL, 0, CONSOLE_SendEventThread, (void*)CTRL_C_EVENT, 0, NULL);
1716 }
1717 return 1;
1718 }
1719
1720 /******************************************************************************
1721 * GenerateConsoleCtrlEvent [KERNEL32.@] Simulate a CTRL-C or CTRL-BREAK
1722 *
1723 * PARAMS
1724 * dwCtrlEvent [I] Type of event
1725 * dwProcessGroupID [I] Process group ID to send event to
1726 *
1727 * RETURNS
1728 * Success: True
1729 * Failure: False (and *should* [but doesn't] set LastError)
1730 */
1731 BOOL WINAPI GenerateConsoleCtrlEvent(DWORD dwCtrlEvent,
1732 DWORD dwProcessGroupID)
1733 {
1734 BOOL ret;
1735
1736 TRACE("(%d, %d)\n", dwCtrlEvent, dwProcessGroupID);
1737
1738 if (dwCtrlEvent != CTRL_C_EVENT && dwCtrlEvent != CTRL_BREAK_EVENT)
1739 {
1740 ERR("Invalid event %d for PGID %d\n", dwCtrlEvent, dwProcessGroupID);
1741 return FALSE;
1742 }
1743
1744 SERVER_START_REQ( send_console_signal )
1745 {
1746 req->signal = dwCtrlEvent;
1747 req->group_id = dwProcessGroupID;
1748 ret = !wine_server_call_err( req );
1749 }
1750 SERVER_END_REQ;
1751
1752 /* FIXME: Shall this function be synchronous, i.e., only return when all events
1753 * have been handled by all processes in the given group?
1754 * As of today, we don't wait...
1755 */
1756 return ret;
1757 }
1758
1759
1760 /******************************************************************************
1761 * CreateConsoleScreenBuffer [KERNEL32.@] Creates a console screen buffer
1762 *
1763 * PARAMS
1764 * dwDesiredAccess [I] Access flag
1765 * dwShareMode [I] Buffer share mode
1766 * sa [I] Security attributes
1767 * dwFlags [I] Type of buffer to create
1768 * lpScreenBufferData [I] Reserved
1769 *
1770 * NOTES
1771 * Should call SetLastError
1772 *
1773 * RETURNS
1774 * Success: Handle to new console screen buffer
1775 * Failure: INVALID_HANDLE_VALUE
1776 */
1777 HANDLE WINAPI CreateConsoleScreenBuffer(DWORD dwDesiredAccess, DWORD dwShareMode,
1778 LPSECURITY_ATTRIBUTES sa, DWORD dwFlags,
1779 LPVOID lpScreenBufferData)
1780 {
1781 HANDLE ret = INVALID_HANDLE_VALUE;
1782
1783 TRACE("(%d,%d,%p,%d,%p)\n",
1784 dwDesiredAccess, dwShareMode, sa, dwFlags, lpScreenBufferData);
1785
1786 if (dwFlags != CONSOLE_TEXTMODE_BUFFER || lpScreenBufferData != NULL)
1787 {
1788 SetLastError(ERROR_INVALID_PARAMETER);
1789 return INVALID_HANDLE_VALUE;
1790 }
1791
1792 SERVER_START_REQ(create_console_output)
1793 {
1794 req->handle_in = 0;
1795 req->access = dwDesiredAccess;
1796 req->attributes = (sa && sa->bInheritHandle) ? OBJ_INHERIT : 0;
1797 req->share = dwShareMode;
1798 if (!wine_server_call_err( req )) ret = console_handle_map(reply->handle_out);
1799 }
1800 SERVER_END_REQ;
1801
1802 return ret;
1803 }
1804
1805
1806 /***********************************************************************
1807 * GetConsoleScreenBufferInfo (KERNEL32.@)
1808 */
1809 BOOL WINAPI GetConsoleScreenBufferInfo(HANDLE hConsoleOutput, LPCONSOLE_SCREEN_BUFFER_INFO csbi)
1810 {
1811 BOOL ret;
1812
1813 SERVER_START_REQ(get_console_output_info)
1814 {
1815 req->handle = console_handle_unmap(hConsoleOutput);
1816 if ((ret = !wine_server_call_err( req )))
1817 {
1818 csbi->dwSize.X = reply->width;
1819 csbi->dwSize.Y = reply->height;
1820 csbi->dwCursorPosition.X = reply->cursor_x;
1821 csbi->dwCursorPosition.Y = reply->cursor_y;
1822 csbi->wAttributes = reply->attr;
1823 csbi->srWindow.Left = reply->win_left;
1824 csbi->srWindow.Right = reply->win_right;
1825 csbi->srWindow.Top = reply->win_top;
1826 csbi->srWindow.Bottom = reply->win_bottom;
1827 csbi->dwMaximumWindowSize.X = reply->max_width;
1828 csbi->dwMaximumWindowSize.Y = reply->max_height;
1829 }
1830 }
1831 SERVER_END_REQ;
1832
1833 TRACE("(%p,(%d,%d) (%d,%d) %d (%d,%d-%d,%d) (%d,%d)\n",
1834 hConsoleOutput, csbi->dwSize.X, csbi->dwSize.Y,
1835 csbi->dwCursorPosition.X, csbi->dwCursorPosition.Y,
1836 csbi->wAttributes,
1837 csbi->srWindow.Left, csbi->srWindow.Top, csbi->srWindow.Right, csbi->srWindow.Bottom,
1838 csbi->dwMaximumWindowSize.X, csbi->dwMaximumWindowSize.Y);
1839
1840 return ret;
1841 }
1842
1843
1844 /******************************************************************************
1845 * SetConsoleActiveScreenBuffer [KERNEL32.@] Sets buffer to current console
1846 *
1847 * RETURNS
1848 * Success: TRUE
1849 * Failure: FALSE
1850 */
1851 BOOL WINAPI SetConsoleActiveScreenBuffer(HANDLE hConsoleOutput)
1852 {
1853 BOOL ret;
1854
1855 TRACE("(%p)\n", hConsoleOutput);
1856
1857 SERVER_START_REQ( set_console_input_info )
1858 {
1859 req->handle = 0;
1860 req->mask = SET_CONSOLE_INPUT_INFO_ACTIVE_SB;
1861 req->active_sb = hConsoleOutput;
1862 ret = !wine_server_call_err( req );
1863 }
1864 SERVER_END_REQ;
1865 return ret;
1866 }
1867
1868
1869 /***********************************************************************
1870 * GetConsoleMode (KERNEL32.@)
1871 */
1872 BOOL WINAPI GetConsoleMode(HANDLE hcon, LPDWORD mode)
1873 {
1874 BOOL ret;
1875
1876 SERVER_START_REQ(get_console_mode)
1877 {
1878 req->handle = console_handle_unmap(hcon);
1879 ret = !wine_server_call_err( req );
1880 if (ret && mode) *mode = reply->mode;
1881 }
1882 SERVER_END_REQ;
1883 return ret;
1884 }
1885
1886
1887 /******************************************************************************
1888 * SetConsoleMode [KERNEL32.@] Sets input mode of console's input buffer
1889 *
1890 * PARAMS
1891 * hcon [I] Handle to console input or screen buffer
1892 * mode [I] Input or output mode to set
1893 *
1894 * RETURNS
1895 * Success: TRUE
1896 * Failure: FALSE
1897 *
1898 * mode:
1899 * ENABLE_PROCESSED_INPUT 0x01
1900 * ENABLE_LINE_INPUT 0x02
1901 * ENABLE_ECHO_INPUT 0x04
1902 * ENABLE_WINDOW_INPUT 0x08
1903 * ENABLE_MOUSE_INPUT 0x10
1904 */
1905 BOOL WINAPI SetConsoleMode(HANDLE hcon, DWORD mode)
1906 {
1907 BOOL ret;
1908
1909 SERVER_START_REQ(set_console_mode)
1910 {
1911 req->handle = console_handle_unmap(hcon);
1912 req->mode = mode;
1913 ret = !wine_server_call_err( req );
1914 }
1915 SERVER_END_REQ;
1916 /* FIXME: when resetting a console input to editline mode, I think we should
1917 * empty the S_EditString buffer
1918 */
1919
1920 TRACE("(%p,%x) retval == %d\n", hcon, mode, ret);
1921
1922 return ret;
1923 }
1924
1925
1926 /******************************************************************
1927 * CONSOLE_WriteChars
1928 *
1929 * WriteConsoleOutput helper: hides server call semantics
1930 * writes a string at a given pos with standard attribute
1931 */
1932 static int CONSOLE_WriteChars(HANDLE hCon, LPCWSTR lpBuffer, int nc, COORD* pos)
1933 {
1934 int written = -1;
1935
1936 if (!nc) return 0;
1937
1938 SERVER_START_REQ( write_console_output )
1939 {
1940 req->handle = console_handle_unmap(hCon);
1941 req->x = pos->X;
1942 req->y = pos->Y;
1943 req->mode = CHAR_INFO_MODE_TEXTSTDATTR;
1944 req->wrap = FALSE;
1945 wine_server_add_data( req, lpBuffer, nc * sizeof(WCHAR) );
1946 if (!wine_server_call_err( req )) written = reply->written;
1947 }
1948 SERVER_END_REQ;
1949
1950 if (written > 0) pos->X += written;
1951 return written;
1952 }
1953
1954 /******************************************************************
1955 * next_line
1956 *
1957 * WriteConsoleOutput helper: handles passing to next line (+scrolling if necessary)
1958 *
1959 */
1960 static int next_line(HANDLE hCon, CONSOLE_SCREEN_BUFFER_INFO* csbi)
1961 {
1962 SMALL_RECT src;
1963 CHAR_INFO ci;
1964 COORD dst;
1965
1966 csbi->dwCursorPosition.X = 0;
1967 csbi->dwCursorPosition.Y++;
1968
1969 if (csbi->dwCursorPosition.Y < csbi->dwSize.Y) return 1;
1970
1971 src.Top = 1;
1972 src.Bottom = csbi->dwSize.Y - 1;
1973 src.Left = 0;
1974 src.Right = csbi->dwSize.X - 1;
1975
1976 dst.X = 0;
1977 dst.Y = 0;
1978
1979 ci.Attributes = csbi->wAttributes;
1980 ci.Char.UnicodeChar = ' ';
1981
1982 csbi->dwCursorPosition.Y--;
1983 if (!ScrollConsoleScreenBufferW(hCon, &src, NULL, dst, &ci))
1984 return 0;
1985 return 1;
1986 }
1987
1988 /******************************************************************
1989 * write_block
1990 *
1991 * WriteConsoleOutput helper: writes a block of non special characters
1992 * Block can spread on several lines, and wrapping, if needed, is
1993 * handled
1994 *
1995 */
1996 static int write_block(HANDLE hCon, CONSOLE_SCREEN_BUFFER_INFO* csbi,
1997 DWORD mode, LPCWSTR ptr, int len)
1998 {
1999 int blk; /* number of chars to write on current line */
2000 int done; /* number of chars already written */
2001
2002 if (len <= 0) return 1;
2003
2004 if (mode & ENABLE_WRAP_AT_EOL_OUTPUT) /* writes remaining on next line */
2005 {
2006 for (done = 0; done < len; done += blk)
2007 {
2008 blk = min(len - done, csbi->dwSize.X - csbi->dwCursorPosition.X);
2009
2010 if (CONSOLE_WriteChars(hCon, ptr + done, blk, &csbi->dwCursorPosition) != blk)
2011 return 0;
2012 if (csbi->dwCursorPosition.X == csbi->dwSize.X && !next_line(hCon, csbi))
2013 return 0;
2014 }
2015 }
2016 else
2017 {
2018 int pos = csbi->dwCursorPosition.X;
2019 /* FIXME: we could reduce the number of loops
2020 * but, in most cases we wouldn't gain lots of time (it would only
2021 * happen if we're asked to overwrite more than twice the part of the line,
2022 * which is unlikely
2023 */
2024 for (blk = done = 0; done < len; done += blk)
2025 {
2026 blk = min(len - done, csbi->dwSize.X - csbi->dwCursorPosition.X);
2027
2028 csbi->dwCursorPosition.X = pos;
2029 if (CONSOLE_WriteChars(hCon, ptr + done, blk, &csbi->dwCursorPosition) != blk)
2030 return 0;
2031 }
2032 }
2033
2034 return 1;
2035 }
2036
2037 /***********************************************************************
2038 * WriteConsoleW (KERNEL32.@)
2039 */
2040 BOOL WINAPI WriteConsoleW(HANDLE hConsoleOutput, LPCVOID lpBuffer, DWORD nNumberOfCharsToWrite,
2041 LPDWORD lpNumberOfCharsWritten, LPVOID lpReserved)
2042 {
2043 DWORD mode;
2044 DWORD nw = 0;
2045 const WCHAR* psz = lpBuffer;
2046 CONSOLE_SCREEN_BUFFER_INFO csbi;
2047 int k, first = 0;
2048
2049 TRACE("%p %s %d %p %p\n",
2050 hConsoleOutput, debugstr_wn(lpBuffer, nNumberOfCharsToWrite),
2051 nNumberOfCharsToWrite, lpNumberOfCharsWritten, lpReserved);
2052
2053 if (lpNumberOfCharsWritten) *lpNumberOfCharsWritten = 0;
2054
2055 if (!GetConsoleMode(hConsoleOutput, &mode) ||
2056 !GetConsoleScreenBufferInfo(hConsoleOutput, &csbi))
2057 return FALSE;
2058
2059 if (mode & ENABLE_PROCESSED_OUTPUT)
2060 {
2061 unsigned int i;
2062
2063 for (i = 0; i < nNumberOfCharsToWrite; i++)
2064 {
2065 switch (psz[i])
2066 {
2067 case '\b': case '\t': case '\n': case '\a': case '\r':
2068 /* don't handle here the i-th char... done below */
2069 if ((k = i - first) > 0)
2070 {
2071 if (!write_block(hConsoleOutput, &csbi, mode, &psz[first], k))
2072 goto the_end;
2073 nw += k;
2074 }
2075 first = i + 1;
2076 nw++;
2077 }
2078 switch (psz[i])
2079 {
2080 case '\b':
2081 if (csbi.dwCursorPosition.X > 0) csbi.dwCursorPosition.X--;
2082 break;
2083 case '\t':
2084 {
2085 WCHAR tmp[8] = {' ',' ',' ',' ',' ',' ',' ',' '};
2086
2087 if (!write_block(hConsoleOutput, &csbi, mode, tmp,
2088 ((csbi.dwCursorPosition.X + 8) & ~7) - csbi.dwCursorPosition.X))
2089 goto the_end;
2090 }
2091 break;
2092 case '\n':
2093 next_line(hConsoleOutput, &csbi);
2094 break;
2095 case '\a':
2096 Beep(400, 300);
2097 break;
2098 case '\r':
2099 csbi.dwCursorPosition.X = 0;
2100 break;
2101 default:
2102 break;
2103 }
2104 }
2105 }
2106
2107 /* write the remaining block (if any) if processed output is enabled, or the
2108 * entire buffer otherwise
2109 */
2110 if ((k = nNumberOfCharsToWrite - first) > 0)
2111 {
2112 if (!write_block(hConsoleOutput, &csbi, mode, &psz[first], k))
2113 goto the_end;
2114 nw += k;
2115 }
2116
2117 the_end:
2118 SetConsoleCursorPosition(hConsoleOutput, csbi.dwCursorPosition);
2119 if (lpNumberOfCharsWritten) *lpNumberOfCharsWritten = nw;
2120 return nw != 0;
2121 }
2122
2123
2124 /***********************************************************************
2125 * WriteConsoleA (KERNEL32.@)
2126 */
2127 BOOL WINAPI WriteConsoleA(HANDLE hConsoleOutput, LPCVOID lpBuffer, DWORD nNumberOfCharsToWrite,
2128 LPDWORD lpNumberOfCharsWritten, LPVOID lpReserved)
2129 {
2130 BOOL ret;
2131 LPWSTR xstring;
2132 DWORD n;
2133
2134 n = MultiByteToWideChar(GetConsoleOutputCP(), 0, lpBuffer, nNumberOfCharsToWrite, NULL, 0);
2135
2136 if (lpNumberOfCharsWritten) *lpNumberOfCharsWritten = 0;
2137 xstring = HeapAlloc(GetProcessHeap(), 0, n * sizeof(WCHAR));
2138 if (!xstring) return 0;
2139
2140 MultiByteToWideChar(GetConsoleOutputCP(), 0, lpBuffer, nNumberOfCharsToWrite, xstring, n);
2141
2142 ret = WriteConsoleW(hConsoleOutput, xstring, n, lpNumberOfCharsWritten, 0);
2143
2144 HeapFree(GetProcessHeap(), 0, xstring);
2145
2146 return ret;
2147 }
2148
2149 /******************************************************************************
2150 * SetConsoleCursorPosition [KERNEL32.@]
2151 * Sets the cursor position in console
2152 *
2153 * PARAMS
2154 * hConsoleOutput [I] Handle of console screen buffer
2155 * dwCursorPosition [I] New cursor position coordinates
2156 *
2157 * RETURNS
2158 * Success: TRUE
2159 * Failure: FALSE
2160 */
2161 BOOL WINAPI SetConsoleCursorPosition(HANDLE hcon, COORD pos)
2162 {
2163 BOOL ret;
2164 CONSOLE_SCREEN_BUFFER_INFO csbi;
2165 int do_move = 0;
2166 int w, h;
2167
2168 TRACE("%p %d %d\n", hcon, pos.X, pos.Y);
2169
2170 SERVER_START_REQ(set_console_output_info)
2171 {
2172 req->handle = console_handle_unmap(hcon);
2173 req->cursor_x = pos.X;
2174 req->cursor_y = pos.Y;
2175 req->mask = SET_CONSOLE_OUTPUT_INFO_CURSOR_POS;
2176 ret = !wine_server_call_err( req );
2177 }
2178 SERVER_END_REQ;
2179
2180 if (!ret || !GetConsoleScreenBufferInfo(hcon, &csbi))
2181 return FALSE;
2182
2183 /* if cursor is no longer visible, scroll the visible window... */
2184 w = csbi.srWindow.Right - csbi.srWindow.Left + 1;
2185 h = csbi.srWindow.Bottom - csbi.srWindow.Top + 1;
2186 if (pos.X < csbi.srWindow.Left)
2187 {
2188 csbi.srWindow.Left = min(pos.X, csbi.dwSize.X - w);
2189 do_move++;
2190 }
2191 else if (pos.X > csbi.srWindow.Right)
2192 {
2193 csbi.srWindow.Left = max(pos.X, w) - w + 1;
2194 do_move++;
2195 }
2196 csbi.srWindow.Right = csbi.srWindow.Left + w - 1;
2197
2198 if (pos.Y < csbi.srWindow.Top)
2199 {
2200 csbi.srWindow.Top = min(pos.Y, csbi.dwSize.Y - h);
2201 do_move++;
2202 }
2203 else if (pos.Y > csbi.srWindow.Bottom)
2204 {
2205 csbi.srWindow.Top = max(pos.Y, h) - h + 1;
2206 do_move++;
2207 }
2208 csbi.srWindow.Bottom = csbi.srWindow.Top + h - 1;
2209
2210 ret = (do_move) ? SetConsoleWindowInfo(hcon, TRUE, &csbi.srWindow) : TRUE;
2211
2212 return ret;
2213 }
2214
2215 /******************************************************************************
2216 * GetConsoleCursorInfo [KERNEL32.@] Gets size and visibility of console
2217 *
2218 * PARAMS
2219 * hcon [I] Handle to console screen buffer
2220 * cinfo [O] Address of cursor information
2221 *
2222 * RETURNS
2223 * Success: TRUE
2224 * Failure: FALSE
2225 */
2226 BOOL WINAPI GetConsoleCursorInfo(HANDLE hCon, LPCONSOLE_CURSOR_INFO cinfo)
2227 {
2228 BOOL ret;
2229
2230 SERVER_START_REQ(get_console_output_info)
2231 {
2232 req->handle = console_handle_unmap(hCon);
2233 ret = !wine_server_call_err( req );
2234 if (ret && cinfo)
2235 {
2236 cinfo->dwSize = reply->cursor_size;
2237 cinfo->bVisible = reply->cursor_visible;
2238 }
2239 }
2240 SERVER_END_REQ;
2241
2242 TRACE("(%p) returning (%d,%d)\n", hCon, cinfo->dwSize, cinfo->bVisible);
2243 return ret;
2244 }
2245
2246
2247 /******************************************************************************
2248 * SetConsoleCursorInfo [KERNEL32.@] Sets size and visibility of cursor
2249 *
2250 * PARAMS
2251 * hcon [I] Handle to console screen buffer
2252 * cinfo [I] Address of cursor information
2253 * RETURNS
2254 * Success: TRUE
2255 * Failure: FALSE
2256 */
2257 BOOL WINAPI SetConsoleCursorInfo(HANDLE hCon, LPCONSOLE_CURSOR_INFO cinfo)
2258 {
2259 BOOL ret;
2260
2261 TRACE("(%p,%d,%d)\n", hCon, cinfo->dwSize, cinfo->bVisible);
2262 SERVER_START_REQ(set_console_output_info)
2263 {
2264 req->handle = console_handle_unmap(hCon);
2265 req->cursor_size = cinfo->dwSize;
2266 req->cursor_visible = cinfo->bVisible;
2267 req->mask = SET_CONSOLE_OUTPUT_INFO_CURSOR_GEOM;
2268 ret = !wine_server_call_err( req );
2269 }
2270 SERVER_END_REQ;
2271 return ret;
2272 }
2273
2274
2275 /******************************************************************************
2276 * SetConsoleWindowInfo [KERNEL32.@] Sets size and position of console
2277 *
2278 * PARAMS
2279 * hcon [I] Handle to console screen buffer
2280 * bAbsolute [I] Coordinate type flag
2281 * window [I] Address of new window rectangle
2282 * RETURNS
2283 * Success: TRUE
2284 * Failure: FALSE
2285 */
2286 BOOL WINAPI SetConsoleWindowInfo(HANDLE hCon, BOOL bAbsolute, LPSMALL_RECT window)
2287 {
2288 SMALL_RECT p = *window;
2289 BOOL ret;
2290
2291 TRACE("(%p,%d,(%d,%d-%d,%d))\n", hCon, bAbsolute, p.Left, p.Top, p.Right, p.Bottom);
2292
2293 if (!bAbsolute)
2294 {
2295 CONSOLE_SCREEN_BUFFER_INFO csbi;
2296
2297 if (!GetConsoleScreenBufferInfo(hCon, &csbi))
2298 return FALSE;
2299 p.Left += csbi.srWindow.Left;
2300 p.Top += csbi.srWindow.Top;
2301 p.Right += csbi.srWindow.Right;
2302 p.Bottom += csbi.srWindow.Bottom;
2303 }
2304 SERVER_START_REQ(set_console_output_info)
2305 {
2306 req->handle = console_handle_unmap(hCon);
2307 req->win_left = p.Left;
2308 req->win_top = p.Top;
2309 req->win_right = p.Right;
2310 req->win_bottom = p.Bottom;
2311 req->mask = SET_CONSOLE_OUTPUT_INFO_DISPLAY_WINDOW;
2312 ret = !wine_server_call_err( req );
2313 }
2314 SERVER_END_REQ;
2315
2316 return ret;
2317 }
2318
2319
2320 /******************************************************************************
2321 * SetConsoleTextAttribute [KERNEL32.@] Sets colors for text
2322 *
2323 * Sets the foreground and background color attributes of characters
2324 * written to the screen buffer.
2325 *
2326 * RETURNS
2327 * Success: TRUE
2328 * Failure: FALSE
2329 */
2330 BOOL WINAPI SetConsoleTextAttribute(HANDLE hConsoleOutput, WORD wAttr)
2331 {
2332 BOOL ret;
2333
2334 TRACE("(%p,%d)\n", hConsoleOutput, wAttr);
2335 SERVER_START_REQ(set_console_output_info)
2336 {
2337 req->handle = console_handle_unmap(hConsoleOutput);
2338 req->attr = wAttr;
2339 req->mask = SET_CONSOLE_OUTPUT_INFO_ATTR;
2340 ret = !wine_server_call_err( req );
2341 }
2342 SERVER_END_REQ;
2343 return ret;
2344 }
2345
2346
2347 /******************************************************************************
2348 * SetConsoleScreenBufferSize [KERNEL32.@] Changes size of console
2349 *
2350 * PARAMS
2351 * hConsoleOutput [I] Handle to console screen buffer
2352 * dwSize [I] New size in character rows and cols
2353 *
2354 * RETURNS
2355 * Success: TRUE
2356 * Failure: FALSE
2357 */
2358 BOOL WINAPI SetConsoleScreenBufferSize(HANDLE hConsoleOutput, COORD dwSize)
2359 {
2360 BOOL ret;
2361
2362 TRACE("(%p,(%d,%d))\n", hConsoleOutput, dwSize.X, dwSize.Y);
2363 SERVER_START_REQ(set_console_output_info)
2364 {
2365 req->handle = console_handle_unmap(hConsoleOutput);
2366 req->width = dwSize.X;
2367 req->height = dwSize.Y;
2368 req->mask = SET_CONSOLE_OUTPUT_INFO_SIZE;
2369 ret = !wine_server_call_err( req );
2370 }
2371 SERVER_END_REQ;
2372 return ret;
2373 }
2374
2375
2376 /******************************************************************************
2377 * ScrollConsoleScreenBufferA [KERNEL32.@]
2378 *
2379 */
2380 BOOL WINAPI ScrollConsoleScreenBufferA(HANDLE hConsoleOutput, LPSMALL_RECT lpScrollRect,
2381 LPSMALL_RECT lpClipRect, COORD dwDestOrigin,
2382 LPCHAR_INFO lpFill)
2383 {
2384 CHAR_INFO ciw;
2385
2386 ciw.Attributes = lpFill->Attributes;
2387 MultiByteToWideChar(GetConsoleOutputCP(), 0, &lpFill->Char.AsciiChar, 1, &ciw.Char.UnicodeChar, 1);
2388
2389 return ScrollConsoleScreenBufferW(hConsoleOutput, lpScrollRect, lpClipRect,
2390 dwDestOrigin, &ciw);
2391 }
2392
2393 /******************************************************************
2394 * CONSOLE_FillLineUniform
2395 *
2396 * Helper function for ScrollConsoleScreenBufferW
2397 * Fills a part of a line with a constant character info
2398 */
2399 void CONSOLE_FillLineUniform(HANDLE hConsoleOutput, int i, int j, int len, LPCHAR_INFO lpFill)
2400 {
2401 SERVER_START_REQ( fill_console_output )
2402 {
2403 req->handle = console_handle_unmap(hConsoleOutput);
2404 req->mode = CHAR_INFO_MODE_TEXTATTR;
2405 req->x = i;
2406 req->y = j;
2407 req->count = len;
2408 req->wrap = FALSE;
2409 req->data.ch = lpFill->Char.UnicodeChar;
2410 req->data.attr = lpFill->Attributes;
2411 wine_server_call_err( req );
2412 }
2413 SERVER_END_REQ;
2414 }
2415
2416 /******************************************************************************
2417 * ScrollConsoleScreenBufferW [KERNEL32.@]
2418 *
2419 */
2420
2421 BOOL WINAPI ScrollConsoleScreenBufferW(HANDLE hConsoleOutput, LPSMALL_RECT lpScrollRect,
2422 LPSMALL_RECT lpClipRect, COORD dwDestOrigin,
2423 LPCHAR_INFO lpFill)
2424 {
2425 SMALL_RECT dst;
2426 DWORD ret;
2427 int i, j;
2428 int start = -1;
2429 SMALL_RECT clip;
2430 CONSOLE_SCREEN_BUFFER_INFO csbi;
2431 BOOL inside;
2432 COORD src;
2433
2434 if (lpClipRect)
2435 TRACE("(%p,(%d,%d-%d,%d),(%d,%d-%d,%d),%d-%d,%p)\n", hConsoleOutput,
2436 lpScrollRect->Left, lpScrollRect->Top,
2437 lpScrollRect->Right, lpScrollRect->Bottom,
2438 lpClipRect->Left, lpClipRect->Top,
2439 lpClipRect->Right, lpClipRect->Bottom,
2440 dwDestOrigin.X, dwDestOrigin.Y, lpFill);
2441 else
2442 TRACE("(%p,(%d,%d-%d,%d),(nil),%d-%d,%p)\n", hConsoleOutput,
2443 lpScrollRect->Left, lpScrollRect->Top,
2444 lpScrollRect->Right, lpScrollRect->Bottom,
2445 dwDestOrigin.X, dwDestOrigin.Y, lpFill);
2446
2447 if (!GetConsoleScreenBufferInfo(hConsoleOutput, &csbi))
2448 return FALSE;
2449
2450 src.X = lpScrollRect->Left;
2451 src.Y = lpScrollRect->Top;
2452
2453 /* step 1: get dst rect */
2454 dst.Left = dwDestOrigin.X;
2455 dst.Top = dwDestOrigin.Y;
2456 dst.Right = dst.Left + (lpScrollRect->Right - lpScrollRect->Left);
2457 dst.Bottom = dst.Top + (lpScrollRect->Bottom - lpScrollRect->Top);
2458
2459 /* step 2a: compute the final clip rect (optional passed clip and screen buffer limits */
2460 if (lpClipRect)
2461 {
2462 clip.Left = max(0, lpClipRect->Left);
2463 clip.Right = min(csbi.dwSize.X - 1, lpClipRect->Right);
2464 clip.Top = max(0, lpClipRect->Top);
2465 clip.Bottom = min(csbi.dwSize.Y - 1, lpClipRect->Bottom);
2466 }
2467 else
2468 {
2469 clip.Left = 0;
2470 clip.Right = csbi.dwSize.X - 1;
2471 clip.Top = 0;
2472 clip.Bottom = csbi.dwSize.Y - 1;
2473 }
2474 if (clip.Left > clip.Right || clip.Top > clip.Bottom) return FALSE;
2475
2476 /* step 2b: clip dst rect */
2477 if (dst.Left < clip.Left ) {src.X += clip.Left - dst.Left; dst.Left = clip.Left;}
2478 if (dst.Top < clip.Top ) {src.Y += clip.Top - dst.Top; dst.Top = clip.Top;}
2479 if (dst.Right > clip.Right ) dst.Right = clip.Right;
2480 if (dst.Bottom > clip.Bottom) dst.Bottom = clip.Bottom;
2481
2482 /* step 3: transfer the bits */
2483 SERVER_START_REQ(move_console_output)
2484 {
2485 req->handle = console_handle_unmap(hConsoleOutput);
2486 req->x_src = src.X;
2487 req->y_src = src.Y;
2488 req->x_dst = dst.Left;
2489 req->y_dst = dst.Top;
2490 req->w = dst.Right - dst.Left + 1;
2491 req->h = dst.Bottom - dst.Top + 1;
2492 ret = !wine_server_call_err( req );
2493 }
2494 SERVER_END_REQ;
2495
2496 if (!ret) return FALSE;
2497
2498 /* step 4: clean out the exposed part */
2499
2500 /* have to write cell [i,j] if it is not in dst rect (because it has already
2501 * been written to by the scroll) and is in clip (we shall not write
2502 * outside of clip)
2503 */
2504 for (j = max(lpScrollRect->Top, clip.Top); j <= min(lpScrollRect->Bottom, clip.Bottom); j++)
2505 {
2506 inside = dst.Top <= j && j <= dst.Bottom;
2507 start = -1;
2508 for (i = max(lpScrollRect->Left, clip.Left); i <= min(lpScrollRect->Right, clip.Right); i++)
2509 {
2510 if (inside && dst.Left <= i && i <= dst.Right)
2511 {
2512 if (start != -1)
2513 {
2514 CONSOLE_FillLineUniform(hConsoleOutput, start, j, i - start, lpFill);
2515 start = -1;
2516 }
2517 }
2518 else
2519 {
2520 if (start == -1) start = i;
2521 }
2522 }
2523 if (start != -1)
2524 CONSOLE_FillLineUniform(hConsoleOutput, start, j, i - start, lpFill);
2525 }
2526
2527 return TRUE;
2528 }
2529
2530 /******************************************************************
2531 * AttachConsole (KERNEL32.@)
2532 */
2533 BOOL WINAPI AttachConsole(DWORD dwProcessId)
2534 {
2535 FIXME("stub %x\n",dwProcessId);
2536 return TRUE;
2537 }
2538
2539
2540 /* ====================================================================
2541 *
2542 * Console manipulation functions
2543 *
2544 * ====================================================================*/
2545
2546 /* some missing functions...
2547 * FIXME: those are likely to be defined as undocumented function in kernel32 (or part of them)
2548 * should get the right API and implement them
2549 * GetConsoleCommandHistory[AW] (dword dword dword)
2550 * GetConsoleCommandHistoryLength[AW]
2551 * SetConsoleCommandHistoryMode
2552 * SetConsoleNumberOfCommands[AW]
2553 */
2554 int CONSOLE_GetHistory(int idx, WCHAR* buf, int buf_len)
2555 {
2556 int len = 0;
2557
2558 SERVER_START_REQ( get_console_input_history )
2559 {
2560 req->handle = 0;
2561 req->index = idx;
2562 if (buf && buf_len > 1)
2563 {
2564 wine_server_set_reply( req, buf, (buf_len - 1) * sizeof(WCHAR) );
2565 }
2566 if (!wine_server_call_err( req ))
2567 {
2568 if (buf) buf[wine_server_reply_size(reply) / sizeof(WCHAR)] = 0;
2569 len = reply->total / sizeof(WCHAR) + 1;
2570 }
2571 }
2572 SERVER_END_REQ;
2573 return len;
2574 }
2575
2576 /******************************************************************
2577 * CONSOLE_AppendHistory
2578 *
2579 *
2580 */
2581 BOOL CONSOLE_AppendHistory(const WCHAR* ptr)
2582 {
2583 size_t len = strlenW(ptr);
2584 BOOL ret;
2585
2586 while (len && (ptr[len - 1] == '\n' || ptr[len - 1] == '\r')) len--;
2587 if (!len) return FALSE;
2588
2589 SERVER_START_REQ( append_console_input_history )
2590 {
2591 req->handle = 0;
2592 wine_server_add_data( req, ptr, len * sizeof(WCHAR) );
2593 ret = !wine_server_call_err( req );
2594 }
2595 SERVER_END_REQ;
2596 return ret;
2597 }
2598
2599 /******************************************************************
2600 * CONSOLE_GetNumHistoryEntries
2601 *
2602 *
2603 */
2604 unsigned CONSOLE_GetNumHistoryEntries(void)
2605 {
2606 unsigned ret = -1;
2607 SERVER_START_REQ(get_console_input_info)
2608 {
2609 req->handle = 0;
2610 if (!wine_server_call_err( req )) ret = reply->history_index;
2611 }
2612 SERVER_END_REQ;
2613 return ret;
2614 }
2615
2616 /******************************************************************
2617 * CONSOLE_GetEditionMode
2618 *
2619 *
2620 */
2621 BOOL CONSOLE_GetEditionMode(HANDLE hConIn, int* mode)
2622 {
2623 unsigned ret = FALSE;
2624 SERVER_START_REQ(get_console_input_info)
2625 {
2626 req->handle = console_handle_unmap(hConIn);
2627 if ((ret = !wine_server_call_err( req )))
2628 *mode = reply->edition_mode;
2629 }
2630 SERVER_END_REQ;
2631 return ret;
2632 }
Maarten's multimedia branch