1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
|
/*
* $Source$
* $Author$
*
* Copyright 1990 by the Massachusetts Institute of Technology.
*
* For copying and distribution information, please see the file
* <krb5/mit-copyright.h>.
*
* libos: krb5_read_password for BSD 4.3
*/
#if !defined(lint) && !defined(SABER)
static char rcsid_read_pwd_c[] =
"$Id$";
#endif /* lint */
#include <krb5/copyright.h>
#include <krb5/krb5.h>
#include <stdio.h>
#include <errno.h>
#include <signal.h>
#include <setjmp.h>
#include <krb5/ext-proto.h>
#ifdef POSIX
#include <termios.h>
#define sigtype void
#else
#include <sys/ioctl.h>
#define sigtype int
#endif /* POSIX */
extern int errno;
#ifdef POSIX
#define cleanup(errcode) (void) signal(SIGINT, ointrfunc); tcsetattr(0, TCSANOW, &save_control); return errcode;
#else
#define cleanup(errcode) (void) signal(SIGINT, ointrfunc); ioctl(0, TIOCSETP, (char *)&tty_savestate); return errcode;
#endif
static jmp_buf pwd_jump;
static sigtype
intr_routine()
{
longjmp(pwd_jump, 1);
/*NOTREACHED*/
}
krb5_error_code
krb5_read_password(prompt, prompt2, return_pwd, size_return)
char *prompt;
char *prompt2;
char *return_pwd;
int *size_return;
{
/* adapted from Kerberos v4 des/read_password.c */
char *readin_string = 0;
register char *ptr;
int scratchchar;
sigtype (*ointrfunc)();
#ifdef POSIX
struct termios echo_control, save_control;
if (tcgetattr(0, &echo_control) == -1)
return errno;
save_control = echo_control;
echo_control.c_lflag &= ~(ECHO|ECHONL);
if (tcsetattr(0, TCSANOW, &echo_control) == -1)
return errno;
#else
/* 4.3BSD style */
struct sgttyb tty_state, tty_savestate;
/* save terminal state */
if (ioctl(0,TIOCGETP,(char *)&tty_savestate) == -1)
return errno;
tty_state = tty_savestate;
tty_state.sg_flags &= ~ECHO;
if (ioctl(0,TIOCSETP,(char *)&tty_state) == -1)
return errno;
#endif
if (setjmp(pwd_jump)) {
/* interrupted */
if (readin_string) {
(void) bzero(readin_string, *size_return);
free(readin_string);
}
(void) bzero(return_pwd, *size_return);
cleanup(KRB5_LIBOS_PWDINTR);
}
/* save intrfunc */
ointrfunc = signal(SIGINT, intr_routine);
/* put out the prompt */
(void) fputs(prompt,stdout);
(void) fflush(stdout);
(void) bzero(return_pwd, *size_return);
if (fgets(return_pwd, *size_return, stdin) == NULL) {
/* error */
(void) putchar('\n');
(void) bzero(return_pwd, *size_return);
cleanup(KRB5_LIBOS_CANTREADPWD);
}
(void) putchar('\n');
/* fgets always null-terminates the returned string */
/* replace newline with null */
if (ptr = index(return_pwd, '\n'))
*ptr = '\0';
else /* flush rest of input line */
do {
scratchchar = getchar();
} while (scratchchar != EOF && scratchchar != '\n');
if (prompt2) {
/* put out the prompt */
(void) fputs(prompt2,stdout);
(void) fflush(stdout);
readin_string = malloc(*size_return);
if (!readin_string) {
(void) bzero(return_pwd, *size_return);
cleanup(ENOMEM);
}
(void) bzero(readin_string, *size_return);
if (fgets(readin_string, *size_return, stdin) == NULL) {
/* error */
(void) putchar('\n');
(void) bzero(readin_string, *size_return);
(void) bzero(return_pwd, *size_return);
free(readin_string);
cleanup(KRB5_LIBOS_CANTREADPWD);
}
(void) putchar('\n');
if (ptr = index(readin_string, '\n'))
*ptr = '\0';
else /* need to flush */
do {
scratchchar = getchar();
} while (scratchchar != EOF && scratchchar != '\n');
/* compare */
if (strncmp(return_pwd, readin_string, *size_return)) {
(void) bzero(readin_string, *size_return);
(void) bzero(return_pwd, *size_return);
free(readin_string);
cleanup(KRB5_LIBOS_BADPWDMATCH);
}
(void) bzero(readin_string, *size_return);
free(readin_string);
}
/* reset intrfunc */
(void) signal(SIGINT, ointrfunc);
#ifdef POSIX
if (tcsetattr(0, TCSANOW, &save_control) == -1)
return errno;
#else
if (ioctl(0, TIOCSETP, (char *)&tty_savestate) == -1)
return errno;
#endif
*size_return = strlen(return_pwd);
return 0;
}
|
