diff options
Diffstat (limited to 'contrib/opie/libopie/readpass.c')
| -rw-r--r-- | contrib/opie/libopie/readpass.c | 304 |
1 files changed, 304 insertions, 0 deletions
diff --git a/contrib/opie/libopie/readpass.c b/contrib/opie/libopie/readpass.c new file mode 100644 index 0000000..4dc22e2 --- /dev/null +++ b/contrib/opie/libopie/readpass.c @@ -0,0 +1,304 @@ +/* readpass.c: The opiereadpass() library function. + +%%% portions-copyright-cmetz +Portions of this software are Copyright 1996 by Craig Metz, All Rights +Reserved. The Inner Net License Version 2 applies to these portions of +the software. +You should have received a copy of the license with this software. If +you didn't get a copy, you may request one from <license@inner.net>. + +Portions of this software are Copyright 1995 by Randall Atkinson and Dan +McDonald, All Rights Reserved. All Rights under this copyright are assigned +to the U.S. Naval Research Laboratory (NRL). The NRL Copyright Notice and +License Agreement applies to this software. + + History: + + Modified by cmetz for OPIE 2.3. Use TCSAFLUSH always. + Modified by cmetz for OPIE 2.22. Replaced echo w/ flags. + Really use FUNCTION. + Modified by cmetz for OPIE 2.2. Use FUNCTION declaration et al. + Flush extraneous characters up to eol. Handle gobs of possible + erase and kill keys if on a terminal. To do so, use RAW + terminal I/O and handle echo ourselves. (should also help + DOS et al portability). Fixed include order. Re-did MSDOS + and OS/2 includes. Set up VMIN and VTIME. Added some non-UNIX + portability cruft. Limit backspacing and killing. In terminal + mode, eat random other control characters. Added eof handling. + Created at NRL for OPIE 2.2 from opiesubr.c. Change opiestrip_crlf to + opiestripcrlf. Don't strip to seven bits. +*/ +#include "opie_cfg.h" + +#include <stdio.h> +#include <string.h> +#include <stdlib.h> /* ANSI C standard library */ + +#ifdef unix +#include <fcntl.h> /* POSIX file control function headers */ +#include <termios.h> /* POSIX Terminal I/O functions */ +#if HAVE_UNISTD_H +#include <unistd.h> /* POSIX standard definitions */ +#endif /* HAVE_UNISTD_H */ +#include <signal.h> +#include <setjmp.h> +#endif /* unix */ + +#ifdef __MSDOS__ +#include <dos.h> +#endif /* __MSDOS__ */ + +#ifdef __OS2__ +#define INCL_KBD +#include <os2.h> +#include <io.h> +#endif /* __OS2__ */ + +#include "opie.h" + +#define CONTROL(x) (x - 64) + +char *bsseq = "\b \b"; + +#ifdef unix +static jmp_buf jmpbuf; + +static VOIDRET catch FUNCTION((i), int i) +{ + longjmp(jmpbuf, 1); +} +#endif /* unix */ + +char *opiereadpass FUNCTION((buf, len, flags), char *buf AND int len AND int flags) +{ +#ifdef unix + struct termios attr, orig_attr; +#endif /* unix */ + char erase[5]; + char kill[4]; + char eof[4]; + + memset(erase, 0, sizeof(erase)); + memset(kill, 0, sizeof(kill)); + memset(eof, 0, sizeof(eof)); + + /* This section was heavily rewritten by rja following the model of code + samples circa page 151 of the POSIX Programmer's Guide by Donald Lewine, + ISBN 0-937175-73-0. That book is Copyright 1991 by O'Reilly & + Associates, Inc. All Rights Reserved. I recommend the book to anyone + trying to write portable software. rja */ + +#ifdef unix + if (setjmp(jmpbuf)) + goto error; + + signal(SIGINT, catch); +#endif /* unix */ + + /* Flush any pending output */ + fflush(stderr); + fflush(stdout); + +#ifdef unix + /* Get original terminal attributes */ + if (isatty(0)) { + if (tcgetattr(0, &orig_attr)) + return NULL; + + /* copy terminal settings into attr */ + memcpy(&attr, &orig_attr, sizeof(struct termios)); + + attr.c_lflag &= ~(ECHO | ICANON); + attr.c_lflag |= ISIG; + + attr.c_cc[VMIN] = 1; + attr.c_cc[VTIME] = 0; + + erase[0] = CONTROL('H'); + erase[1] = 127; + +#ifdef CERASE + { + char *e = erase; + + while(*e) + if (*(e++) == CERASE) + break; + + if (!*e) + *e = CERASE; + } +#endif /* CERASE */ +#ifdef VERASE + { + char *e = erase; + + while(*e) + if (*(e++) == attr.c_cc[VERASE]) + break; + + if (!*e) + *e = attr.c_cc[VERASE]; + } +#endif /* VERASE */ + + kill[0] = CONTROL('U'); +#ifdef CKILL + { + char *e = kill; + + while(*e) + if (*(e++) == CKILL) + break; + + if (!*e) + *e = CKILL; + } +#endif /* CKILL */ +#ifdef VKILL + { + char *e = kill; + + while(*e) + if (*(e++) == attr.c_cc[VKILL]) + break; + + if (!*e) + *e = attr.c_cc[VKILL]; + } +#endif /* VKILL */ + + eof[0] = CONTROL('D'); +#ifdef CEOF + { + char *e = eof; + + while(*e) + if (*(e++) == CEOF) + break; + + if (!*e) + *e = CEOF; + } +#endif /* CEOF */ +#ifdef VEOF + { + char *e = eof; + + while(*e) + if (*(e++) == attr.c_cc[VEOF]) + break; + + if (!*e) + *e = VEOF; + } +#endif /* VEOF */ + + if (tcsetattr(0, TCSAFLUSH, &attr)) + goto error; + } +#else /* unix */ + erase[0] = CONTROL('H'); + erase[1] = 127; + kill[0] = CONTROL('U'); + eof[0] = CONTROL('D'); + eof[1] = CONTROL('Z'); +#endif /* unix */ + + { + char *c = buf, *end = buf + len, *e; +#ifdef __OS2__ + KBDKEYINFO keyInfo; +#endif /* __OS2__ */ + +loop: +#ifdef unix + if (read(0, c, 1) != 1) + goto error; +#endif /* unix */ +#ifdef MSDOS + *c = bdos(7, 0, 0); +#endif /* MSDOS */ +#ifdef __OS2__ + KbdCharIn(&keyInfo, 0, 0); + *c = keyInfo.chChar; +#endif /* __OS2__ */ + + if ((*c == '\r') || (*c == '\n')) { + *c = 0; + goto restore; + } + + e = eof; + while(*e) + if (*(e++) == *c) + goto error; + + e = erase; + while(*e) + if (*(e++) == *c) { + if (c <= buf) + goto beep; + + if (flags & 1) + write(1, bsseq, sizeof(bsseq) - 1); + c--; + goto loop; + } + + e = kill; + while(*e) + if (*(e++) == *c) { + if (c <= buf) + goto beep; + + if (flags & 1) + while(c-- > buf) + write(1, bsseq, sizeof(bsseq) - 1); + + c = buf; + goto loop; + } + + if (c < end) { + if (*c < 32) + goto beep; + if (flags & 1) + write(1, c, 1); + c++; + } else { + beep: + *c = CONTROL('G'); + write(1, c, 1); + } + + goto loop; + } + +restore: +#ifdef unix + /* Restore previous tty modes */ + if (isatty(0)) + if (tcsetattr(0, TCSAFLUSH, &orig_attr)) + return NULL; + + signal(SIGINT, SIG_DFL); +#endif /* unix */ + + /* After the secret key is taken from the keyboard, the line feed is + written to standard error instead of standard output. That means that + anyone using the program from a terminal won't notice, but capturing + standard output will get the key words without a newline in front of + them. */ + if (!(flags & 4)) { + fprintf(stderr, "\n"); + fflush(stderr); + } + + return buf; + +error: + *buf = 0; + buf = NULL; + goto restore; +} |
