88c88efaa1a06859d782c0421376f8c86f107b32
[openssl.git] / crypto / ui / ui_openssl.c
1 /*
2  * Copyright 2001-2018 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the OpenSSL license (the "License").  You may not use
5  * this file except in compliance with the License.  You can obtain a copy
6  * in the file LICENSE in the source distribution or at
7  * https://www.openssl.org/source/license.html
8  */
9
10 #include "e_os.h"
11 #include <openssl/e_os2.h>
12 #include <openssl/err.h>
13 #include <openssl/ui.h>
14
15 #ifndef OPENSSL_NO_UI_CONSOLE
16 /*
17  * need for #define _POSIX_C_SOURCE arises whenever you pass -ansi to gcc
18  * [maybe others?], because it masks interfaces not discussed in standard,
19  * sigaction and fileno included. -pedantic would be more appropriate for the
20  * intended purposes, but we can't prevent users from adding -ansi.
21  */
22 # if defined(OPENSSL_SYS_VXWORKS)
23 #  include <sys/types.h>
24 # endif
25
26 # if !defined(_POSIX_C_SOURCE) && defined(OPENSSL_SYS_VMS)
27 #  ifndef _POSIX_C_SOURCE
28 #   define _POSIX_C_SOURCE 2
29 #  endif
30 # endif
31 # include <signal.h>
32 # include <stdio.h>
33 # include <string.h>
34 # include <errno.h>
35
36 # if !defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_VMS)
37 #  ifdef OPENSSL_UNISTD
38 #   include OPENSSL_UNISTD
39 #  else
40 #   include <unistd.h>
41 #  endif
42 /*
43  * If unistd.h defines _POSIX_VERSION, we conclude that we are on a POSIX
44  * system and have sigaction and termios.
45  */
46 #  if defined(_POSIX_VERSION) && _POSIX_VERSION>=199309L
47
48 #   define SIGACTION
49 #   if !defined(TERMIOS) && !defined(TERMIO) && !defined(SGTTY)
50 #    define TERMIOS
51 #   endif
52
53 #  endif
54 # endif
55
56 # include "ui_locl.h"
57 # include "internal/cryptlib.h"
58
59 # ifdef OPENSSL_SYS_VMS          /* prototypes for sys$whatever */
60 #  include <starlet.h>
61 #  ifdef __DECC
62 #   pragma message disable DOLLARID
63 #  endif
64 # endif
65
66 # ifdef WIN_CONSOLE_BUG
67 #  include <windows.h>
68 #  ifndef OPENSSL_SYS_WINCE
69 #   include <wincon.h>
70 #  endif
71 # endif
72
73 /*
74  * There are 6 types of terminal interface supported, TERMIO, TERMIOS, VMS,
75  * MSDOS, WIN32 Console and SGTTY.
76  *
77  * If someone defines one of the macros TERMIO, TERMIOS or SGTTY, it will
78  * remain respected.  Otherwise, we default to TERMIOS except for a few
79  * systems that require something different.
80  *
81  * Note: we do not use SGTTY unless it's defined by the configuration.  We
82  * may eventually opt to remove it's use entirely.
83  */
84
85 # if !defined(TERMIOS) && !defined(TERMIO) && !defined(SGTTY)
86
87 #  if defined(_LIBC)
88 #   undef  TERMIOS
89 #   define TERMIO
90 #   undef  SGTTY
91 /*
92  * We know that VMS, MSDOS, VXWORKS, use entirely other mechanisms.
93  */
94 #  elif !defined(OPENSSL_SYS_VMS) \
95         && !defined(OPENSSL_SYS_MSDOS) \
96         && !defined(OPENSSL_SYS_VXWORKS)
97 #   define TERMIOS
98 #   undef  TERMIO
99 #   undef  SGTTY
100 #  endif
101
102 # endif
103
104 # if defined(OPENSSL_SYS_VXWORKS)
105 #  undef TERMIOS
106 #  undef TERMIO
107 #  undef SGTTY
108 # endif
109
110 # ifdef TERMIOS
111 #  include <termios.h>
112 #  define TTY_STRUCT             struct termios
113 #  define TTY_FLAGS              c_lflag
114 #  define TTY_get(tty,data)      tcgetattr(tty,data)
115 #  define TTY_set(tty,data)      tcsetattr(tty,TCSANOW,data)
116 # endif
117
118 # ifdef TERMIO
119 #  include <termio.h>
120 #  define TTY_STRUCT             struct termio
121 #  define TTY_FLAGS              c_lflag
122 #  define TTY_get(tty,data)      ioctl(tty,TCGETA,data)
123 #  define TTY_set(tty,data)      ioctl(tty,TCSETA,data)
124 # endif
125
126 # ifdef SGTTY
127 #  include <sgtty.h>
128 #  define TTY_STRUCT             struct sgttyb
129 #  define TTY_FLAGS              sg_flags
130 #  define TTY_get(tty,data)      ioctl(tty,TIOCGETP,data)
131 #  define TTY_set(tty,data)      ioctl(tty,TIOCSETP,data)
132 # endif
133
134 # if !defined(_LIBC) && !defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_VMS)
135 #  include <sys/ioctl.h>
136 # endif
137
138 # ifdef OPENSSL_SYS_MSDOS
139 #  include <conio.h>
140 # endif
141
142 # ifdef OPENSSL_SYS_VMS
143 #  include <ssdef.h>
144 #  include <iodef.h>
145 #  include <ttdef.h>
146 #  include <descrip.h>
147 struct IOSB {
148     short iosb$w_value;
149     short iosb$w_count;
150     long iosb$l_info;
151 };
152 # endif
153
154 # ifndef NX509_SIG
155 #  define NX509_SIG 32
156 # endif
157
158 /* Define globals.  They are protected by a lock */
159 # ifdef SIGACTION
160 static struct sigaction savsig[NX509_SIG];
161 # else
162 static void (*savsig[NX509_SIG]) (int);
163 # endif
164
165 # ifdef OPENSSL_SYS_VMS
166 static struct IOSB iosb;
167 static $DESCRIPTOR(terminal, "TT");
168 static long tty_orig[3], tty_new[3]; /* XXX Is there any guarantee that this
169                                       * will always suffice for the actual
170                                       * structures? */
171 static long status;
172 static unsigned short channel = 0;
173 # elif defined(_WIN32) && !defined(_WIN32_WCE)
174 static DWORD tty_orig, tty_new;
175 # else
176 #  if !defined(OPENSSL_SYS_MSDOS) || defined(__DJGPP__)
177 static TTY_STRUCT tty_orig, tty_new;
178 #  endif
179 # endif
180 static FILE *tty_in, *tty_out;
181 static int is_a_tty;
182
183 /* Declare static functions */
184 # if !defined(OPENSSL_SYS_WINCE)
185 static int read_till_nl(FILE *);
186 static void recsig(int);
187 static void pushsig(void);
188 static void popsig(void);
189 # endif
190 # if defined(OPENSSL_SYS_MSDOS) && !defined(_WIN32)
191 static int noecho_fgets(char *buf, int size, FILE *tty);
192 # endif
193 static int read_string_inner(UI *ui, UI_STRING *uis, int echo, int strip_nl);
194
195 static int read_string(UI *ui, UI_STRING *uis);
196 static int write_string(UI *ui, UI_STRING *uis);
197
198 static int open_console(UI *ui);
199 static int echo_console(UI *ui);
200 static int noecho_console(UI *ui);
201 static int close_console(UI *ui);
202
203 /*
204  * The following function makes sure that info and error strings are printed
205  * before any prompt.
206  */
207 static int write_string(UI *ui, UI_STRING *uis)
208 {
209     switch (UI_get_string_type(uis)) {
210     case UIT_ERROR:
211     case UIT_INFO:
212         fputs(UI_get0_output_string(uis), tty_out);
213         fflush(tty_out);
214         break;
215     case UIT_NONE:
216     case UIT_PROMPT:
217     case UIT_VERIFY:
218     case UIT_BOOLEAN:
219         break;
220     }
221     return 1;
222 }
223
224 static int read_string(UI *ui, UI_STRING *uis)
225 {
226     int ok = 0;
227
228     switch (UI_get_string_type(uis)) {
229     case UIT_BOOLEAN:
230         fputs(UI_get0_output_string(uis), tty_out);
231         fputs(UI_get0_action_string(uis), tty_out);
232         fflush(tty_out);
233         return read_string_inner(ui, uis,
234                                  UI_get_input_flags(uis) & UI_INPUT_FLAG_ECHO,
235                                  0);
236     case UIT_PROMPT:
237         fputs(UI_get0_output_string(uis), tty_out);
238         fflush(tty_out);
239         return read_string_inner(ui, uis,
240                                  UI_get_input_flags(uis) & UI_INPUT_FLAG_ECHO,
241                                  1);
242     case UIT_VERIFY:
243         fprintf(tty_out, "Verifying - %s", UI_get0_output_string(uis));
244         fflush(tty_out);
245         if ((ok = read_string_inner(ui, uis,
246                                     UI_get_input_flags(uis) &
247                                     UI_INPUT_FLAG_ECHO, 1)) <= 0)
248             return ok;
249         if (strcmp(UI_get0_result_string(uis), UI_get0_test_string(uis)) != 0) {
250             fprintf(tty_out, "Verify failure\n");
251             fflush(tty_out);
252             return 0;
253         }
254         break;
255     case UIT_NONE:
256     case UIT_INFO:
257     case UIT_ERROR:
258         break;
259     }
260     return 1;
261 }
262
263 # if !defined(OPENSSL_SYS_WINCE)
264 /* Internal functions to read a string without echoing */
265 static int read_till_nl(FILE *in)
266 {
267 #  define SIZE 4
268     char buf[SIZE + 1];
269
270     do {
271         if (!fgets(buf, SIZE, in))
272             return 0;
273     } while (strchr(buf, '\n') == NULL);
274     return 1;
275 }
276
277 static volatile sig_atomic_t intr_signal;
278 # endif
279
280 static int read_string_inner(UI *ui, UI_STRING *uis, int echo, int strip_nl)
281 {
282     static int ps;
283     int ok;
284     char result[BUFSIZ];
285     int maxsize = BUFSIZ - 1;
286 # if !defined(OPENSSL_SYS_WINCE)
287     char *p = NULL;
288     int echo_eol = !echo;
289
290     intr_signal = 0;
291     ok = 0;
292     ps = 0;
293
294     pushsig();
295     ps = 1;
296
297     if (!echo && !noecho_console(ui))
298         goto error;
299     ps = 2;
300
301     result[0] = '\0';
302 #  if defined(_WIN32)
303     if (is_a_tty) {
304         DWORD numread;
305 #   if defined(CP_UTF8)
306         if (GetEnvironmentVariableW(L"OPENSSL_WIN32_UTF8", NULL, 0) != 0) {
307             WCHAR wresult[BUFSIZ];
308
309             if (ReadConsoleW(GetStdHandle(STD_INPUT_HANDLE),
310                          wresult, maxsize, &numread, NULL)) {
311                 if (numread >= 2 &&
312                     wresult[numread-2] == L'\r' &&
313                     wresult[numread-1] == L'\n') {
314                     wresult[numread-2] = L'\n';
315                     numread--;
316                 }
317                 wresult[numread] = '\0';
318                 if (WideCharToMultiByte(CP_UTF8, 0, wresult, -1,
319                                         result, sizeof(result), NULL, 0) > 0)
320                     p = result;
321
322                 OPENSSL_cleanse(wresult, sizeof(wresult));
323             }
324         } else
325 #   endif
326         if (ReadConsoleA(GetStdHandle(STD_INPUT_HANDLE),
327                          result, maxsize, &numread, NULL)) {
328             if (numread >= 2 &&
329                 result[numread-2] == '\r' && result[numread-1] == '\n') {
330                 result[numread-2] = '\n';
331                 numread--;
332             }
333             result[numread] = '\0';
334             p = result;
335         }
336     } else
337 #  elif defined(OPENSSL_SYS_MSDOS)
338     if (!echo) {
339         noecho_fgets(result, maxsize, tty_in);
340         p = result;             /* FIXME: noecho_fgets doesn't return errors */
341     } else
342 #  endif
343     p = fgets(result, maxsize, tty_in);
344     if (p == NULL)
345         goto error;
346     if (feof(tty_in))
347         goto error;
348     if (ferror(tty_in))
349         goto error;
350     if ((p = (char *)strchr(result, '\n')) != NULL) {
351         if (strip_nl)
352             *p = '\0';
353     } else if (!read_till_nl(tty_in))
354         goto error;
355     if (UI_set_result(ui, uis, result) >= 0)
356         ok = 1;
357
358  error:
359     if (intr_signal == SIGINT)
360         ok = -1;
361     if (echo_eol)
362         fprintf(tty_out, "\n");
363     if (ps >= 2 && !echo && !echo_console(ui))
364         ok = 0;
365
366     if (ps >= 1)
367         popsig();
368 # else
369     ok = 1;
370 # endif
371
372     OPENSSL_cleanse(result, BUFSIZ);
373     return ok;
374 }
375
376 /* Internal functions to open, handle and close a channel to the console.  */
377 static int open_console(UI *ui)
378 {
379     CRYPTO_THREAD_write_lock(ui->lock);
380     is_a_tty = 1;
381
382 # if defined(OPENSSL_SYS_VXWORKS)
383     tty_in = stdin;
384     tty_out = stderr;
385 # elif defined(_WIN32) && !defined(_WIN32_WCE)
386     if ((tty_out = fopen("conout$", "w")) == NULL)
387         tty_out = stderr;
388
389     if (GetConsoleMode(GetStdHandle(STD_INPUT_HANDLE), &tty_orig)) {
390         tty_in = stdin;
391     } else {
392         is_a_tty = 0;
393         if ((tty_in = fopen("conin$", "r")) == NULL)
394             tty_in = stdin;
395     }
396 # else
397 #  ifdef OPENSSL_SYS_MSDOS
398 #   define DEV_TTY "con"
399 #  else
400 #   define DEV_TTY "/dev/tty"
401 #  endif
402     if ((tty_in = fopen(DEV_TTY, "r")) == NULL)
403         tty_in = stdin;
404     if ((tty_out = fopen(DEV_TTY, "w")) == NULL)
405         tty_out = stderr;
406 # endif
407
408 # if defined(TTY_get) && !defined(OPENSSL_SYS_VMS)
409     if (TTY_get(fileno(tty_in), &tty_orig) == -1) {
410 #  ifdef ENOTTY
411         if (errno == ENOTTY)
412             is_a_tty = 0;
413         else
414 #  endif
415 #  ifdef EINVAL
416             /*
417              * Ariel Glenn reports that solaris can return EINVAL instead.
418              * This should be ok
419              */
420         if (errno == EINVAL)
421             is_a_tty = 0;
422         else
423 #  endif
424 #  ifdef ENXIO
425             /*
426              * Solaris can return ENXIO.
427              * This should be ok
428              */
429         if (errno == ENXIO)
430             is_a_tty = 0;
431         else
432 #  endif
433 #  ifdef EIO
434             /*
435              * Linux can return EIO.
436              * This should be ok
437              */
438         if (errno == EIO)
439             is_a_tty = 0;
440         else
441 #  endif
442 #  ifdef ENODEV
443             /*
444              * MacOS X returns ENODEV (Operation not supported by device),
445              * which seems appropriate.
446              */
447         if (errno == ENODEV)
448             is_a_tty = 0;
449         else
450 #  endif
451             {
452                 char tmp_num[10];
453                 BIO_snprintf(tmp_num, sizeof(tmp_num) - 1, "%d", errno);
454                 UIerr(UI_F_OPEN_CONSOLE, UI_R_UNKNOWN_TTYGET_ERRNO_VALUE);
455                 ERR_add_error_data(2, "errno=", tmp_num);
456
457                 return 0;
458             }
459     }
460 # endif
461 # ifdef OPENSSL_SYS_VMS
462     status = sys$assign(&terminal, &channel, 0, 0);
463
464     /* if there isn't a TT device, something is very wrong */
465     if (status != SS$_NORMAL) {
466         char tmp_num[12];
467
468         BIO_snprintf(tmp_num, sizeof(tmp_num) - 1, "%%X%08X", status);
469         UIerr(UI_F_OPEN_CONSOLE, UI_R_SYSASSIGN_ERROR);
470         ERR_add_error_data(2, "status=", tmp_num);
471         return 0;
472     }
473
474     status = sys$qiow(0, channel, IO$_SENSEMODE, &iosb, 0, 0, tty_orig, 12,
475                       0, 0, 0, 0);
476
477     /* If IO$_SENSEMODE doesn't work, this is not a terminal device */
478     if ((status != SS$_NORMAL) || (iosb.iosb$w_value != SS$_NORMAL))
479         is_a_tty = 0;
480 # endif
481     return 1;
482 }
483
484 static int noecho_console(UI *ui)
485 {
486 # ifdef TTY_FLAGS
487     memcpy(&(tty_new), &(tty_orig), sizeof(tty_orig));
488     tty_new.TTY_FLAGS &= ~ECHO;
489 # endif
490
491 # if defined(TTY_set) && !defined(OPENSSL_SYS_VMS)
492     if (is_a_tty && (TTY_set(fileno(tty_in), &tty_new) == -1))
493         return 0;
494 # endif
495 # ifdef OPENSSL_SYS_VMS
496     if (is_a_tty) {
497         tty_new[0] = tty_orig[0];
498         tty_new[1] = tty_orig[1] | TT$M_NOECHO;
499         tty_new[2] = tty_orig[2];
500         status = sys$qiow(0, channel, IO$_SETMODE, &iosb, 0, 0, tty_new, 12,
501                           0, 0, 0, 0);
502         if ((status != SS$_NORMAL) || (iosb.iosb$w_value != SS$_NORMAL)) {
503             char tmp_num[2][12];
504
505             BIO_snprintf(tmp_num[0], sizeof(tmp_num[0]) - 1, "%%X%08X",
506                          status);
507             BIO_snprintf(tmp_num[1], sizeof(tmp_num[1]) - 1, "%%X%08X",
508                          iosb.iosb$w_value);
509             UIerr(UI_F_NOECHO_CONSOLE, UI_R_SYSQIOW_ERROR);
510             ERR_add_error_data(5, "status=", tmp_num[0],
511                                ",", "iosb.iosb$w_value=", tmp_num[1]);
512             return 0;
513         }
514     }
515 # endif
516 # if defined(_WIN32) && !defined(_WIN32_WCE)
517     if (is_a_tty) {
518         tty_new = tty_orig;
519         tty_new &= ~ENABLE_ECHO_INPUT;
520         SetConsoleMode(GetStdHandle(STD_INPUT_HANDLE), tty_new);
521     }
522 # endif
523     return 1;
524 }
525
526 static int echo_console(UI *ui)
527 {
528 # if defined(TTY_set) && !defined(OPENSSL_SYS_VMS)
529     memcpy(&(tty_new), &(tty_orig), sizeof(tty_orig));
530     if (is_a_tty && (TTY_set(fileno(tty_in), &tty_new) == -1))
531         return 0;
532 # endif
533 # ifdef OPENSSL_SYS_VMS
534     if (is_a_tty) {
535         tty_new[0] = tty_orig[0];
536         tty_new[1] = tty_orig[1];
537         tty_new[2] = tty_orig[2];
538         status = sys$qiow(0, channel, IO$_SETMODE, &iosb, 0, 0, tty_new, 12,
539                           0, 0, 0, 0);
540         if ((status != SS$_NORMAL) || (iosb.iosb$w_value != SS$_NORMAL)) {
541             char tmp_num[2][12];
542
543             BIO_snprintf(tmp_num[0], sizeof(tmp_num[0]) - 1, "%%X%08X",
544                          status);
545             BIO_snprintf(tmp_num[1], sizeof(tmp_num[1]) - 1, "%%X%08X",
546                          iosb.iosb$w_value);
547             UIerr(UI_F_ECHO_CONSOLE, UI_R_SYSQIOW_ERROR);
548             ERR_add_error_data(5, "status=", tmp_num[0],
549                                ",", "iosb.iosb$w_value=", tmp_num[1]);
550             return 0;
551         }
552     }
553 # endif
554 # if defined(_WIN32) && !defined(_WIN32_WCE)
555     if (is_a_tty) {
556         tty_new = tty_orig;
557         SetConsoleMode(GetStdHandle(STD_INPUT_HANDLE), tty_new);
558     }
559 # endif
560     return 1;
561 }
562
563 static int close_console(UI *ui)
564 {
565     if (tty_in != stdin)
566         fclose(tty_in);
567     if (tty_out != stderr)
568         fclose(tty_out);
569 # ifdef OPENSSL_SYS_VMS
570     status = sys$dassgn(channel);
571     if (status != SS$_NORMAL) {
572         char tmp_num[12];
573
574         BIO_snprintf(tmp_num, sizeof(tmp_num) - 1, "%%X%08X", status);
575         UIerr(UI_F_CLOSE_CONSOLE, UI_R_SYSDASSGN_ERROR);
576         ERR_add_error_data(2, "status=", tmp_num);
577         return 0;
578     }
579 # endif
580     CRYPTO_THREAD_unlock(ui->lock);
581
582     return 1;
583 }
584
585 # if !defined(OPENSSL_SYS_WINCE)
586 /* Internal functions to handle signals and act on them */
587 static void pushsig(void)
588 {
589 #  ifndef OPENSSL_SYS_WIN32
590     int i;
591 #  endif
592 #  ifdef SIGACTION
593     struct sigaction sa;
594
595     memset(&sa, 0, sizeof(sa));
596     sa.sa_handler = recsig;
597 #  endif
598
599 #  ifdef OPENSSL_SYS_WIN32
600     savsig[SIGABRT] = signal(SIGABRT, recsig);
601     savsig[SIGFPE] = signal(SIGFPE, recsig);
602     savsig[SIGILL] = signal(SIGILL, recsig);
603     savsig[SIGINT] = signal(SIGINT, recsig);
604     savsig[SIGSEGV] = signal(SIGSEGV, recsig);
605     savsig[SIGTERM] = signal(SIGTERM, recsig);
606 #  else
607     for (i = 1; i < NX509_SIG; i++) {
608 #   ifdef SIGUSR1
609         if (i == SIGUSR1)
610             continue;
611 #   endif
612 #   ifdef SIGUSR2
613         if (i == SIGUSR2)
614             continue;
615 #   endif
616 #   ifdef SIGKILL
617         if (i == SIGKILL)       /* We can't make any action on that. */
618             continue;
619 #   endif
620 #   ifdef SIGACTION
621         sigaction(i, &sa, &savsig[i]);
622 #   else
623         savsig[i] = signal(i, recsig);
624 #   endif
625     }
626 #  endif
627
628 #  ifdef SIGWINCH
629     signal(SIGWINCH, SIG_DFL);
630 #  endif
631 }
632
633 static void popsig(void)
634 {
635 #  ifdef OPENSSL_SYS_WIN32
636     signal(SIGABRT, savsig[SIGABRT]);
637     signal(SIGFPE, savsig[SIGFPE]);
638     signal(SIGILL, savsig[SIGILL]);
639     signal(SIGINT, savsig[SIGINT]);
640     signal(SIGSEGV, savsig[SIGSEGV]);
641     signal(SIGTERM, savsig[SIGTERM]);
642 #  else
643     int i;
644     for (i = 1; i < NX509_SIG; i++) {
645 #   ifdef SIGUSR1
646         if (i == SIGUSR1)
647             continue;
648 #   endif
649 #   ifdef SIGUSR2
650         if (i == SIGUSR2)
651             continue;
652 #   endif
653 #   ifdef SIGACTION
654         sigaction(i, &savsig[i], NULL);
655 #   else
656         signal(i, savsig[i]);
657 #   endif
658     }
659 #  endif
660 }
661
662 static void recsig(int i)
663 {
664     intr_signal = i;
665 }
666 # endif
667
668 /* Internal functions specific for Windows */
669 # if defined(OPENSSL_SYS_MSDOS) && !defined(_WIN32)
670 static int noecho_fgets(char *buf, int size, FILE *tty)
671 {
672     int i;
673     char *p;
674
675     p = buf;
676     for (;;) {
677         if (size == 0) {
678             *p = '\0';
679             break;
680         }
681         size--;
682 #  if defined(_WIN32)
683         i = _getch();
684 #  else
685         i = getch();
686 #  endif
687         if (i == '\r')
688             i = '\n';
689         *(p++) = i;
690         if (i == '\n') {
691             *p = '\0';
692             break;
693         }
694     }
695 #  ifdef WIN_CONSOLE_BUG
696     /*
697      * Win95 has several evil console bugs: one of these is that the last
698      * character read using getch() is passed to the next read: this is
699      * usually a CR so this can be trouble. No STDIO fix seems to work but
700      * flushing the console appears to do the trick.
701      */
702     {
703         HANDLE inh;
704         inh = GetStdHandle(STD_INPUT_HANDLE);
705         FlushConsoleInputBuffer(inh);
706     }
707 #  endif
708     return strlen(buf);
709 }
710 # endif
711
712 static UI_METHOD ui_openssl = {
713     "OpenSSL default user interface",
714     open_console,
715     write_string,
716     NULL,                       /* No flusher is needed for command lines */
717     read_string,
718     close_console,
719     NULL
720 };
721
722 /* The method with all the built-in console thingies */
723 UI_METHOD *UI_OpenSSL(void)
724 {
725     return &ui_openssl;
726 }
727
728 static const UI_METHOD *default_UI_meth = &ui_openssl;
729
730 #else
731
732 static const UI_METHOD *default_UI_meth = NULL;
733
734 #endif
735
736 void UI_set_default_method(const UI_METHOD *meth)
737 {
738     default_UI_meth = meth;
739 }
740
741 const UI_METHOD *UI_get_default_method(void)
742 {
743     return default_UI_meth;
744 }