Enhance the user interface with better support for dialog box
[openssl.git] / crypto / ui / ui_openssl.c
index c4e8c9c54b4035e6ce3536f50abe27644022c7e7..7c988aa708ca97850a84a97a7d84184fd75ce638 100644 (file)
@@ -1,6 +1,6 @@
 /* crypto/ui/ui_openssl.c -*- mode:C; c-file-style: "eay" -*- */
 /* crypto/ui/ui_openssl.c -*- mode:C; c-file-style: "eay" -*- */
-/* Written by Richard Levitte (levitte@stacken.kth.se) for the OpenSSL
- * project 2000.
+/* Written by Richard Levitte (levitte@stacken.kth.se) and others
+ * for the OpenSSL project 2000/2001.
  */
 /* ====================================================================
  * Copyright (c) 1998-2000 The OpenSSL Project.  All rights reserved.
  */
 /* ====================================================================
  * Copyright (c) 1998-2000 The OpenSSL Project.  All rights reserved.
  */
 
 
  */
 
 
-#include <openssl/opensslconf.h>
+#include <openssl/e_os2.h>
 
 #if !defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_VMS)
 # ifdef OPENSSL_UNISTD
 
 #if !defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_VMS)
 # ifdef OPENSSL_UNISTD
@@ -261,7 +261,7 @@ static jmp_buf save;
 #ifdef OPENSSL_SYS_VMS
 static struct IOSB iosb;
 static $DESCRIPTOR(terminal,"TT");
 #ifdef OPENSSL_SYS_VMS
 static struct IOSB iosb;
 static $DESCRIPTOR(terminal,"TT");
-static long tty_orig[3], tty_new[3];
+static long tty_orig[3], tty_new[3]; /* XXX   Is there any guarantee that this will always suffice for the actual structures? */
 static long status;
 static unsigned short channel = 0;
 #else
 static long status;
 static unsigned short channel = 0;
 #else
@@ -269,7 +269,7 @@ static unsigned short channel = 0;
 static TTY_STRUCT tty_orig,tty_new;
 #endif
 #endif
 static TTY_STRUCT tty_orig,tty_new;
 #endif
 #endif
-static FILE *tty;
+static FILE *tty_in, *tty_out;
 static int is_a_tty;
 
 /* Declare static functions */
 static int is_a_tty;
 
 /* Declare static functions */
@@ -277,12 +277,13 @@ static void read_till_nl(FILE *);
 static void recsig(int);
 static void pushsig(void);
 static void popsig(void);
 static void recsig(int);
 static void pushsig(void);
 static void popsig(void);
-#if defined(OENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_WIN16)
+#if defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_WIN16)
 static int noecho_fgets(char *buf, int size, FILE *tty);
 #endif
 static int read_string_inner(UI *ui, UI_STRING *uis, int echo);
 
 static int read_string(UI *ui, UI_STRING *uis);
 static int noecho_fgets(char *buf, int size, FILE *tty);
 #endif
 static int read_string_inner(UI *ui, UI_STRING *uis, int echo);
 
 static int read_string(UI *ui, UI_STRING *uis);
+static int write_string(UI *ui, UI_STRING *uis);
 
 static int open_console(UI *ui);
 static int echo_console(UI *ui);
 
 static int open_console(UI *ui);
 static int echo_console(UI *ui);
@@ -293,9 +294,11 @@ static UI_METHOD ui_openssl =
        {
        "OpenSSL default user interface",
        open_console,
        {
        "OpenSSL default user interface",
        open_console,
+       write_string,
+       NULL,                   /* No flusher is needed for command lines */
        read_string,
        read_string,
-       NULL,                   /* The reader function writes as well */
        close_console,
        close_console,
+       NULL
        };
 
 /* The method with all the built-in thingies */
        };
 
 /* The method with all the built-in thingies */
@@ -304,49 +307,50 @@ UI_METHOD *UI_OpenSSL(void)
        return &ui_openssl;
        }
 
        return &ui_openssl;
        }
 
-static int read_string(UI *ui, UI_STRING *uis)
+/* The following function makes sure that info and error strings are printed
+   before any prompt. */
+static int write_string(UI *ui, UI_STRING *uis)
        {
        switch (UI_get_string_type(uis))
                {
        {
        switch (UI_get_string_type(uis))
                {
-       case UI_VERIFY_NOECHO:
-               fprintf(tty,"Verifying - %s",
-                       UI_get0_output_string(uis));
-               fflush(tty);
-               if (read_string_inner(ui, uis, 0) == 0)
-                       return 0;
-               if (strcmp(UI_get0_result_string(uis),
-                       UI_get0_test_string(uis)) != 0)
-                       {
-                       fprintf(tty,"Verify failure\n");
-                       fflush(tty);
-                       return 0;
-                       }
+       case UIT_VERIFY:
+       case UIT_PROMPT:
+               break;
+       default:
+               fputs(UI_get0_output_string(uis), tty_out);
+               fflush(tty_out);
                break;
                break;
-       case UI_VERIFY_ECHO:
-               fprintf(tty,"Verifying - %s",
+               }
+       return 1;
+       }
+
+static int read_string(UI *ui, UI_STRING *uis)
+       {
+       int ok = 0;
+
+       switch (UI_get_string_type(uis))
+               {
+       case UIT_PROMPT:
+               fputs(UI_get0_output_string(uis), tty_out);
+               fflush(tty_out);
+               return read_string_inner(ui, uis,
+                       UI_get_input_flags(uis) & UI_INPUT_FLAG_ECHO);
+       case UIT_VERIFY:
+               fprintf(tty_out,"Verifying - %s",
                        UI_get0_output_string(uis));
                        UI_get0_output_string(uis));
-               fflush(tty);
-               if (read_string_inner(ui, uis, 1) == 0)
-                       return 0;
+               fflush(tty_out);
+               if ((ok = read_string_inner(ui, uis,
+                       UI_get_input_flags(uis) & UI_INPUT_FLAG_ECHO)) <= 0)
+                       return ok;
                if (strcmp(UI_get0_result_string(uis),
                        UI_get0_test_string(uis)) != 0)
                        {
                if (strcmp(UI_get0_result_string(uis),
                        UI_get0_test_string(uis)) != 0)
                        {
-                       fprintf(tty,"Verify failure\n");
-                       fflush(tty);
+                       fprintf(tty_out,"Verify failure\n");
+                       fflush(tty_out);
                        return 0;
                        }
                break;
                        return 0;
                        }
                break;
-       case UI_STRING_NOECHO:
-               fputs(UI_get0_output_string(uis), tty);
-               fflush(tty);
-               return read_string_inner(ui, uis, 0);
-       case UI_STRING_ECHO:
-               fputs(UI_get0_output_string(uis), tty);
-               fflush(tty);
-               return read_string_inner(ui, uis, 1);
        default:
        default:
-               fputs(UI_get0_output_string(uis), tty);
-               fflush(tty);
                break;
                }
        return 1;
                break;
                }
        return 1;
@@ -372,9 +376,9 @@ static int read_string_inner(UI *ui, UI_STRING *uis, int echo)
        int maxsize = BUFSIZ-1;
 
 #ifndef OPENSSL_SYS_WIN16
        int maxsize = BUFSIZ-1;
 
 #ifndef OPENSSL_SYS_WIN16
-       if (setjmp(save))
+       if ((ok = setjmp(save)))
                {
                {
-               ok=0;
+               if (ok == 1) ok=0;
                goto error;
                }
        ok=0;
                goto error;
                }
        ok=0;
@@ -393,21 +397,24 @@ static int read_string_inner(UI *ui, UI_STRING *uis, int echo)
                result[0]='\0';
 #ifdef OPENSSL_SYS_MSDOS
                if (!echo)
                result[0]='\0';
 #ifdef OPENSSL_SYS_MSDOS
                if (!echo)
-                       noecho_fgets(result,maxsize,tty);
+                       noecho_fgets(result,maxsize,tty_in);
                else
                else
+                       fgets(result,maxsize,tty_in);
+#else
+               fgets(result,maxsize,tty_in);
 #endif
 #endif
-                       fgets(result,maxsize,tty);
-               if (feof(tty)) goto error;
-               if (ferror(tty)) goto error;
+               if (feof(tty_in)) goto error;
+               if (ferror(tty_in)) goto error;
                if ((p=(char *)strchr(result,'\n')) != NULL)
                        *p='\0';
                if ((p=(char *)strchr(result,'\n')) != NULL)
                        *p='\0';
-               else    read_till_nl(tty);
+               else
+                       read_till_nl(tty_in);
                if (UI_set_result(uis, result) >= 0)
                        ok=1;
                }
 
 error:
                if (UI_set_result(uis, result) >= 0)
                        ok=1;
                }
 
 error:
-       if (!echo) fprintf(tty,"\n");
+       if (!echo) fprintf(tty_out,"\n");
        if (ps >= 2 && !echo)
                echo_console(ui);
 
        if (ps >= 2 && !echo)
                echo_console(ui);
 
@@ -429,18 +436,23 @@ static int open_console(UI *ui)
        CRYPTO_w_lock(CRYPTO_LOCK_UI);
        is_a_tty = 1;
 
        CRYPTO_w_lock(CRYPTO_LOCK_UI);
        is_a_tty = 1;
 
-#ifdef OPENSSL_SYS_MSDOS
-       if ((tty=fopen("con","w+")) == NULL)
-               tty=stdin;
-#elif defined(OPENSSL_SYS_MACINTOSH_CLASSIC)
-       tty=stdin;
+#if defined(OPENSSL_SYS_MACINTOSH_CLASSIC)
+       tty_in=stdin;
+       tty_out=stderr;
 #else
 #else
-       if ((tty=fopen("/dev/tty","w+")) == NULL)
-               tty=stdin;
+#  ifdef OPENSSL_SYS_MSDOS
+#    define DEV_TTY "con"
+#  else
+#    define DEV_TTY "/dev/tty"
+#  endif
+       if ((tty_in=fopen(DEV_TTY,"r")) == NULL)
+               tty_in=stdin;
+       if ((tty_out=fopen(DEV_TTY,"w")) == NULL)
+               tty_out=stderr;
 #endif
 
 #if defined(TTY_get) && !defined(VMS)
 #endif
 
 #if defined(TTY_get) && !defined(VMS)
-       if (TTY_get(fileno(tty),&tty_orig) == -1)
+       if (TTY_get(fileno(tty_in),&tty_orig) == -1)
                {
 #ifdef ENOTTY
                if (errno == ENOTTY)
                {
 #ifdef ENOTTY
                if (errno == ENOTTY)
@@ -476,7 +488,7 @@ static int noecho_console(UI *ui)
 #endif
 
 #if defined(TTY_set) && !defined(OPENSSL_SYS_VMS)
 #endif
 
 #if defined(TTY_set) && !defined(OPENSSL_SYS_VMS)
-       if (is_a_tty && (TTY_set(fileno(tty),&tty_new) == -1))
+       if (is_a_tty && (TTY_set(fileno(tty_in),&tty_new) == -1))
                return 0;
 #endif
 #ifdef OPENSSL_SYS_VMS
                return 0;
 #endif
 #ifdef OPENSSL_SYS_VMS
@@ -498,7 +510,7 @@ static int echo_console(UI *ui)
 #endif
 
 #if defined(TTY_set) && !defined(OPENSSL_SYS_VMS)
 #endif
 
 #if defined(TTY_set) && !defined(OPENSSL_SYS_VMS)
-       if (is_a_tty && (TTY_set(fileno(tty),&tty_new) == -1))
+       if (is_a_tty && (TTY_set(fileno(tty_in),&tty_new) == -1))
                return 0;
 #endif
 #ifdef OPENSSL_SYS_VMS
                return 0;
 #endif
 #ifdef OPENSSL_SYS_VMS
@@ -514,7 +526,8 @@ static int echo_console(UI *ui)
 
 static int close_console(UI *ui)
        {
 
 static int close_console(UI *ui)
        {
-       if (stdin != tty) fclose(tty);
+       if (tty_in != stderr) fclose(tty_in);
+       if (tty_out != stderr) fclose(tty_out);
 #ifdef OPENSSL_SYS_VMS
        status = sys$dassgn(channel);
 #endif
 #ifdef OPENSSL_SYS_VMS
        status = sys$dassgn(channel);
 #endif
@@ -585,10 +598,15 @@ static void popsig(void)
 
 static void recsig(int i)
        {
 
 static void recsig(int i)
        {
+       switch(i)
+               {
+       case SIGINT:
+               longjmp(save,-1);
+               break;
+       default:
+               break;
+               }
        longjmp(save,1);
        longjmp(save,1);
-#ifdef LINT
-       i=i;
-#endif
        }
 
 
        }