Initial Commit
This commit is contained in:
root
533
openssl-1.0.2f/crypto/des/read_pwd.c
Normal file
533
openssl-1.0.2f/crypto/des/read_pwd.c
Normal file
@@ -0,0 +1,533 @@
|
||||
/* crypto/des/read_pwd.c */
|
||||
/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
|
||||
* All rights reserved.
|
||||
*
|
||||
* This package is an SSL implementation written
|
||||
* by Eric Young (eay@cryptsoft.com).
|
||||
* The implementation was written so as to conform with Netscapes SSL.
|
||||
*
|
||||
* This library is free for commercial and non-commercial use as long as
|
||||
* the following conditions are aheared to. The following conditions
|
||||
* apply to all code found in this distribution, be it the RC4, RSA,
|
||||
* lhash, DES, etc., code; not just the SSL code. The SSL documentation
|
||||
* included with this distribution is covered by the same copyright terms
|
||||
* except that the holder is Tim Hudson (tjh@cryptsoft.com).
|
||||
*
|
||||
* Copyright remains Eric Young's, and as such any Copyright notices in
|
||||
* the code are not to be removed.
|
||||
* If this package is used in a product, Eric Young should be given attribution
|
||||
* as the author of the parts of the library used.
|
||||
* This can be in the form of a textual message at program startup or
|
||||
* in documentation (online or textual) provided with the package.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
* are met:
|
||||
* 1. Redistributions of source code must retain the copyright
|
||||
* notice, this list of conditions and the following disclaimer.
|
||||
* 2. Redistributions in binary form must reproduce the above copyright
|
||||
* notice, this list of conditions and the following disclaimer in the
|
||||
* documentation and/or other materials provided with the distribution.
|
||||
* 3. All advertising materials mentioning features or use of this software
|
||||
* must display the following acknowledgement:
|
||||
* "This product includes cryptographic software written by
|
||||
* Eric Young (eay@cryptsoft.com)"
|
||||
* The word 'cryptographic' can be left out if the rouines from the library
|
||||
* being used are not cryptographic related :-).
|
||||
* 4. If you include any Windows specific code (or a derivative thereof) from
|
||||
* the apps directory (application code) you must include an acknowledgement:
|
||||
* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
||||
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||||
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
||||
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||||
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
||||
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
||||
* SUCH DAMAGE.
|
||||
*
|
||||
* The licence and distribution terms for any publically available version or
|
||||
* derivative of this code cannot be changed. i.e. this code cannot simply be
|
||||
* copied and put under another distribution licence
|
||||
* [including the GNU Public Licence.]
|
||||
*/
|
||||
|
||||
#include <openssl/e_os2.h>
|
||||
#if !defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_VMS) && !defined(OPENSSL_SYS_WIN32)
|
||||
# ifdef OPENSSL_UNISTD
|
||||
# include OPENSSL_UNISTD
|
||||
# else
|
||||
# include <unistd.h>
|
||||
# endif
|
||||
/*
|
||||
* If unistd.h defines _POSIX_VERSION, we conclude that we are on a POSIX
|
||||
* system and have sigaction and termios.
|
||||
*/
|
||||
# if defined(_POSIX_VERSION)
|
||||
|
||||
# define SIGACTION
|
||||
# if !defined(TERMIOS) && !defined(TERMIO) && !defined(SGTTY)
|
||||
# define TERMIOS
|
||||
# endif
|
||||
|
||||
# endif
|
||||
#endif
|
||||
|
||||
/* Define this if you have sigaction() */
|
||||
/* #define SIGACTION */
|
||||
|
||||
#ifdef WIN16TTY
|
||||
# undef OPENSSL_SYS_WIN16
|
||||
# undef _WINDOWS
|
||||
# include <graph.h>
|
||||
#endif
|
||||
|
||||
/* 06-Apr-92 Luke Brennan Support for VMS */
|
||||
#include "des_locl.h"
|
||||
#include "cryptlib.h"
|
||||
#include <signal.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
#include <setjmp.h>
|
||||
#include <errno.h>
|
||||
|
||||
#ifdef OPENSSL_SYS_VMS /* prototypes for sys$whatever */
|
||||
# include <starlet.h>
|
||||
# ifdef __DECC
|
||||
# pragma message disable DOLLARID
|
||||
# endif
|
||||
#endif
|
||||
|
||||
#ifdef WIN_CONSOLE_BUG
|
||||
# include <windows.h>
|
||||
# ifndef OPENSSL_SYS_WINCE
|
||||
# include <wincon.h>
|
||||
# endif
|
||||
#endif
|
||||
|
||||
/*
|
||||
* There are 5 types of terminal interface supported, TERMIO, TERMIOS, VMS,
|
||||
* MSDOS and SGTTY
|
||||
*/
|
||||
|
||||
#if defined(__sgi) && !defined(TERMIOS)
|
||||
# define TERMIOS
|
||||
# undef TERMIO
|
||||
# undef SGTTY
|
||||
#endif
|
||||
|
||||
#if defined(linux) && !defined(TERMIO)
|
||||
# undef TERMIOS
|
||||
# define TERMIO
|
||||
# undef SGTTY
|
||||
#endif
|
||||
|
||||
#ifdef _LIBC
|
||||
# undef TERMIOS
|
||||
# define TERMIO
|
||||
# undef SGTTY
|
||||
#endif
|
||||
|
||||
#if !defined(TERMIO) && !defined(TERMIOS) && !defined(OPENSSL_SYS_VMS) && !defined(OPENSSL_SYS_MSDOS) && !defined(MAC_OS_pre_X) && !defined(MAC_OS_GUSI_SOURCE)
|
||||
# undef TERMIOS
|
||||
# undef TERMIO
|
||||
# define SGTTY
|
||||
#endif
|
||||
|
||||
#if defined(OPENSSL_SYS_VXWORKS)
|
||||
# undef TERMIOS
|
||||
# undef TERMIO
|
||||
# undef SGTTY
|
||||
#endif
|
||||
|
||||
#ifdef TERMIOS
|
||||
# include <termios.h>
|
||||
# define TTY_STRUCT struct termios
|
||||
# define TTY_FLAGS c_lflag
|
||||
# define TTY_get(tty,data) tcgetattr(tty,data)
|
||||
# define TTY_set(tty,data) tcsetattr(tty,TCSANOW,data)
|
||||
#endif
|
||||
|
||||
#ifdef TERMIO
|
||||
# include <termio.h>
|
||||
# define TTY_STRUCT struct termio
|
||||
# define TTY_FLAGS c_lflag
|
||||
# define TTY_get(tty,data) ioctl(tty,TCGETA,data)
|
||||
# define TTY_set(tty,data) ioctl(tty,TCSETA,data)
|
||||
#endif
|
||||
|
||||
#ifdef SGTTY
|
||||
# include <sgtty.h>
|
||||
# define TTY_STRUCT struct sgttyb
|
||||
# define TTY_FLAGS sg_flags
|
||||
# define TTY_get(tty,data) ioctl(tty,TIOCGETP,data)
|
||||
# define TTY_set(tty,data) ioctl(tty,TIOCSETP,data)
|
||||
#endif
|
||||
|
||||
#if !defined(_LIBC) && !defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_VMS) && !defined(MAC_OS_pre_X)
|
||||
# include <sys/ioctl.h>
|
||||
#endif
|
||||
|
||||
#if defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_WINCE)
|
||||
# include <conio.h>
|
||||
# define fgets(a,b,c) noecho_fgets(a,b,c)
|
||||
#endif
|
||||
|
||||
#ifdef OPENSSL_SYS_VMS
|
||||
# include <ssdef.h>
|
||||
# include <iodef.h>
|
||||
# include <ttdef.h>
|
||||
# include <descrip.h>
|
||||
struct IOSB {
|
||||
short iosb$w_value;
|
||||
short iosb$w_count;
|
||||
long iosb$l_info;
|
||||
};
|
||||
#endif
|
||||
|
||||
#if defined(MAC_OS_pre_X) || defined(MAC_OS_GUSI_SOURCE)
|
||||
/*
|
||||
* This one needs work. As a matter of fact the code is unoperational
|
||||
* and this is only a trick to get it compiled.
|
||||
* <appro@fy.chalmers.se>
|
||||
*/
|
||||
# define TTY_STRUCT int
|
||||
#endif
|
||||
|
||||
#ifndef NX509_SIG
|
||||
# define NX509_SIG 32
|
||||
#endif
|
||||
|
||||
static void read_till_nl(FILE *);
|
||||
static void recsig(int);
|
||||
static void pushsig(void);
|
||||
static void popsig(void);
|
||||
#if defined(OPENSSL_SYS_MSDOS) && !defined(OPENSSL_SYS_WIN16)
|
||||
static int noecho_fgets(char *buf, int size, FILE *tty);
|
||||
#endif
|
||||
#ifdef SIGACTION
|
||||
static struct sigaction savsig[NX509_SIG];
|
||||
#else
|
||||
static void (*savsig[NX509_SIG]) (int);
|
||||
#endif
|
||||
static jmp_buf save;
|
||||
|
||||
int des_read_pw_string(char *buf, int length, const char *prompt, int verify)
|
||||
{
|
||||
char buff[BUFSIZ];
|
||||
int ret;
|
||||
|
||||
ret =
|
||||
des_read_pw(buf, buff, (length > BUFSIZ) ? BUFSIZ : length, prompt,
|
||||
verify);
|
||||
OPENSSL_cleanse(buff, BUFSIZ);
|
||||
return (ret);
|
||||
}
|
||||
|
||||
#ifdef OPENSSL_SYS_WINCE
|
||||
|
||||
int des_read_pw(char *buf, char *buff, int size, const char *prompt,
|
||||
int verify)
|
||||
{
|
||||
memset(buf, 0, size);
|
||||
memset(buff, 0, size);
|
||||
return (0);
|
||||
}
|
||||
|
||||
#elif defined(OPENSSL_SYS_WIN16)
|
||||
|
||||
int des_read_pw(char *buf, char *buff, int size, char *prompt, int verify)
|
||||
{
|
||||
memset(buf, 0, size);
|
||||
memset(buff, 0, size);
|
||||
return (0);
|
||||
}
|
||||
|
||||
#else /* !OPENSSL_SYS_WINCE && !OPENSSL_SYS_WIN16 */
|
||||
|
||||
static void read_till_nl(FILE *in)
|
||||
{
|
||||
# define SIZE 4
|
||||
char buf[SIZE + 1];
|
||||
|
||||
do {
|
||||
fgets(buf, SIZE, in);
|
||||
} while (strchr(buf, '\n') == NULL);
|
||||
}
|
||||
|
||||
/* return 0 if ok, 1 (or -1) otherwise */
|
||||
int des_read_pw(char *buf, char *buff, int size, const char *prompt,
|
||||
int verify)
|
||||
{
|
||||
# ifdef OPENSSL_SYS_VMS
|
||||
struct IOSB iosb;
|
||||
$DESCRIPTOR(terminal, "TT");
|
||||
long tty_orig[3], tty_new[3];
|
||||
long status;
|
||||
unsigned short channel = 0;
|
||||
# else
|
||||
# if !defined(OPENSSL_SYS_MSDOS) || defined(__DJGPP__)
|
||||
TTY_STRUCT tty_orig, tty_new;
|
||||
# endif
|
||||
# endif
|
||||
int number;
|
||||
int ok;
|
||||
/*
|
||||
* statics are simply to avoid warnings about longjmp clobbering things
|
||||
*/
|
||||
static int ps;
|
||||
int is_a_tty;
|
||||
static FILE *tty;
|
||||
char *p;
|
||||
|
||||
if (setjmp(save)) {
|
||||
ok = 0;
|
||||
goto error;
|
||||
}
|
||||
|
||||
number = 5;
|
||||
ok = 0;
|
||||
ps = 0;
|
||||
is_a_tty = 1;
|
||||
tty = NULL;
|
||||
|
||||
# ifdef OPENSSL_SYS_MSDOS
|
||||
if ((tty = fopen("con", "r")) == NULL)
|
||||
tty = stdin;
|
||||
# elif defined(MAC_OS_pre_X) || defined(OPENSSL_SYS_VXWORKS)
|
||||
tty = stdin;
|
||||
# else
|
||||
# ifndef OPENSSL_SYS_MPE
|
||||
if ((tty = fopen("/dev/tty", "r")) == NULL)
|
||||
# endif
|
||||
tty = stdin;
|
||||
# endif
|
||||
|
||||
# if defined(TTY_get) && !defined(OPENSSL_SYS_VMS)
|
||||
if (TTY_get(fileno(tty), &tty_orig) == -1) {
|
||||
# ifdef ENOTTY
|
||||
if (errno == ENOTTY)
|
||||
is_a_tty = 0;
|
||||
else
|
||||
# endif
|
||||
# ifdef EINVAL
|
||||
/*
|
||||
* Ariel Glenn ariel@columbia.edu reports that solaris can return
|
||||
* EINVAL instead. This should be ok
|
||||
*/
|
||||
if (errno == EINVAL)
|
||||
is_a_tty = 0;
|
||||
else
|
||||
# endif
|
||||
return (-1);
|
||||
}
|
||||
memcpy(&(tty_new), &(tty_orig), sizeof(tty_orig));
|
||||
# endif
|
||||
# ifdef OPENSSL_SYS_VMS
|
||||
status = sys$assign(&terminal, &channel, 0, 0);
|
||||
if (status != SS$_NORMAL)
|
||||
return (-1);
|
||||
status =
|
||||
sys$qiow(0, channel, IO$_SENSEMODE, &iosb, 0, 0, tty_orig, 12, 0, 0,
|
||||
0, 0);
|
||||
if ((status != SS$_NORMAL) || (iosb.iosb$w_value != SS$_NORMAL))
|
||||
return (-1);
|
||||
# endif
|
||||
|
||||
pushsig();
|
||||
ps = 1;
|
||||
|
||||
# ifdef TTY_FLAGS
|
||||
tty_new.TTY_FLAGS &= ~ECHO;
|
||||
# endif
|
||||
|
||||
# if defined(TTY_set) && !defined(OPENSSL_SYS_VMS)
|
||||
if (is_a_tty && (TTY_set(fileno(tty), &tty_new) == -1))
|
||||
# ifdef OPENSSL_SYS_MPE
|
||||
; /* MPE lies -- echo really has been disabled */
|
||||
# else
|
||||
return (-1);
|
||||
# endif
|
||||
# endif
|
||||
# ifdef OPENSSL_SYS_VMS
|
||||
tty_new[0] = tty_orig[0];
|
||||
tty_new[1] = tty_orig[1] | TT$M_NOECHO;
|
||||
tty_new[2] = tty_orig[2];
|
||||
status =
|
||||
sys$qiow(0, channel, IO$_SETMODE, &iosb, 0, 0, tty_new, 12, 0, 0, 0,
|
||||
0);
|
||||
if ((status != SS$_NORMAL) || (iosb.iosb$w_value != SS$_NORMAL))
|
||||
return (-1);
|
||||
# endif
|
||||
ps = 2;
|
||||
|
||||
while ((!ok) && (number--)) {
|
||||
fputs(prompt, stderr);
|
||||
fflush(stderr);
|
||||
|
||||
buf[0] = '\0';
|
||||
fgets(buf, size, tty);
|
||||
if (feof(tty))
|
||||
goto error;
|
||||
if (ferror(tty))
|
||||
goto error;
|
||||
if ((p = (char *)strchr(buf, '\n')) != NULL)
|
||||
*p = '\0';
|
||||
else
|
||||
read_till_nl(tty);
|
||||
if (verify) {
|
||||
fprintf(stderr, "\nVerifying password - %s", prompt);
|
||||
fflush(stderr);
|
||||
buff[0] = '\0';
|
||||
fgets(buff, size, tty);
|
||||
if (feof(tty))
|
||||
goto error;
|
||||
if ((p = (char *)strchr(buff, '\n')) != NULL)
|
||||
*p = '\0';
|
||||
else
|
||||
read_till_nl(tty);
|
||||
|
||||
if (strcmp(buf, buff) != 0) {
|
||||
fprintf(stderr, "\nVerify failure");
|
||||
fflush(stderr);
|
||||
break;
|
||||
/* continue; */
|
||||
}
|
||||
}
|
||||
ok = 1;
|
||||
}
|
||||
|
||||
error:
|
||||
fprintf(stderr, "\n");
|
||||
# if 0
|
||||
perror("fgets(tty)");
|
||||
# endif
|
||||
/* What can we do if there is an error? */
|
||||
# if defined(TTY_set) && !defined(OPENSSL_SYS_VMS)
|
||||
if (ps >= 2)
|
||||
TTY_set(fileno(tty), &tty_orig);
|
||||
# endif
|
||||
# ifdef OPENSSL_SYS_VMS
|
||||
if (ps >= 2)
|
||||
status =
|
||||
sys$qiow(0, channel, IO$_SETMODE, &iosb, 0, 0, tty_orig, 12, 0, 0,
|
||||
0, 0);
|
||||
# endif
|
||||
|
||||
if (ps >= 1)
|
||||
popsig();
|
||||
if (stdin != tty)
|
||||
fclose(tty);
|
||||
# ifdef OPENSSL_SYS_VMS
|
||||
status = sys$dassgn(channel);
|
||||
# endif
|
||||
return (!ok);
|
||||
}
|
||||
|
||||
static void pushsig(void)
|
||||
{
|
||||
int i;
|
||||
# ifdef SIGACTION
|
||||
struct sigaction sa;
|
||||
|
||||
memset(&sa, 0, sizeof sa);
|
||||
sa.sa_handler = recsig;
|
||||
# endif
|
||||
|
||||
for (i = 1; i < NX509_SIG; i++) {
|
||||
# ifdef SIGUSR1
|
||||
if (i == SIGUSR1)
|
||||
continue;
|
||||
# endif
|
||||
# ifdef SIGUSR2
|
||||
if (i == SIGUSR2)
|
||||
continue;
|
||||
# endif
|
||||
# ifdef SIGACTION
|
||||
sigaction(i, &sa, &savsig[i]);
|
||||
# else
|
||||
savsig[i] = signal(i, recsig);
|
||||
# endif
|
||||
}
|
||||
|
||||
# ifdef SIGWINCH
|
||||
signal(SIGWINCH, SIG_DFL);
|
||||
# endif
|
||||
}
|
||||
|
||||
static void popsig(void)
|
||||
{
|
||||
int i;
|
||||
|
||||
for (i = 1; i < NX509_SIG; i++) {
|
||||
# ifdef SIGUSR1
|
||||
if (i == SIGUSR1)
|
||||
continue;
|
||||
# endif
|
||||
# ifdef SIGUSR2
|
||||
if (i == SIGUSR2)
|
||||
continue;
|
||||
# endif
|
||||
# ifdef SIGACTION
|
||||
sigaction(i, &savsig[i], NULL);
|
||||
# else
|
||||
signal(i, savsig[i]);
|
||||
# endif
|
||||
}
|
||||
}
|
||||
|
||||
static void recsig(int i)
|
||||
{
|
||||
longjmp(save, 1);
|
||||
# ifdef LINT
|
||||
i = i;
|
||||
# endif
|
||||
}
|
||||
|
||||
# ifdef OPENSSL_SYS_MSDOS
|
||||
static int noecho_fgets(char *buf, int size, FILE *tty)
|
||||
{
|
||||
int i;
|
||||
char *p;
|
||||
|
||||
p = buf;
|
||||
for (;;) {
|
||||
if (size == 0) {
|
||||
*p = '\0';
|
||||
break;
|
||||
}
|
||||
size--;
|
||||
# ifdef WIN16TTY
|
||||
i = _inchar();
|
||||
# else
|
||||
i = getch();
|
||||
# endif
|
||||
if (i == '\r')
|
||||
i = '\n';
|
||||
*(p++) = i;
|
||||
if (i == '\n') {
|
||||
*p = '\0';
|
||||
break;
|
||||
}
|
||||
}
|
||||
# ifdef WIN_CONSOLE_BUG
|
||||
/*
|
||||
* Win95 has several evil console bugs: one of these is that the last
|
||||
* character read using getch() is passed to the next read: this is
|
||||
* usually a CR so this can be trouble. No STDIO fix seems to work but
|
||||
* flushing the console appears to do the trick.
|
||||
*/
|
||||
{
|
||||
HANDLE inh;
|
||||
inh = GetStdHandle(STD_INPUT_HANDLE);
|
||||
FlushConsoleInputBuffer(inh);
|
||||
}
|
||||
# endif
|
||||
return (strlen(buf));
|
||||
}
|
||||
# endif
|
||||
#endif /* !OPENSSL_SYS_WINCE && !WIN16 */
|
||||
Reference in New Issue
Block a user